00000000: 09 CB 7E 08 11 00 16 00 16 00 00 00 00 00 00 FF |..~.............|
00000010: 00 00 6E 00 E1 7A 00 EF 10 BF EC FF 00 FD 00 00 |..n..z..........|
00000020: 1D 09 BE 00 FF ED 12 FF DD 7F DD 7F DD 7F DD 7F |................|
00000030: DD 7F DD 7F DD 7F DD 7F DD 7F DD 7F 4E 7F 4D 7F |............N.M.|
00000040: 00 ED 02 EF 00 EF 02 EF 10 FD 12 FF 15 FD 12 FF |................|
00000050: 12 FD 12 EF 00 ED 02 EF 10 FD 02 5F 91 33 34 35 |..........._.345|
00000060: 36 37 38 39 30 31 32 33 34 35 05 5F 23 20 5F 31 |6789012345._# _1|
00000070: 36 37 38 39 30 31 32 33 34 35 02 5F 11 33 34 35 |6789012345._.345|
00000080: 36 37 38 39 30 31 32 33 34 35 02 5F 14 33 34 35 |6789012345._.345|
00000090: 36 37 38 39 30 31 32 33 34 35 F7 FF ED F8 16 FA |6789012345......|
000000A0: 10 ED 12 EF FD ED FF FF 12 FD EF FF 10 FD 12 EF |................|
000000B0: 02 ED 02 EF 00 ED 02 EF 30 11 12 FF 10 FD 12 FA |........0.......|
000000C0: 00 CD 02 CF 00 EF 02 CF F5 FD 12 FF 10 FD 12 FF |................|
000000D0: FF DD FF CF 00 ED 02 EF 10 FD 12 FF 10 00 12 FF |................|
000000E0: 00 CD 0A CF 08 CD 02 EF 10 FD 12 FF 10 FD 12 FF |................|
000000F0: 0A ED 0A EF 00 ED DF EF 18 99 9A DF 98 98 8A 12 |................|
00000100: 30 06 03 28 00 80 20 54 41 42 45 4C 4C 45 4E 5A |0..(.. TABELLENZ|
00000110: 45 49 47 45 52 60 98 2D 3E 20 52 55 45 43 4B 53 |EIGER`.-> RUECKS|
00000120: 50 52 55 4E 47 8D 38 06 98 20 3D 20 24 30 30 30 |PRUNG.8.. = $000|
00000130: 0C A9 28 00 98 54 41 42 45 4C 4C 45 4E 5A 45 49 |..(..TABELLENZEI|
00000140: 47 45 52 80 20 20 53 54 52 49 4E 47 53 20 4C 4F |GER. STRINGS LO|
00000150: 45 53 43 48 45 4E 80 20 41 4C 4C 45 20 49 4E 20 |ESCHEN. ALLE IN |
00000160: 46 55 4E 4B 54 49 4F 4E 45 4E 20 55 4D 47 45 57 |FUNKTIONEN UMGEW|
00000170: 41 4E 44 45 4C 54 45 98 20 C4 C5 C6 20 C6 CE 2D |ANDELTE. ... ..-|
00000180: 52 4F 55 54 49 4E 45 4C 29 DB B3 98 2D 3E 20 4E |ROUTINEL)...-> N|
00000190: 4F 52 4D 41 4C 45 D0 38 08 88 CA 98 20 55 45 42 |ORMALE.8.... UEB|
000001A0: 45 52 54 52 41 47 45 4E 9D 29 FF C0 98 20 54 41 |ERTRAGEN.)... TA|
000001B0: 42 45 4C 4C 45 30 08 B9 29 FF 01 98 50 55 46 46 |BELLE0..)...PUFF|
000001C0: 45 52 20 49 4E 98 20 41 4B 54 55 41 4C 49 53 49 |ER IN. AKTUALISI|
000001D0: 45 52 45 4E 30 10 8D 38 06 98 54 41 42 45 4C 4C |EREN0..8..TABELL|
000001E0: 45 4E 5A 45 49 47 45 52 4C 29 37 A4 98 20 CD C5 |ENZEIGERL)7.. ..|
000001F0: CD CF D2 D9 A2 28 10 98 20 4C 41 4E 47 20 2D 3E |.....(.. LANG ->|
00000200: 20 CF D5 D4 20 CF C6 90 38 10 98 46 55 4E 4B 54 | ... ...8..FUNKT|
00000210: 49 4F 4E 20 5A 55 AA 6D 38 06 98 20 53 45 54 5A |ION ZU.m8.. SETZ|
00000220: 45 4E 18 98 54 41 42 45 4C 4C 45 4E 5A 45 49 47 |EN..TABELLENZEIG|
00000230: 45 52 A8 E9 28 04 98 98 20 53 45 54 5A 45 4E 38 |ER..(... SETZEN8|
00000240: 98 50 55 46 46 45 52 5A 45 49 47 45 52 8D 28 7A |.PUFFERZEIGER.(z|
00000250: 68 98 20 48 4F 4C 45 4E 8D 28 7B 98 20 56 4F 4D |h. HOLEN.({. VOM|
00000260: 20 53 54 41 43 4B 68 98 50 52 4F 47 52 41 4D 4D | STACKh.PROGRAMM|
00000270: 5A 45 49 47 45 52 20 29 79 A5 8D 28 7B 98 20 43 |ZEIGER )y..({. C|
00000280: 4F 44 45 20 55 4D 57 41 4E 44 45 4C 4E 8D 28 7A |ODE UMWANDELN.(z|
00000290: 98 20 49 4E 54 45 52 50 52 45 54 45 52 2D A9 28 |. INTERPRETER-.(|
000002A0: 00 98 53 54 52 49 4E 47 20 49 4E 48 AD 28 7B 98 |..STRING INH.({.|
000002B0: 20 4C 45 47 45 4E 48 98 20 41 55 46 20 53 54 41 | LEGENH. AUF STA|
000002C0: 43 4B AD 28 7A 98 50 52 4F 47 52 41 4D 4D 5A 45 |CK.(z.PROGRAMMZE|
000002D0: 49 47 45 52 9D 29 00 02 98 20 41 42 53 43 48 4C |IGER.)... ABSCHL|
000002E0: 49 45 53 53 45 4E A9 28 00 98 54 41 42 45 4C 4C |IESSEN.(..TABELL|
000002F0: 45 20 4D 49 54 20 24 30 30 10 38 07 88 98 20 55 |E MIT $00.8... U|
00000300: 45 42 45 52 54 52 41 47 45 4E 99 29 00 02 98 20 |EBERTRAGEN.)... |
00000310: 50 55 46 46 45 52 30 07 B1 28 FB 98 53 54 52 49 |PUFFER0..(..STRI|
00000320: 4E 47 20 49 4E 88 98 20 53 45 54 5A 45 4E A8 98 |NG IN.. SETZEN..|
00000330: 20 50 55 46 46 45 52 5A 45 49 47 45 52 30 0F AA | PUFFERZEIGER0..|
00000340: 98 53 54 52 49 4E 47 2D 20 55 4E 44 4C 29 37 A4 |.STRING- UNDL)7.|
00000350: 98 20 D1 D5 C1 CE D4 C9 D4 D9 A2 28 0E 98 C9 CC |. .........(....|
00000360: CC C5 C7 C1 CC D0 38 0F 98 53 54 52 49 4E 47 20 |......8..STRING |
00000370: 4C 45 45 52 20 2D 3E B1 28 47 98 20 48 4F 4C 45 |LEER ->.(G. HOLE|
00000380: 4E A0 28 00 98 53 54 52 49 4E 47 4C 41 45 4E 47 |N.(..STRINGLAENG|
00000390: 45 8D 28 FC B1 28 47 C8 8D 28 FB B1 28 47 98 20 |E.(..(G..(..(G. |
000003A0: 48 4F 4C 45 4E A0 28 01 98 53 54 52 49 4E 47 41 |HOLEN.(..STRINGA|
000003B0: 44 52 45 53 53 45 20 29 92 B0 20 28 79 98 56 41 |DRESSE ).. (y.VA|
000003C0: 52 49 41 42 4C 45 20 53 55 43 48 45 4E 48 98 20 |RIABLE SUCHENH. |
000003D0: 4C 45 47 45 4E AD 38 06 98 20 41 55 46 20 53 54 |LEGEN.8.. AUF ST|
000003E0: 41 50 45 4C 48 98 20 44 45 52 20 46 55 4E 4B 54 |APELH. DER FUNKT|
000003F0: 49 4F 4E A9 28 C1 98 54 41 42 45 4C 4C 45 4E 41 |ION.(..TABELLENA|
00000400: 44 52 45 53 53 45 48 AD 28 47 98 20 53 54 41 50 |DRESSEH.(G. STAP|
00000410: 45 4C 20 4C 45 47 45 4E 48 98 20 41 44 52 45 53 |EL LEGENH. ADRES|
00000420: 53 45 20 41 55 46 AD 28 48 98 C6 CE 2D 56 41 52 |SE AUF.(H...-VAR|
00000430: 49 41 42 4C 45 4E 2D 98 20 4C 45 47 45 4E 98 20 |IABLEN-. LEGEN. |
00000440: 41 55 46 20 53 54 41 50 45 4C 48 98 45 52 53 54 |AUF STAPELH.ERST|
00000450: 45 53 20 5A 45 49 43 48 45 4E 20 29 FF AE A9 28 |ES ZEICHEN )...(|
00000460: B2 98 41 55 46 20 22 3D 22 20 50 52 55 45 46 45 |..AUF "=" PRUEFE|
00000470: 4E 20 29 F7 AE 98 41 55 46 20 22 29 22 20 50 52 |N )...AUF ")" PR|
00000480: 55 45 46 45 4E 98 20 50 52 55 45 46 45 4E 20 29 |UEFEN. PRUEFEN )|
00000490: 8D AD 98 41 55 46 20 4E 55 4D 45 52 49 53 43 48 |...AUF NUMERISCH|
000004A0: 20 29 8B B0 98 56 41 52 49 41 42 4C 45 20 53 55 | )...VARIABLE SU|
000004B0: 43 48 45 4E 98 20 53 50 45 52 52 45 4E 8D 28 10 |CHEN. SPERREN.(.|
000004C0: 98 20 56 41 52 49 41 42 4C 45 A9 28 80 98 C9 CE |. VARIABLE.(....|
000004D0: D4 C5 C7 C5 D2 2D 20 29 FA AE 98 41 55 46 20 22 |.....- )...AUF "|
000004E0: 28 22 20 50 52 55 45 46 45 4E 98 20 54 45 53 54 |(" PRUEFEN. TEST|
000004F0: 45 4E 20 29 A6 B3 98 41 55 46 20 44 49 52 45 4B |EN )...AUF DIREK|
00000500: 54 4D 4F 44 55 53 98 20 50 52 55 45 46 45 4E 20 |TMODUS. PRUEFEN |
00000510: 29 E1 B3 98 C6 CE 2D 53 59 4E 54 41 58 30 0D 20 |).....-SYNTAX0. |
00000520: 29 FD AE 98 41 55 46 20 22 2C 22 20 50 52 55 45 |)...AUF "," PRUE|
00000530: 46 45 4E 80 20 53 54 52 49 4E 47 20 41 4C 53 20 |FEN. STRING ALS |
00000540: 46 55 4E 4B 54 49 4F 4E 20 44 45 46 49 4E 49 45 |FUNKTION DEFINIE|
00000550: 52 45 4E 06 29 00 C0 98 50 52 4F 47 52 41 4D 4D |REN.)...PROGRAMM|
00000560: 41 44 52 45 53 53 45 80 20 54 55 52 42 4F 2D 41 |ADRESSE. TURBO-A|
00000570: 53 53 20 4D 41 43 20 2B 80 20 20 20 20 20 20 20 |SS MAC +. |
00000580: 20 20 20 20 20 20 54 45 4C 45 46 4F 4E 20 28 30 | TELEFON (0|
00000590: 39 36 30 37 29 20 32 35 30 80 20 20 20 20 20 20 |9607) 250. |
000005A0: 20 20 20 20 20 20 20 38 34 38 31 20 4C 55 48 45 | 8481 LUHE|
000005B0: 2D 57 49 4C 44 45 4E 41 55 80 20 20 20 20 20 20 |-WILDENAU. |
000005C0: 20 20 20 20 20 20 20 42 41 48 4E 48 4F 46 53 54 | BAHNHOFST|
000005D0: 52 2E 20 32 33 80 20 28 43 29 20 31 39 38 37 20 |R. 23. (C) 1987 |
000005E0: 42 59 20 48 41 52 41 4C 44 20 53 43 48 4D 49 44 |BY HARALD SCHMID|
000005F0: 80 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 80 20 58 |. ===========. X|
00000600: 20 44 20 45 20 46 20 46 20 4E FF 54 55 52 42 4F | D E F F N.TURBO|
00000610: 00 0D 0D 00 1B 1C 20 21 00 11 00 00 00 14 00 00 |...... !........|
00000620: 20 00 D6 8E 09 94 08 94 8C 8D 09 94 92 09 94 93 | ...............|
00000630: 84 90 0C 07 91 8E 91 81 93 8F 8F 88 93 84 91 8A |................|
00000640: 83 81 83 83 90 8A 92 8B 8E CF 8F 89 CF 8C 8E 83 |................|
00000650: 93 92 92 8C 8A 81 8D 91 93 84 90 8E 88 83 8E 89 |................|
00000660: 83 81 90 8B 81 8F 93 8C D4 0F D0 8D 8E 81 83 8F |................|
00000670: 10 00 00 21 13 00 D4 8A 90 00 00 10 00 05 00 60 |...!...........`|
00000680: 0B 00 ED 02 EF FD FD 12 FF 10 FD 12 FF 10 FD 02 |................|
00000690: FF FD ED 12 EF 00 ED 12 FF 10 FD 02 FF 10 FD 9F |................|
000006A0: 0B B4 CD 12 EF 10 FD 12 FF 00 FD 12 FF 10 E5 EC |................|
000006B0: 0B 00 ED 02 EF 00 ED 12 FF 90 FD 12 FF 10 10 02 |................|
000006C0: EF 00 ED 02 ED 00 ED 12 FF 10 FD 17 FF 10 FD 10 |................|
000006D0: FF 10 ED 02 EF 00 ED 12 FF 10 FD 12 EF 10 FD 42 |...............B|
000006E0: 41 48 4E 48 4F 46 53 54 D2 43 48 4B 43 4F CD 4C |AHNHOFST.CHKCO.L|
000006F0: 4F 4F D0 4C 4F 4F 50 B1 4C 4F 4F 50 B2 50 4F 49 |OO.LOOP.LOOP.POI|
00000700: CE 54 41 42 41 44 D2 53 50 4C 4F 4F D0 50 54 4C |.TABAD.SPLOO.PTL|
00000710: 4F 4F D0 48 4C 50 4D 45 CD 58 44 46 4E 45 58 D4 |OO.HLPME.XDFNEX.|
00000720: 58 44 46 4E 58 D4 58 43 4C 52 46 CE 58 44 45 46 |XDFNX.XCLRF.XDEF|
00000730: 46 CE 44 46 4E 58 54 B2 53 45 4E 45 58 D4 54 45 |F.DFNXT.SENEX.TE|
00000740: 4E 45 58 D4 ED 00 CD F7 FF 10 FD 12 FF 10 FD FD |NEX.............|
00000750: DF FD CD 02 EF 00 ED 12 FF 10 FD 12 02 10 FD 02 |................|
00000760: CF 00 C5 02 C7 00 E5 12 FF 10 FD 12 FF 10 FD 00 |................|
00000770: E7 00 ED 02 EF DD ED 12 97 90 DD 92 97 80 14 FD |................|
00000780: 49 02 EF 00 ED FF FF 10 FD 12 FF 10 FD 12 FF 00 |I...............|
00000790: FD FF EF 10 ED 02 EF 10 FD 12 FF 00 FD 12 FF 5D |...............]|
000007A0: 49 F6 EF 10 ED 12 FF 10 FD 02 FF 10 FD 12 E7 E7 |I...............|
000007B0: CD 02 EF 00 ED 02 EF 10 FD 1A FF 10 FD 12 1A 00 |................|
000007C0: ED 02 EF 00 EF 02 EF 10 FD 12 FF 15 FD 12 FF 12 |................|
000007D0: FD 12 EF 00 ED 02 EF 10 FD 12 FF 10 ED 12 FF 00 |................|
000007E0: ED 02 E7 00 ED 02 6F 10 FD 12 FF 10 FD 12 FF 02 |......o.........|
000007F0: ED 02 EF 00 ED 12 EF 00 ED 02 EF 00 FD 02 5F 10 |.............._.|
00000800: ED 02 EF 00 FD 12 FF 10 FD 12 FF 10 FD 12 FF 00 |................|
00000810: FD 12 EF FD ED 02 EF 10 FD F7 FF ED F9 17 FB 10 |................|
00000820: ED 12 EF FD ED FF FF 12 FD EF FF 10 FD 12 EF 02 |................|
00000830: ED 02 EF 00 ED 02 EF 10 FD 12 FF 10 FD 12 EB 00 |................|
00000840: ED 02 CF 00 EF 02 CF F5 FD 12 FF 10 FD 12 FF FF |................|
00000850: DD FF CF 00 ED 02 EF 10 FD 12 FF 10 00 12 FF 00 |................|
00000860: CD 0A CF 08 CD 02 6F 10 FD 12 FF 10 FD 12 7F 0A |......o.........|
00000870: CD 0A 6F 40 ED DF EF 18 DD CA 5F C8 DD CB 16 FF |..o@......_.....|
00000880: 4B 00 ED 00 EF FD FD 12 FF 10 FD 12 FF 10 FD 02 |K...............|
00000890: FF FD ED 12 EF 00 ED 12 FF 10 FD 02 FF 10 FD DF |................|
000008A0: 4B B4 ED 12 EF 10 FD 12 FF 00 FD 12 FF 10 E5 E5 |K...............|
000008B0: EB 00 ED 02 EF 00 ED 12 FF B0 FD 12 FF 10 10 02 |................|
000008C0: EF 00 ED 02 ED 20 ED 12 FF 10 FD 17 FF 10 FD 10 |..... ..........|
000008D0: FF 10 ED 02 EF 00 ED 12 FF 10 FD 12 EF 10 FD 02 |................|
.K~...............N..Z..................
..........NM................
..........._.3456789012345._# _167890123
45._.3456789012345._.3456789012345......
........................0........M.O...O
...........O.............M.O.M..........
................0..(.. TABELLENZEIGER`.-
> RUECKSPRUNG.8.. = $000..(..TABELLENZEI
GER. STRINGS LOESCHEN. ALLE IN FUNKTION
EN UMGEWANDELTE. DEF FN-ROUTINEL)...-> N
ORMALEP8..J. UEBERTRAGEN.)... TABELLE0..
)...PUFFER IN. AKTUALISIEREN0..8..TABELL
ENZEIGERL)7.. MEMORY.(.. LANG -> OUT OF.
8..FUNKTION ZU.M8.. SETZEN..TABELLENZEIG
ER..(... SETZEN8.PUFFERZEIGER.(ZH. HOLEN
.({. VOM STACKH.PROGRAMMZEIGER )Y..({. C
ODE UMWANDELN.(Z. INTERPRETER-.(..STRING
INH.({. LEGENH. AUF STACK.(Z.PROGRAMMZE
IGER.)... ABSCHLIESSEN.(..TABELLE MIT $0
0.8... UEBERTRAGEN.)... PUFFER0..(..STRI
NG IN.. SETZEN.. PUFFERZEIGER0...STRING-
UNDL)7.. QUANTITY.(..ILLEGALP8..STRING
LEER ->.(G. HOLEN (..STRINGLAENGE.(..(GH
.(..(G. HOLEN (..STRINGADRESSE ).. (Y.VA
RIABLE SUCHENH. LEGEN.8.. AUF STAPELH. D
ER FUNKTION.(A.TABELLENADRESSEH.(G. STAP
EL LEGENH. ADRESSE AUF.(H.FN-VARIABLEN-.
LEGEN. AUF STAPELH.ERSTES ZEICHEN )...(
..AUF "=" PRUEFEN )...AUF ")" PRUEFEN. P
RUEFEN )...AUF NUMERISCH )...VARIABLE SU
CHEN. SPERREN.(.. VARIABLE.(..INTEGER- )
...AUF "(" PRUEFEN. TESTEN )...AUF DIREK
TMODUS. PRUEFEN )...FN-SYNTAX0. )...AUF
"," PRUEFEN. STRING ALS FUNKTION DEFINIE
REN.)...PROGRAMMADRESSE. TURBO-ASS MAC +
. TELEFON (09607) 250.
8481 LUHE-WILDENAU. B
AHNHOFSTR. 23. (C) 1987 BY HARALD SCHMID
. ===========. X D E F F N.TURBO...... !
........ .V.............................
.........O..O...........................
T.P........!..T........`................
..................M.....................
.......................................B
AHNHOFSTRCHKCOMLOOPLOOP.LOOP.POINTABADRS
PLOOPPTLOOPHLPMEMXDFNEXTXDFNXTXCLRFNXDEF
FNDFNXT.SENEXTTENEXT..M...........M.....
........O.E.G...........................
I..............................]I.......
........M...............................
......................O.................
......_.................................
..................................O...O.
..........O.............M.O.M.O........
M.O@.....J_H.K..K.......................
........K...............................
..... ..........................
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL