00000000: DA 04 EE 04 0A 05 00 0A 1D 00 20 53 41 56 45 20 |.......... SAVE |
00000010: 22 40 30 3A 42 41 53 49 43 27 54 4F 27 43 4F 4D |"@0:BASIC'TO'COM|
00000020: 41 4C 22 00 14 04 00 00 1E 24 00 54 48 45 20 42 |AL"......$.THE B|
00000030: 41 53 49 43 20 50 52 4F 47 52 41 4D 20 4D 55 53 |ASIC PROGRAM MUS|
00000040: 54 20 42 45 20 4C 49 53 54 45 44 00 28 23 00 54 |T BE LISTED.(#.T|
00000050: 4F 20 54 48 45 20 44 49 53 4B 20 46 49 52 53 54 |O THE DISK FIRST|
00000060: 2E 20 54 48 49 53 20 50 52 4F 47 52 41 4D 00 32 |. THIS PROGRAM.2|
00000070: 22 00 57 49 4C 4C 20 52 45 41 44 20 49 4E 20 54 |".WILL READ IN T|
00000080: 48 45 20 42 41 53 49 43 20 50 52 4F 47 52 41 4D |HE BASIC PROGRAM|
00000090: 00 3C 21 00 41 4E 44 20 57 52 49 54 45 20 49 54 |.<!.AND WRITE IT|
000000A0: 20 42 41 43 4B 20 54 4F 20 54 48 45 20 53 41 4D | BACK TO THE SAM|
000000B0: 45 00 46 24 00 44 49 53 4B 20 57 49 54 48 20 54 |E.F$.DISK WITH T|
000000C0: 48 45 20 53 41 4D 45 20 46 49 4C 45 4E 41 4D 45 |HE SAME FILENAME|
000000D0: 2B 22 2E 43 22 00 50 04 00 00 5A 1D 00 20 20 20 |+".C".P...Z.. |
000000E0: 20 B0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 | ...............|
000000F0: C0 C0 C0 C0 C0 AE 00 64 1D 00 20 20 20 20 DD 48 |.......d.. .H|
00000100: 4F 57 20 54 4F 20 4C 49 53 54 20 41 20 42 41 53 |OW TO LIST A BAS|
00000110: 49 43 DD 00 6E 1D 00 20 20 20 20 DD 50 52 4F 47 |IC..n.. .PROG|
00000120: 52 41 4D 20 54 4F 20 54 48 45 20 44 49 53 4B DD |RAM TO THE DISK.|
00000130: 00 78 1D 00 20 20 20 20 AD C0 C0 C0 C0 C0 C0 C0 |.x.. ........|
00000140: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 BD 00 82 04 |................|
00000150: 00 00 8C 23 00 20 20 46 52 4F 4D 20 42 41 53 49 |...#. FROM BASI|
00000160: 43 2C 20 4C 4F 41 44 20 54 48 45 20 50 52 4F 47 |C, LOAD THE PROG|
00000170: 52 41 4D 2E 00 96 0A 00 20 54 59 50 45 3A 00 A0 |RAM..... TYPE:..|
00000180: 2B 00 20 20 4F 50 45 4E 38 2C 38 2C 38 2C 22 40 |+. OPEN8,8,8,"@|
00000190: 30 3A 46 49 4C 45 4E 41 4D 45 2C 53 2C 57 22 3A |0:FILENAME,S,W":|
000001A0: 43 4D 44 38 3A 4C 49 53 54 00 AA 04 00 00 B4 1C |CMD8:LIST.......|
000001B0: 00 20 20 20 20 B0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |. ...........|
000001C0: C0 C0 C0 C0 C0 C0 C0 C0 AE 00 BE 1C 00 20 20 20 |............. |
000001D0: 20 DD 48 4F 57 20 54 4F 20 45 4E 54 45 52 20 54 | .HOW TO ENTER T|
000001E0: 48 45 20 20 DD 00 C8 1C 00 20 20 20 20 DD 50 52 |HE ..... .PR|
000001F0: 4F 47 52 41 4D 20 49 4E 54 4F 20 43 4F 4D 41 4C |OGRAM INTO COMAL|
00000200: DD 00 D2 1C 00 20 20 20 20 AD C0 C0 C0 C0 C0 C0 |..... .......|
00000210: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 BD 00 DC 04 |................|
00000220: 00 00 E6 18 00 20 20 45 4E 54 45 52 20 22 46 49 |..... ENTER "FI|
00000230: 4C 45 4E 41 4D 45 2E 43 22 00 F0 21 00 20 20 57 |LENAME.C"..!. W|
00000240: 48 45 4E 20 41 20 4C 49 4E 45 20 49 53 20 44 49 |HEN A LINE IS DI|
00000250: 53 50 4C 41 59 45 44 20 4F 4E 00 FA 21 00 20 20 |SPLAYED ON..!. |
00000260: 54 48 45 20 53 43 52 45 45 4E 2C 20 4D 4F 56 45 |THE SCREEN, MOVE|
00000270: 20 54 48 45 20 43 55 52 53 4F 52 01 04 20 00 20 | THE CURSOR.. . |
00000280: 20 54 4F 20 54 48 45 20 53 50 41 43 45 20 46 4F | TO THE SPACE FO|
00000290: 4C 4C 4F 57 49 4E 47 20 54 48 45 01 0E 20 00 20 |LLOWING THE.. . |
000002A0: 20 4C 49 4E 45 20 4E 55 4D 42 45 52 2E 20 50 55 | LINE NUMBER. PU|
000002B0: 54 20 41 4E 20 45 58 43 4C 41 2D 01 18 22 00 20 |T AN EXCLA-..". |
000002C0: 20 4D 41 54 49 4F 4E 20 49 4E 20 54 48 41 54 20 | MATION IN THAT |
000002D0: 53 50 41 43 45 2E 20 28 21 3D 2F 2F 29 01 22 24 |SPACE. (!=//)."$|
000002E0: 00 20 20 50 52 45 53 53 20 52 45 54 55 52 4E 20 |. PRESS RETURN |
000002F0: 54 4F 20 45 4E 54 45 52 20 54 48 45 20 4C 49 4E |TO ENTER THE LIN|
00000300: 45 01 2C 23 00 20 20 2D 20 52 45 50 45 41 54 20 |E.,#. - REPEAT |
00000310: 55 4E 54 49 4C 20 54 48 45 20 50 52 4F 47 52 41 |UNTIL THE PROGRA|
00000320: 4D 20 49 53 01 36 1E 00 20 20 43 4F 4D 50 4C 45 |M IS.6.. COMPLE|
00000330: 54 45 4C 59 20 45 4E 54 45 52 45 44 2E 20 4E 45 |TELY ENTERED. NE|
00000340: 58 54 01 40 23 00 20 20 53 41 56 45 20 54 48 45 |XT.@#. SAVE THE|
00000350: 20 50 52 4F 47 52 41 4D 20 53 4F 20 59 4F 55 20 | PROGRAM SO YOU |
00000360: 57 4F 4E 27 54 01 4A 1A 00 20 20 48 41 56 45 20 |WON'T.J.. HAVE |
00000370: 54 4F 20 44 4F 20 49 54 20 41 47 41 49 4E 2E 01 |TO DO IT AGAIN..|
00000380: 54 17 00 20 20 47 4F 4F 44 20 4C 55 43 4B 2C 20 |T.. GOOD LUCK, |
00000390: 42 55 44 44 59 2E 01 5E 04 00 01 68 22 00 2D 2D |BUDDY..^...h".--|
000003A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000003B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 01 72 04 00 |------------.r..|
000003C0: 01 7C 0C 8C 8F 02 00 02 00 50 93 C5 01 86 0C 8C |.|.......P......|
000003D0: 8F 03 00 02 00 10 93 C5 01 90 2A 5F 03 21 4E 41 |..........*_.!NA|
000003E0: 4D 45 20 4F 46 20 42 41 53 49 43 20 50 52 4F 47 |ME OF BASIC PROG|
000003F0: 52 41 4D 20 54 4F 20 43 4F 4E 56 45 52 54 3F 65 |RAM TO CONVERT?e|
00000400: 60 61 01 9A 0B B5 03 00 B7 09 03 BA BB 01 A4 17 |`a..............|
00000410: 5F 03 0E 50 4C 45 41 53 45 20 57 41 49 54 2E 2E |_..PLEASE WAIT..|
00000420: 2E 65 60 61 01 AE 06 7F 04 81 01 B8 0C DB 02 00 |.e`a............|
00000430: 02 DC 06 03 DD DE 01 C2 06 7F 04 81 01 CC 0D 09 |................|
00000440: 03 06 03 03 02 2E 43 28 3C 01 D6 0C DB 02 00 03 |......C(<.......|
00000450: DC 06 03 DD DF 01 E0 0C 97 02 00 02 5D 37 98 BB |............]7..|
00000460: 8D 01 EA 0E B5 02 00 02 C8 CB CC 09 02 BA BB 01 |................|
00000470: F4 1B 68 09 02 51 6A 5F 02 00 03 C8 CB 0C 02 02 |..h..Qj_........|
00000480: 00 02 1F 09 02 51 13 65 60 61 01 FE 06 9B 86 8D |.....Q.e`a......|
00000490: 02 08 05 CF D1 02 12 09 70 04 0C 8E 00 7B 02 1C |........p....{..|
000004A0: 07 09 02 80 3C 02 26 18 97 0C 02 02 00 01 1F 02 |....<.&.........|
000004B0: 00 02 13 03 02 30 30 2D 47 37 98 06 8E 02 30 0F |.....00-G7....0.|
000004C0: 00 43 55 52 53 4F 52 20 32 34 2C 31 02 3A 09 5F |.CURSOR 24,1.:._|
000004D0: 06 02 65 60 61 02 44 06 9B D6 8D 02 4E 05 7D 04 |..e`a.D.....N.}.|
000004E0: 00 00 00 00 00 12 AD AF 00 00 12 99 AF 00 00 14 |................|
000004F0: C6 8D 00 00 03 53 45 51 04 4C 49 4E 45 08 46 49 |.....SEQ.LINE.FI|
00000500: 4C 45 4E 41 4D 45 08 45 52 52 4F 52 27 49 4F 00 |LENAME.ERROR'IO.|
00000510: 00 |. |
Z......... SAVE "@0:BASIC'TO'COMAL".....
.$.THE BASIC PROGRAM MUST BE LISTED.(#.T
O THE DISK FIRST. THIS PROGRAM.2".WILL R
EAD IN THE BASIC PROGRAM.<!.AND WRITE IT
BACK TO THE SAME.F$.DISK WITH THE SAME
FILENAME+".C".P...Z.. ...............
.......D.. .HOW TO LIST A BASIC..N..
.PROGRAM TO THE DISK..X.. ........
...................#. FROM BASIC, LOAD
THE PROGRAM..... TYPE:. +. OPEN8,8,8,"@
0:FILENAME,S,W":CMD8:LIST........ ...
..................... .HOW TO ENTER T
HE ..H.. .PROGRAM INTO COMAL..R..
............................ ENTER "FI
LENAME.C"..!. WHEN A LINE IS DISPLAYED
ON..!. THE SCREEN, MOVE THE CURSOR.. .
TO THE SPACE FOLLOWING THE.. . LINE NU
MBER. PUT AN EXCLA-..". MATION IN THAT
SPACE. (!=//)."$. PRESS RETURN TO ENTER
THE LINE.,#. - REPEAT UNTIL THE PROGRA
M IS.6.. COMPLETELY ENTERED. NEXT.@#.
SAVE THE PROGRAM SO YOU WON'T.J.. HAVE
TO DO IT AGAIN..T.. GOOD LUCK, BUDDY..^
...H".------------------------------.R..
.|.......P.E...........E..*_.!NAME OF BA
SIC PROGRAM TO CONVERT?E`A..............
_..PLEASE WAIT...E`A..................B
....L........C(<.V.................]7..
........HKL.......H..QJ_...HK........Q.E
`A.........OQ...P....{......<.&.........
.....00-G7....0..CURSOR 24,1.:._..E`A.D.
.V..N.}.................F....SEQ.LINE.FI
LENAME.ERROR'IO..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL