00000000: 78 04 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |x. |
00000010: 42 01 13 14 05 0C 17 01 12 05 20 20 20 20 20 20 |B......... |
00000020: 20 20 20 20 20 20 20 20 20 20 63 63 63 63 63 63 | cccccc|
00000030: 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 |cccccccccccccccc|
00000040: 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 |cccccccccccccccc|
00000050: 63 63 31 30 20 50 4F 4B 45 20 35 36 35 37 39 2C |cc10 POKE 56579,|
00000060: 31 35 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |15 |
00000070: 20 20 20 20 20 20 20 20 20 20 32 30 20 49 4E 50 | 20 INP|
00000080: 55 54 22 4C 45 49 54 55 4E 47 20 4E 55 4D 4D 45 |UT"LEITUNG NUMME|
00000090: 52 22 3C 4E 20 20 20 20 20 20 20 20 20 20 20 20 |R"<N |
000000A0: 20 20 33 30 20 50 4F 4B 45 20 35 36 35 37 37 2C | 30 POKE 56577,|
000000B0: 4E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |N |
000000C0: 20 20 20 20 20 20 20 20 20 20 34 30 20 41 20 3D | 40 A =|
000000D0: 20 50 45 45 4B 28 35 36 35 37 37 29 20 41 4E 44 | PEEK(56577) AND|
000000E0: 20 31 36 20 20 20 20 20 20 20 20 20 20 20 20 20 | 16 |
000000F0: 20 20 35 30 20 49 46 20 41 3D 30 20 54 48 45 4E | 50 IF A=0 THEN|
00000100: 20 38 30 20 20 20 20 20 20 20 20 20 20 20 20 20 | 80 |
00000110: 20 20 20 20 20 20 20 20 20 20 36 30 20 50 52 49 | 60 PRI|
00000120: 4E 54 22 53 43 48 41 4C 54 45 52 20 49 53 54 20 |NT"SCHALTER IST |
00000130: 4F 46 46 45 4E 22 20 20 20 20 20 20 20 20 20 20 |OFFEN" |
00000140: 20 20 37 30 20 50 52 49 4E 54 20 3E 20 47 4F 54 | 70 PRINT > GOT|
00000150: 4F 20 32 30 20 20 20 20 20 20 20 20 20 20 20 20 |O 20 |
00000160: 20 20 20 20 20 20 20 20 20 20 38 30 20 50 52 49 | 80 PRI|
00000170: 4E 54 22 53 43 48 41 4C 54 45 52 20 49 53 54 20 |NT"SCHALTER IST |
00000180: 47 45 53 43 48 4C 4F 53 53 45 4E 22 20 20 20 20 |GESCHLOSSEN" |
00000190: 20 20 39 30 20 50 52 49 4E 54 20 3E 20 47 4F 54 | 90 PRINT > GOT|
000001A0: 4F 20 32 30 20 20 20 20 20 20 20 20 20 20 20 20 |O 20 |
000001B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000001C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000001D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000001E0: 20 20 41 0D 20 41 0E 06 01 0E 07 20 04 05 13 20 | A. A..... ... |
000001F0: 50 12 0F 07 12 01 0D 0D 13 20 17 05 12 04 05 0E |P........ ......|
00000200: 20 09 0E 60 20 5A 05 09 0C 05 31 30 20 04 09 05 | ..` Z....10 ...|
00000210: 20 4C 05 09 14 15 0E 07 05 0E 20 50 42 30 20 02 | L........ PB0 .|
00000220: 09 13 20 50 42 33 20 01 15 06 60 20 41 15 13 07 |.. PB3 ...` A...|
00000230: 01 2D 02 05 20 07 05 13 03 08 01 0C 14 05 14 2E |.-.. ...........|
00000240: 20 44 09 05 13 05 12 60 20 56 0F 12 07 01 0E 07 | D.....` V......|
00000250: 60 20 09 13 14 60 20 0E 15 12 05 09 0E 0D 01 0C |` ...` .........|
00000260: 20 0E 0F 14 17 05 0E 04 09 07 20 15 0E 04 20 0D | ......... ... .|
00000270: 15 5B 20 0E 15 12 20 0E 01 03 08 60 20 05 09 0E |.[ ... ....` ...|
00000280: 05 0D 05 16 05 0E 14 15 05 0C 0C 05 0E 20 4E 4D |............. NM|
00000290: 49 20 28 3D 52 55 4E 2F 53 54 4F 50 20 52 45 53 |I (=RUN/STOP RES|
000002A0: 54 4F 52 45 29 60 20 0E 05 15 01 15 13 07 05 06 |TORE)` .........|
000002B0: 00 08 12 14 20 17 05 12 04 05 0E 2E 20 20 20 20 |.... ....... |
000002C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000002D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000002E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000002F0: 20 20 20 20 20 20 20 20 20 20 | |
X. B.........
CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC
CC10 POKE 56579,15
20 INPUT"LEITUNG NUMMER"<N
30 POKE 56577,N
40 A = PEEK(56577) AND 16
50 IF A=0 THEN 80
60 PRINT"SCHALTER IST OFFEN"
70 PRINT > GOTO 20
80 PRINT"SCHALTER IST GESCHLOSSEN"
90 PRINT > GOTO 20
A. A..... ... P........ ...... ..` Z..
..10 ... L........ PB0 ... PB3 ...` A...
.-.. ........... D.....` V......` ...` .
........ ......... ... ..[ ... ....` ...
............. NMI (=RUN/STOP RESTORE)` .
............ .......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL