00000000: 01 1C 09 1C 01 00 89 31 30 00 13 1C 02 00 8A 39 |.......10......9|
00000010: 30 30 30 00 3B 1C 04 00 8F 20 4E 55 52 20 49 4E |000.;.... NUR IN|
00000020: 46 4F 52 4D 41 54 49 4F 4E 2C 20 44 41 52 55 4D |FORMATION, DARUM|
00000030: 20 49 47 4E 4F 52 49 45 52 45 4E 00 4A 1C 05 00 | IGNORIEREN.J...|
00000040: 8F 40 20 5C 49 47 4E 4F 52 45 00 76 1C 0A 00 99 |.@ \IGNORE.v....|
00000050: 22 93 11 0E 20 C4 49 45 53 20 49 53 54 20 45 49 |"... .IES IST EI|
00000060: 4E 45 20 C4 45 4D 4F 20 44 45 52 20 C1 55 54 4F |NE .EMO DER .UTO|
00000070: 4D 41 54 49 4B 2D 00 96 1C 0B 00 99 22 20 46 55 |MATIK-......" FU|
00000080: 4E 4B 54 49 4F 4E 20 44 45 53 20 C2 41 53 49 43 |NKTION DES .ASIC|
00000090: 2D C2 4F 53 53 2E 00 BF 1C 0C 00 99 22 20 C4 49 |-.OSS......." .I|
000000A0: 45 20 D2 4F 55 54 49 4E 45 20 41 42 20 DA 45 49 |E .OUTINE AB .EI|
000000B0: 4C 45 20 39 30 30 30 20 4B 41 4E 4E 20 49 4E 00 |LE 9000 KANN IN.|
000000C0: ED 1C 0D 00 99 22 20 4A 45 44 45 53 20 C2 41 53 |....." JEDES .AS|
000000D0: 49 43 2D D0 52 4F 47 52 41 4D 4D 20 45 49 4E 47 |IC-.ROGRAMM EING|
000000E0: 45 42 41 55 54 20 57 45 52 44 45 4E 2E 00 1A 1D |EBAUT WERDEN....|
000000F0: 0E 00 99 22 20 D7 45 4E 4E 20 53 49 45 20 4D 49 |..." .ENN SIE MI|
00000100: 54 20 D2 D5 CE 39 30 30 30 20 41 55 46 47 45 52 |T ...9000 AUFGER|
00000110: 55 46 45 4E 20 57 49 52 44 2C 00 41 1D 0F 00 99 |UFEN WIRD,.A....|
00000120: 22 20 44 41 4E 4E 20 57 49 52 44 20 44 49 45 53 |" DANN WIRD DIES|
00000130: 45 53 20 C2 41 53 49 43 2D D0 52 4F 47 52 41 4D |ES .ASIC-.ROGRAM|
00000140: 4D 00 6F 1D 10 00 99 22 20 41 42 47 45 53 50 45 |M.o...." ABGESPE|
00000150: 49 43 48 45 52 54 20 28 44 49 45 20 41 4C 54 45 |ICHERT (DIE ALTE|
00000160: 20 D6 45 52 53 49 4F 4E 20 42 4C 45 49 42 54 00 | .ERSION BLEIBT.|
00000170: 9B 1D 11 00 99 22 20 45 52 48 41 4C 54 45 4E 29 |....." ERHALTEN)|
00000180: 2C 20 44 45 52 20 C3 4F 4D 50 49 4C 45 52 20 47 |, DER .OMPILER G|
00000190: 45 4C 41 44 45 4E 2C 20 44 41 53 00 C6 1D 12 00 |ELADEN, DAS.....|
000001A0: 99 22 20 C2 41 53 49 43 2D D0 52 4F 47 52 41 4D |." .ASIC-.ROGRAM|
000001B0: 4D 20 4B 4F 4D 50 49 4C 49 45 52 54 2C 20 44 41 |M KOMPILIERT, DA|
000001C0: 4E 4E 20 44 41 53 00 EA 1D 13 00 99 22 20 C3 4F |NN DAS......" .O|
000001D0: 4D 50 49 4C 41 54 20 47 45 4C 41 44 45 4E 20 55 |MPILAT GELADEN U|
000001E0: 4E 44 20 4D 49 54 20 D2 D5 CE 00 FC 1D 14 00 99 |ND MIT .........|
000001F0: 22 20 47 45 53 54 41 52 54 45 54 2E 00 25 1E 15 |" GESTARTET..%..|
00000200: 00 99 22 20 C4 45 52 20 CE 41 4D 45 20 44 45 53 |.." .ER .AME DES|
00000210: 20 D1 55 45 4C 4C 50 52 4F 47 52 41 4D 4D 53 20 | .UELLPROGRAMMS |
00000220: 53 54 45 48 54 00 4D 1E 16 00 99 22 20 49 4E 20 |STEHT.M...." IN |
00000230: 53 24 2C 20 44 45 52 20 44 45 53 20 D3 43 48 4C |S$, DER DES .CHL|
00000240: 55 53 53 50 52 4F 47 52 41 4D 4D 45 53 00 77 1E |USSPROGRAMMES.w.|
00000250: 17 00 99 22 20 49 4E 20 4C 24 20 28 45 53 20 4D |..." IN L$ (ES M|
00000260: 55 53 53 20 4E 49 43 48 54 20 55 4E 42 45 44 49 |USS NICHT UNBEDI|
00000270: 4E 47 54 20 44 41 53 00 98 1E 18 00 99 22 20 C3 |NGT DAS......" .|
00000280: 4F 4D 50 49 4C 41 54 20 47 45 4C 41 44 45 4E 20 |OMPILAT GELADEN |
00000290: 57 45 52 44 45 4E 29 2E 00 C0 1E 19 00 99 22 11 |WERDEN).......".|
000002A0: 20 C7 45 42 45 4E 20 D3 49 45 20 44 4F 43 48 20 | .EBEN .IE DOCH |
000002B0: 4D 41 4C 20 27 52 55 4E 32 27 20 45 49 4E 20 21 |MAL 'RUN2' EIN !|
000002C0: 00 E9 1E 1A 00 99 22 20 28 C4 45 52 20 C2 41 53 |......" (.ER .AS|
000002D0: 49 43 2D C2 4F 53 53 20 4D 55 53 53 20 53 49 43 |IC-.OSS MUSS SIC|
000002E0: 48 20 41 55 46 20 44 45 52 00 11 1F 1B 00 99 22 |H AUF DER......"|
000002F0: 20 20 45 49 4E 47 45 4C 45 47 54 45 4E 20 C4 49 | EINGELEGTEN .I|
00000300: 53 4B 45 54 54 45 20 42 45 46 49 4E 44 45 4E 2E |SKETTE BEFINDEN.|
00000310: 29 00 17 1F 5A 00 80 00 1D 1F 62 00 3A 00 3C 1F |)...Z.....b.:.<.|
00000320: 63 00 8F 20 4A 45 54 5A 54 20 4B 4F 4D 4D 54 20 |c.. JETZT KOMMT |
00000330: 44 41 53 20 50 52 4F 47 52 41 4D 4D 00 48 1F 64 |DAS PROGRAMM.H.d|
00000340: 00 8F 40 20 5C 55 53 45 00 72 1F 6E 00 99 22 0E |..@ \USE.r.n..".|
00000350: 11 C4 49 45 53 45 53 20 C3 4F 4D 50 49 4C 41 54 |..IESES .OMPILAT|
00000360: 20 57 55 52 44 45 20 41 55 54 4F 4D 41 54 49 53 | WURDE AUTOMATIS|
00000370: 43 48 00 81 1F 78 00 99 22 45 52 5A 45 55 47 54 |CH...x.."ERZEUGT|
00000380: 2E 00 A9 1F 7D 00 99 22 11 11 20 C1 42 42 52 55 |....}..".. .BBRU|
00000390: 43 48 20 4D 49 54 20 D2 55 4E 2D D3 54 4F 50 2F |CH MIT .UN-.TOP/|
000003A0: D2 45 53 54 4F 52 45 20 21 00 B9 1F 81 00 8F 20 |.ESTORE !...... |
000003B0: 53 50 49 45 4C 45 52 45 49 00 C5 1F 82 00 8F 40 |SPIELEREI......@|
000003C0: 20 5F 53 45 49 00 DB 1F 8C 00 97 35 33 32 38 30 | _SEI......53280|
000003D0: 2C 31 3A 97 35 33 32 38 30 2C 30 00 ED 1F 96 00 |,1:.53280,0.....|
000003E0: 97 35 33 32 38 30 2C 33 3A 89 31 34 30 00 F3 1F |.53280,3:.140...|
000003F0: 84 03 80 00 F9 1F 26 23 3A 00 FF 1F 27 23 3A 00 |......&#:...'#:.|
00000400: 42 20 28 23 8F 20 48 49 4C 46 53 52 4F 55 54 49 |B (#. HILFSROUTI|
00000410: 4E 45 20 57 49 52 44 20 4E 49 43 48 54 20 49 4E |NE WIRD NICHT IN|
00000420: 53 20 20 20 20 20 20 20 20 20 20 20 20 20 43 4F |S CO|
00000430: 4D 50 49 4C 41 54 20 55 45 42 45 52 4E 4F 4D 4D |MPILAT UEBERNOMM|
00000440: 45 4E 00 51 20 32 23 8F 40 20 5C 49 47 4E 4F 52 |EN.Q 2#.@ \IGNOR|
00000450: 45 00 57 20 3C 23 3A 00 75 20 46 23 8F 20 4E 41 |E.W <#:.u F#. NA|
00000460: 4D 45 20 44 45 53 20 42 41 53 49 43 50 52 4F 47 |ME DES BASICPROG|
00000470: 52 41 4D 4D 53 00 83 20 50 23 53 24 B2 22 50 52 |RAMMS.. P#S$."PR|
00000480: 4F 47 22 00 A3 20 5A 23 8F 20 4E 41 4D 45 20 44 |OG".. Z#. NAME D|
00000490: 45 53 20 53 43 48 4C 55 53 53 50 52 4F 47 52 41 |ES SCHLUSSPROGRA|
000004A0: 4D 4D 53 00 B2 20 64 23 4C 24 B2 22 2B 50 52 4F |MMS.. d#L$."+PRO|
000004B0: 47 22 00 B8 20 6E 23 3A 00 C5 20 78 23 9F 31 35 |G".. n#:.. x#.15|
000004C0: 2C 38 2C 31 35 00 E1 20 82 23 8F 20 55 52 41 4C |,8,15.. .#. URAL|
000004D0: 54 45 20 44 41 54 45 49 20 4C 4F 45 53 43 48 45 |TE DATEI LOESCHE|
000004E0: 4E 00 F2 20 8C 23 98 31 35 2C 22 53 3A 2F 22 AA |N.. .#.15,"S:/".|
000004F0: 53 24 00 0E 21 96 23 8F 20 41 4C 54 45 20 44 41 |S$..!.#. ALTE DA|
00000500: 54 45 49 20 55 4D 42 45 4E 45 4E 4E 45 4E 00 26 |TEI UMBENENNEN.&|
00000510: 21 A0 23 98 31 35 2C 22 52 3A 2F 22 AA 53 24 AA |!.#.15,"R:/".S$.|
00000520: 22 3D 22 AA 53 24 00 2E 21 AA 23 A0 31 35 00 51 |"=".S$..!.#.15.Q|
00000530: 21 AB 23 8F 20 41 4B 54 55 45 4C 4C 45 53 20 50 |!.#. AKTUELLES P|
00000540: 52 4F 47 52 41 4D 4D 20 53 50 45 49 43 48 45 52 |ROGRAMM SPEICHER|
00000550: 4E 00 5C 21 AC 23 94 20 53 24 2C 38 00 69 21 AE |N.\!.#. S$,8.i!.|
00000560: 23 9F 31 35 2C 38 2C 31 35 00 7A 21 B0 23 84 31 |#.15,8,15.z!.#.1|
00000570: 35 2C 41 2C 42 24 2C 43 2C 44 00 90 21 B1 23 8B |5,A,B$,C,D..!.#.|
00000580: 20 41 20 A7 20 99 41 3B 42 24 3B 43 3B 44 3A 80 | A . .A;B$;C;D:.|
00000590: 00 96 21 B4 23 3A 00 A8 21 BE 23 8F 20 41 55 54 |..!.#:..!.#. AUT|
000005A0: 4F 4B 45 4E 4E 55 4E 47 00 C0 21 C8 23 97 31 30 |OKENNUNG..!.#.10|
000005B0: 30 30 2C 31 32 33 3A 97 31 30 30 31 2C 32 33 34 |00,123:.1001,234|
000005C0: 00 C6 21 D2 23 3A 00 E6 21 DC 23 8F 20 42 45 53 |..!.#:..!.#. BES|
000005D0: 54 49 4D 4D 55 4E 47 20 44 45 52 20 51 55 45 4C |TIMMUNG DER QUEL|
000005E0: 4C 44 41 54 45 49 00 FE 21 E6 23 97 31 30 30 32 |LDATEI..!.#.1002|
000005F0: 2C 38 20 20 20 3A 8F 20 47 45 52 41 45 54 00 20 |,8 :. GERAET. |
00000600: 22 F0 23 97 31 30 30 33 2C 30 20 20 20 3A 8F 20 |".#.1003,0 :. |
00000610: 53 45 4B 55 4E 44 41 45 52 41 44 52 45 53 53 45 |SEKUNDAERADRESSE|
00000620: 00 3F 22 FA 23 97 31 30 30 34 2C C3 28 53 24 29 |.?".#.1004,.(S$)|
00000630: 20 3A 8F 20 4E 41 4D 45 4E 4C 41 45 4E 47 45 00 | :. NAMENLAENGE.|
00000640: 57 22 04 24 81 49 B2 31 A4 C3 28 53 24 29 20 20 |W".$.I.1..(S$) |
00000650: 3A 8F 20 4E 41 4D 45 00 73 22 0E 24 97 31 30 30 |:. NAME.s".$.100|
00000660: 34 AA 49 2C C6 28 CA 28 53 24 2C 49 2C 31 29 29 |4.I,.(.(S$,I,1))|
00000670: 3A 82 49 00 79 22 18 24 3A 00 9D 22 22 24 8F 20 |:.I.y".$:..""$. |
00000680: 42 45 53 54 49 4D 4D 55 4E 47 20 44 45 53 20 53 |BESTIMMUNG DES S|
00000690: 43 48 4C 55 53 53 50 52 4F 47 52 4D 53 00 B5 22 |CHLUSSPROGRMS.."|
000006A0: 2C 24 97 39 30 30 2C 38 20 20 20 20 3A 8F 20 47 |,$.900,8 :. G|
000006B0: 45 52 41 45 54 00 D7 22 36 24 97 39 30 31 2C 30 |ERAET.."6$.901,0|
000006C0: 20 20 20 20 3A 8F 20 53 45 4B 55 4E 44 41 45 52 | :. SEKUNDAER|
000006D0: 41 44 52 45 53 53 45 00 F6 22 40 24 97 39 30 32 |ADRESSE.."@$.902|
000006E0: 2C C3 28 4C 24 29 20 20 3A 8F 20 4E 41 4D 45 4E |,.(L$) :. NAMEN|
000006F0: 4C 41 45 4E 47 45 00 0E 23 4A 24 81 49 B2 31 A4 |LAENGE..#J$.I.1.|
00000700: C3 28 4C 24 29 20 20 3A 8F 20 4E 41 4D 45 00 29 |.(L$) :. NAME.)|
00000710: 23 54 24 97 39 30 32 AA 49 2C C6 28 CA 28 4C 24 |#T$.902.I,.(.(L$|
00000720: 2C 49 2C 31 29 29 3A 82 49 00 2F 23 5E 24 3A 00 |,I,1)):.I./#^$:.|
00000730: 45 23 5F 24 8F 20 42 41 53 49 43 42 4F 53 53 20 |E#_$. BASICBOSS |
00000740: 4C 41 44 45 4E 00 59 23 60 24 93 22 42 41 53 49 |LADEN.Y#`$."BASI|
00000750: 43 2D 42 4F 53 53 22 2C 38 00 77 23 63 24 8F 20 |C-BOSS",8.w#c$. |
00000760: 52 45 53 54 20 57 49 45 44 45 52 20 43 4F 4D 50 |REST WIEDER COMP|
00000770: 49 4C 49 45 52 45 4E 00 83 23 68 24 8F 40 20 5C |ILIEREN..#h$.@ \|
00000780: 55 53 45 00 00 00 |USE... |
.......10......9000.;.... NUR INFORMATIO
N, DARUM IGNORIEREN.J....@ \IGNORE.V....
"... DIES IST EINE DEMO DER AUTOMATIK-..
...." FUNKTION DES BASIC-BOSS......." DI
E ROUTINE AB ZEILE 9000 KANN IN......" J
EDES BASIC-PROGRAMM EINGEBAUT WERDEN....
..." WENN SIE MIT RUN9000 AUFGERUFEN WIR
D,.A...." DANN WIRD DIESES BASIC-PROGRAM
M.O...." ABGESPEICHERT (DIE ALTE VERSION
BLEIBT......" ERHALTEN), DER COMPILER G
ELADEN, DAS.F...." BASIC-PROGRAMM KOMPIL
IERT, DANN DAS......" COMPILAT GELADEN U
ND MIT RUN......" GESTARTET..%...." DER
NAME DES QUELLPROGRAMMS STEHT.M...." IN
S$, DER DES SCHLUSSPROGRAMMES.W...." IN
L$ (ES MUSS NICHT UNBEDINGT DAS......" C
OMPILAT GELADEN WERDEN).......". GEBEN S
IE DOCH MAL 'RUN2' EIN !......" (DER BAS
IC-BOSS MUSS SICH AUF DER......" EINGEL
EGTEN DISKETTE BEFINDEN.)...Z.....B.:.<.
C.. JETZT KOMMT DAS PROGRAMM.H.D..@ \USE
.R.N.."..DIESES COMPILAT WURDE AUTOMATIS
CH...X.."ERZEUGT....}..".. ABBRUCH MIT R
UN-STOP/RESTORE !...... SPIELEREI.E....@
_SEI......53280,1:.53280,0......53280,3
:.140.........&#:...'#:.B (#. HILFSROUTI
NE WIRD NICHT INS COMPILAT U
EBERNOMMEN.Q 2#.@ \IGNORE.W <#:.U F#. NA
ME DES BASICPROGRAMMS.. P#S$."PROG".. Z#
. NAME DES SCHLUSSPROGRAMMS.. D#L$."+PRO
G".. N#:.E X#.15,8,15.. .#. URALTE DATEI
LOESCHEN.. .#.15,"S:/".S$..!.#. ALTE DA
TEI UMBENENNEN.&! #.15,"R:/".S$."=".S$..
!.# 15.Q!.#. AKTUELLES PROGRAMM SPEICHER
N.\!.#. S$,8.I!.#.15,8,15.Z!.#.15,A,B$,C
,D..!.#. A . .A;B$;C;D:...!.#:..!.#. AUT
OKENNUNG..!H#.1000,123:.1001,234.F!R#:..
!.#. BESTIMMUNG DER QUELLDATEI..!.#.1002
,8 :. GERAET. ".#.1003,0 :. SEKUNDAE
RADRESSE.?".#.1004,C(S$) :. NAMENLAENGE.
W".$.I.1.C(S$) :. NAME.S".$.1004.I,F(J(
S$,I,1)):.I.Y".$:..""$. BESTIMMUNG DES S
CHLUSSPROGRMS..",$.900,8 :. GERAET.W"
6$.901,0 :. SEKUNDAERADRESSE.."@$.902
,C(L$) :. NAMENLAENGE..#J$.I.1.C(L$) :
. NAME.)#T$.902.I,F(J(L$,I,1)):.I./#^$:.
E#_$. BASICBOSS LADEN.Y#`$."BASIC-BOSS",
8.W#C$. REST WIEDER COMPILIEREN..#H$.@ \
USE...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL