> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 34 08 08 00 99 C7 28 31 34 29 3A 99 22 93 |..4.....(14):.".|
00000010: 11 20 20 20 20 20 20 20 D4 C5 D8 D4 2D 54 4F 2D |. ....-TO-|
00000020: C2 C1 D3 C9 C3 A0 43 4F 4E 56 45 52 53 49 4F 4E |......CONVERSION|
00000030: 11 11 11 22 00 63 08 09 00 99 22 D4 48 49 53 20 |...".c....".HIS |
00000040: 50 52 4F 47 52 41 4D 20 54 41 4B 45 53 20 41 20 |PROGRAM TAKES A |
00000050: 44 49 53 4B 20 46 49 4C 45 20 4F 46 20 C2 C1 D3 |DISK FILE OF ...|
00000060: C9 C3 22 00 90 08 0A 00 99 22 53 54 41 54 45 4D |.."......"STATEM|
00000070: 45 4E 54 53 20 49 4E 20 54 45 58 54 20 46 4F 52 |ENTS IN TEXT FOR|
00000080: 4D 2C 20 41 4E 44 20 43 4F 4E 56 45 52 54 53 22 |M, AND CONVERTS"|
00000090: 00 D0 08 0B 00 99 22 49 54 20 49 4E 54 4F 20 C3 |......"IT INTO .|
000000A0: C2 CD 20 49 4E 54 45 52 4E 41 4C 20 28 54 4F 4B |.. INTERNAL (TOK|
000000B0: 45 4E 49 5A 45 44 29 20 46 4F 52 4D 20 20 20 52 |ENIZED) FORM R|
000000C0: 45 41 44 59 20 54 4F 20 42 45 20 52 55 4E 2E 22 |EADY TO BE RUN."|
000000D0: 00 FE 08 0C 00 99 22 11 D4 48 49 53 20 57 41 59 |......"..HIS WAY|
000000E0: 2C 20 50 52 4F 47 52 41 4D 53 20 4D 41 59 20 42 |, PROGRAMS MAY B|
000000F0: 45 20 54 52 41 4E 53 46 45 52 52 45 44 22 00 2A |E TRANSFERRED".*|
00000100: 09 0D 00 99 22 46 52 4F 4D 20 4F 54 48 45 52 20 |...."FROM OTHER |
00000110: 4D 41 43 48 49 4E 45 53 2C 20 57 48 49 43 48 20 |MACHINES, WHICH |
00000120: 4D 41 59 20 55 53 45 20 41 22 00 4A 09 0E 00 99 |MAY USE A".J....|
00000130: 22 44 49 46 46 45 52 45 4E 54 20 49 4E 54 45 52 |"DIFFERENT INTER|
00000140: 4E 41 4C 20 46 4F 52 4D 2E 22 00 78 09 0F 00 99 |NAL FORM.".x....|
00000150: 22 11 C1 4C 53 4F 2C 20 49 46 20 59 4F 55 20 48 |"..LSO, IF YOU H|
00000160: 41 56 45 20 41 20 47 4F 4F 44 20 54 45 58 54 20 |AVE A GOOD TEXT |
00000170: 45 44 49 54 4F 52 2C 22 00 A5 09 10 00 99 22 49 |EDITOR,"......"I|
00000180: 54 20 4D 41 59 20 42 45 20 55 53 45 44 20 54 4F |T MAY BE USED TO|
00000190: 20 44 4F 20 45 58 54 45 4E 53 49 56 45 20 45 44 | DO EXTENSIVE ED|
000001A0: 49 54 53 20 22 00 CF 09 11 00 99 22 4F 46 20 42 |ITS "......"OF B|
000001B0: 41 53 49 43 20 50 52 4F 47 52 41 4D 53 20 2D 20 |ASIC PROGRAMS - |
000001C0: 42 59 20 CC C9 D3 D4 49 4E 47 20 54 48 45 22 00 |BY ....ING THE".|
000001D0: FE 09 12 00 99 22 50 52 4F 47 52 41 4D 20 54 4F |....."PROGRAM TO|
000001E0: 20 41 20 44 49 53 4B 20 46 49 4C 45 2C 20 45 44 | A DISK FILE, ED|
000001F0: 49 54 49 4E 47 20 41 53 20 54 45 58 54 22 00 2D |ITING AS TEXT".-|
00000200: 0A 13 00 99 22 41 4E 44 20 54 48 45 4E 20 52 45 |...."AND THEN RE|
00000210: 53 54 4F 52 49 4E 47 20 54 4F 20 C3 C2 CD 20 49 |STORING TO ... I|
00000220: 4E 54 45 52 4E 41 4C 20 46 4F 52 4D 22 00 66 0A |NTERNAL FORM".f.|
00000230: 14 00 99 22 11 20 20 20 20 20 2E 2E 2E C8 49 54 |...". ....IT|
00000240: 20 41 4E 59 20 4B 45 59 20 54 4F 20 43 4F 4E 54 | ANY KEY TO CONT|
00000250: 49 4E 55 45 2E 2E 2E 22 3A 97 31 39 38 2C 30 3A |INUE...":.198,0:|
00000260: 92 31 39 38 2C 31 00 93 0A 15 00 99 22 93 C1 20 |.198,1......".. |
00000270: 4D 41 43 48 49 4E 45 2D 4C 41 4E 47 55 41 47 45 |MACHINE-LANGUAGE|
00000280: 20 52 4F 55 54 49 4E 45 20 49 53 20 CC CF C1 C4 | ROUTINE IS ....|
00000290: 45 44 22 00 C2 0A 16 00 99 22 54 4F 20 44 4F 20 |ED"......"TO DO |
000002A0: 54 48 45 20 57 4F 52 4B 2E 20 20 C9 54 20 52 45 |THE WORK. .T RE|
000002B0: 41 44 53 20 41 20 D3 C5 D1 A0 46 49 4C 45 20 54 |ADS A ....FILE T|
000002C0: 4F 22 00 EF 0A 17 00 99 22 D2 C1 CD 20 28 41 42 |O"......"... (AB|
000002D0: 4F 56 45 20 41 4E 59 20 43 55 52 52 45 4E 54 4C |OVE ANY CURRENTL|
000002E0: 59 20 4C 4F 41 44 45 44 20 C2 C1 D3 C9 C3 22 00 |Y LOADED .....".|
000002F0: 1C 0B 18 00 99 22 50 52 4F 47 52 41 4D 2C 20 50 |....."PROGRAM, P|
00000300: 4C 41 43 45 53 20 45 41 43 48 20 53 54 41 54 45 |LACES EACH STATE|
00000310: 4D 45 4E 54 20 4F 4E 20 54 48 45 22 00 4A 0B 19 |MENT ON THE".J..|
00000320: 00 99 22 53 43 52 45 45 4E 2C 20 41 4E 44 20 53 |.."SCREEN, AND S|
00000330: 49 4D 55 4C 41 54 45 53 20 D2 C5 D4 D5 D2 CE 2E |IMULATES .......|
00000340: 20 20 D4 48 49 53 20 49 53 22 00 78 0B 1A 00 99 | .HIS IS".x....|
00000350: 22 54 48 45 20 54 45 43 48 4E 49 51 55 45 20 44 |"THE TECHNIQUE D|
00000360: 45 53 43 52 49 42 45 44 20 49 4E 20 54 48 45 20 |ESCRIBED IN THE |
00000370: CE 4F 56 2F C4 45 43 22 00 A5 0B 1B 00 99 22 D4 |.OV/.EC"......".|
00000380: CF D2 D0 C5 D4 20 2D 20 45 58 43 45 50 54 20 54 |..... - EXCEPT T|
00000390: 48 41 54 20 54 48 45 20 46 49 4C 45 20 49 53 20 |HAT THE FILE IS |
000003A0: 52 45 41 44 22 00 CF 0B 1C 00 99 22 4F 4E 4C 59 |READ"......"ONLY|
000003B0: 20 4F 4E 43 45 2C 20 41 4E 44 20 54 48 45 20 43 | ONCE, AND THE C|
000003C0: 4F 4E 56 45 52 54 20 50 52 4F 47 52 41 4D 22 00 |ONVERT PROGRAM".|
000003D0: FE 0B 1D 00 99 22 44 4F 45 53 20 4E 4F 54 20 42 |....."DOES NOT B|
000003E0: 45 43 4F 4D 45 20 50 41 52 54 20 4F 46 20 54 48 |ECOME PART OF TH|
000003F0: 45 20 45 4E 44 20 50 52 4F 44 55 43 54 22 00 2B |E END PRODUCT".+|
00000400: 0C 1E 00 99 22 11 C9 46 20 54 48 45 20 52 4F 55 |...."..F THE ROU|
00000410: 54 49 4E 45 20 49 53 20 55 53 45 44 20 57 48 49 |TINE IS USED WHI|
00000420: 4C 45 20 41 20 C2 C1 D3 C9 C3 22 00 57 0C 1F 00 |LE A .....".W...|
00000430: 99 22 50 52 4F 47 52 41 4D 20 49 53 20 49 4E 20 |."PROGRAM IS IN |
00000440: 4D 45 4D 4F 52 59 3B 20 54 48 45 20 53 54 41 54 |MEMORY; THE STAT|
00000450: 45 4D 45 4E 54 53 22 00 86 0C 20 00 99 22 46 52 |EMENTS"... .."FR|
00000460: 4F 4D 20 54 48 45 20 44 49 53 4B 20 46 49 4C 45 |OM THE DISK FILE|
00000470: 20 41 52 45 20 54 48 45 4E 20 4D 45 52 47 45 44 | ARE THEN MERGED|
00000480: 20 49 4E 54 4F 22 00 B3 0C 21 00 99 22 49 54 2E | INTO"...!.."IT.|
00000490: 20 20 20 D4 48 49 53 20 43 4F 55 4C 44 20 42 45 | .HIS COULD BE|
000004A0: 20 48 41 4E 44 59 20 46 4F 52 20 55 53 49 4E 47 | HANDY FOR USING|
000004B0: 20 41 22 00 E0 0C 22 00 99 22 53 45 54 20 4F 46 | A"...".."SET OF|
000004C0: 20 53 54 41 4E 44 41 52 44 20 53 55 42 52 4F 55 | STANDARD SUBROU|
000004D0: 54 49 4E 45 53 20 54 4F 20 42 55 49 4C 44 20 22 |TINES TO BUILD "|
000004E0: 00 F1 0C 23 00 99 22 50 52 4F 47 52 41 4D 53 2E |...#.."PROGRAMS.|
000004F0: 22 00 1C 0D 24 00 99 22 11 90 CE CF D4 C5 3A 9A |"...$.."......:.|
00000500: 20 C9 46 20 59 4F 55 20 4D 41 4B 45 20 41 20 4D | .F YOU MAKE A M|
00000510: 49 53 54 41 4B 45 20 57 48 45 4E 22 00 47 0D 25 |ISTAKE WHEN".G.%|
00000520: 00 99 22 50 52 4F 4D 50 54 45 44 20 46 4F 52 20 |.."PROMPTED FOR |
00000530: 54 48 45 20 46 49 4C 45 20 4E 41 4D 45 2C 20 54 |THE FILE NAME, T|
00000540: 48 45 20 C4 C5 CC 22 00 73 0D 26 00 99 22 4B 45 |HE ...".s.&.."KE|
00000550: 59 20 4D 41 59 20 42 45 20 55 53 45 44 20 54 4F |Y MAY BE USED TO|
00000560: 20 52 45 43 4F 56 45 52 2E 20 20 D2 45 53 54 41 | RECOVER. .ESTA|
00000570: 52 54 22 00 A0 0D 27 00 99 22 41 4E 59 20 54 49 |RT"...'.."ANY TI|
00000580: 4D 45 20 57 49 54 48 20 41 20 D3 D9 D3 34 39 31 |ME WITH A ...491|
00000590: 35 32 20 28 49 45 2E 20 24 C3 30 30 30 29 2E 22 |52 (IE. $.000)."|
000005A0: 00 CC 0D 28 00 99 22 11 90 D7 41 4E 54 20 54 4F |...(.."...ANT TO|
000005B0: 20 CC CF C1 C4 A0 41 4E 44 20 D2 D5 CE A0 54 48 | .....AND ....TH|
000005C0: 45 20 52 4F 55 54 49 4E 45 3F 9A 22 00 03 0E 29 |E ROUTINE?."...)|
000005D0: 00 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 3A A1 |..198,0:.198,1:.|
000005E0: 41 24 3A 8F 20 50 52 4F 4D 50 54 20 57 49 54 48 |A$:. PROMPT WITH|
000005F0: 4F 55 54 20 53 43 52 45 45 4E 20 53 50 41 52 4B |OUT SCREEN SPARK|
00000600: 4C 45 2E 00 12 0E 2A 00 8B 41 24 B2 22 4E 22 A7 |LE....*..A$."N".|
00000610: 20 80 00 22 0E 2B 00 8B 41 24 B3 B1 22 59 22 A7 | ..".+..A$.."Y".|
00000620: 34 31 00 4D 0E 2C 00 99 22 93 4C 4F 41 44 22 C7 |41.M.,..".LOAD".|
00000630: 28 33 34 29 22 46 49 4C 45 20 43 4F 4E 56 45 52 |(34)"FILE CONVER|
00000640: 54 22 C7 28 33 34 29 22 2C 38 2C 31 22 00 5D 0E |T".(34)",8,1".].|
00000650: 2D 00 99 22 11 11 11 11 11 52 55 4E 22 00 88 0E |-..".....RUN"...|
00000660: 2F 00 97 36 33 31 2C 31 39 3A 97 36 33 32 2C 31 |/..631,19:.632,1|
00000670: 33 3A 97 36 33 33 2C 31 33 3A 97 36 33 34 2C 31 |3:.633,13:.634,1|
00000680: 33 3A 97 31 39 38 2C 34 00 00 00 |3:.198,4... |
..4....G(14):.".. TEXT-TO-BASIC CO
NVERSION...".C...."THIS PROGRAM TAKES A
DISK FILE OF BASIC"......"STATEMENTS IN
TEXT FORM, AND CONVERTS".P...."IT INTO C
BM INTERNAL (TOKENIZED) FORM READY TO
BE RUN."......".THIS WAY, PROGRAMS MAY B
E TRANSFERRED".*...."FROM OTHER MACHINES
, WHICH MAY USE A".J...."DIFFERENT INTER
NAL FORM.".X....".ALSO, IF YOU HAVE A GO
OD TEXT EDITOR,"......"IT MAY BE USED TO
DO EXTENSIVE EDITS ".O...."OF BASIC PRO
GRAMS - BY LISTING THE"......"PROGRAM TO
A DISK FILE, EDITING AS TEXT".-...."AND
THEN RESTORING TO CBM INTERNAL FORM".F.
...". ...HIT ANY KEY TO CONTINUE..."
:.198,0:.198,1......".A MACHINE-LANGUAGE
ROUTINE IS LOADED".B...."TO DO THE WORK
. IT READS A SEQ FILE TO"......"RAM (AB
OVE ANY CURRENTLY LOADED BASIC"......"PR
OGRAM, PLACES EACH STATEMENT ON THE".J..
.."SCREEN, AND SIMULATES RETURN. THIS I
S".X...."THE TECHNIQUE DESCRIBED IN THE
NOV/DEC"......"TORPET - EXCEPT THAT THE
FILE IS READ".O...."ONLY ONCE, AND THE C
ONVERT PROGRAM"......"DOES NOT BECOME PA
RT OF THE END PRODUCT".+....".IF THE ROU
TINE IS USED WHILE A BASIC".W...."PROGRA
M IS IN MEMORY; THE STATEMENTS"... .."FR
OM THE DISK FILE ARE THEN MERGED INTO"..
.!.."IT. THIS COULD BE HANDY FOR USING
A"...".."SET OF STANDARD SUBROUTINES TO
BUILD "...#.."PROGRAMS."...$.."..NOTE:.
IF YOU MAKE A MISTAKE WHEN".G.%.."PROMP
TED FOR THE FILE NAME, THE DEL".S.&.."KE
Y MAY BE USED TO RECOVER. RESTART". .'.
."ANY TIME WITH A SYS49152 (IE. $C000)."
.L.(.."..WANT TO LOAD AND RUN THE ROUTIN
E?."...)..198,0:.198,1:.A$:. PROMPT WITH
OUT SCREEN SPARKLE....*..A$."N". ..".+..
A$.."Y".41.M.,..".LOAD"G(34)"FILE CONVER
T"G(34)",8,1".].-..".....RUN".../..631,1
9:.632,13:.633,13:.634,13:.198,4...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL