COLD[CR] 1802 FIG-FORTH R0.4 3/16/81 : SET-LED 61440 C! ; [CR] OK : GET-LED 61440 C@ ; [CR] OK : DELAY 3000 0 DO LOOP ;[CR] OK : LEFT 7 0 DO GET-LED 2 * SET-LED DELAY LOOP ;[CR] OK : RIGHT 7 0 DO GET-LED 2 / SET-LED DELAY LOOP ;[CR] OK : RUN 1 SET-LED BEGIN LEFT RIGHT ?TERMINAL UNTIL ;[CR] OK RUN[CR]
I | Attachment | History | Action | Size | Date | Who | Comment |
---|---|---|---|---|---|---|---|
forth-von-innen.pdf | r1 | manage | 45.3 K | 2018-09-16 - 21:02 | PeterSchmid |