HI
FILE INFORMATION
FILENAME(S): HI
FILE TYPE(S): PRG
FILE SIZE: 3.6K
FIRST SEEN: 2025-11-30 16:59:30
APPEARS ON: 1 disk(s)
FILE HASH
815c4955064be0daaa55bc1e8a563687abe3212e5543664d0b17880f1d3f0ab2
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 COMAL 0 14 | HI | PRG | High Voltage Complete C64 Collection | 20 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: A2 0D E3 0D 3B 0E 00 0A 3B 00 41 55 54 4F 20 42 |....;...;.AUTO B|
00000010: 4F 4F 54 20 3A 3A 20 28 43 29 31 39 38 34 20 C3 |OOT :: (C)1984 .|
00000020: CF CD C1 CC 20 D5 53 45 52 53 20 C7 52 4F 55 50 |.... .SERS .ROUP|
00000030: 2C 20 D5 2E D3 2E C1 2E 2C 20 CC 49 4D 49 54 45 |, ......, .IMITE|
00000040: 44 00 14 0A FF 16 02 00 00 FF 17 00 1E 05 FF 19 |D...............|
00000050: 00 28 16 5F 02 00 0E 4B 65 66 61 00 4C 4F 57 45 |.(._...Kefa.LOWE|
00000060: 52 20 43 41 53 45 00 32 14 8C 8F 01 00 02 00 01 |R CASE.2........|
00000070: 93 8F 02 00 02 00 07 93 94 C5 00 3C 29 B5 03 1E |...........<)...|
00000080: C4 4F 20 59 4F 55 20 57 41 4E 54 20 45 52 52 4F |.O YOU WANT ERRO|
00000090: 52 20 4D 45 53 53 41 47 45 53 3F 20 D9 9D B7 09 |R MESSAGES? ....|
000000A0: 01 BA BB 00 46 14 68 06 01 03 01 4E 2D 06 01 03 |....F.h....N-...|
000000B0: 01 CE 2D 39 69 11 8A 00 50 0F 09 02 03 07 53 45 |..-9i...P.....SE|
000000C0: 54 4D 53 47 2D 3C 00 5A 06 6E 26 8A 00 64 0F 09 |TMSG-<.Z.n&..d..|
000000D0: 02 03 07 53 45 54 4D 53 47 2B 3C 00 6E 04 6F 00 |...SETMSG+<.n.o.|
000000E0: 78 18 5F 02 00 93 4B 65 66 61 00 43 4C 45 41 52 |x._...Kefa.CLEAR|
000000F0: 20 53 43 52 45 45 4E 00 82 14 82 03 10 00 02 00 | SCREEN.........|
00000100: 01 84 02 00 03 85 88 5F 60 61 89 00 8C 09 5F 06 |......._`a...._.|
00000110: 02 65 60 61 00 96 06 5F 60 61 00 A0 11 5F 03 08 |.e`a..._`a..._..|
00000120: 44 45 4C 20 2D 32 34 30 65 60 61 00 AA 06 5F 60 |DEL -240e`a..._`|
00000130: 61 00 B4 0C 5F 03 03 52 55 4E 65 60 61 00 BE 10 |a..._..RUNe`a...|
00000140: 5F 02 00 13 4B 65 66 61 00 48 4F 4D 45 00 C8 29 |_...Kefa.HOME..)|
00000150: E4 02 02 77 E5 02 00 0D E6 00 4B 45 59 42 4F 41 |...w......KEYBOA|
00000160: 52 44 20 42 55 46 46 45 52 20 3C 52 45 54 55 52 |RD BUFFER <RETUR|
00000170: 4E 20 4B 45 59 3E 00 D2 0C E4 02 02 78 E5 02 00 |N KEY>......x...|
00000180: 0D E6 00 DC 0C E4 02 02 79 E5 02 00 0D E6 00 E6 |........y.......|
00000190: 22 E4 02 00 C6 E5 02 00 03 E6 00 4B 45 59 42 4F |"..........KEYBO|
000001A0: 41 52 44 20 42 55 46 46 45 52 20 43 4F 55 4E 54 |ARD BUFFER COUNT|
000001B0: 00 F0 04 9F 00 FA 2E 00 28 43 29 31 39 38 34 20 |........(C)1984 |
000001C0: C3 CF CD C1 CC 20 D5 53 45 52 53 20 C7 52 4F 55 |..... .SERS .ROU|
000001D0: 50 2C 20 D5 2E D3 2E C1 2E 2C 20 CC 49 4D 49 54 |P, ......, .IMIT|
000001E0: 45 44 01 04 0B FF 20 02 00 00 47 FF 21 01 0E 0B |ED.... ...G.!...|
000001F0: FF 46 02 00 0C 47 FF 47 01 18 0B FF 1E 02 00 0C |.F...G.G........|
00000200: 47 FF 1F 01 22 1C 5F 02 00 0E 4B 65 66 61 00 20 |G..."._...Kefa. |
00000210: 4C 4F 57 45 52 20 43 41 53 45 20 4D 4F 44 45 01 |LOWER CASE MODE.|
00000220: 2C 04 00 01 36 18 5F 02 00 93 4B 65 66 61 00 43 |,...6._...Kefa.C|
00000230: 4C 45 41 52 20 53 43 52 45 45 4E 01 40 30 5F 03 |LEAR SCREEN.@0_.|
00000240: 27 D7 45 4C 43 4F 4D 45 20 54 4F 20 54 48 45 20 |'.ELCOME TO THE |
00000250: 52 45 50 4C 41 43 45 4D 45 4E 54 20 4F 46 20 C2 |REPLACEMENT OF .|
00000260: C1 D3 C9 C3 20 2E 2E 2E 65 60 61 01 4A 23 5F 03 |.... ...e`a.J#_.|
00000270: 1A 20 20 20 20 20 20 20 20 20 20 20 20 20 2E 2E |. ..|
00000280: 2E 20 C3 CF CD C1 CC 20 2E 2E 2E 65 60 61 01 54 |. ..... ...e`a.T|
00000290: 06 5F 60 61 01 5E 2F 5F 03 26 C3 4F 50 59 52 49 |._`a.^/_.&.OPYRI|
000002A0: 47 48 54 20 31 39 38 33 20 C3 CF CD C1 CC 20 D5 |GHT 1983 ..... .|
000002B0: 53 45 52 53 20 C7 52 4F 55 50 20 28 D5 D3 C1 29 |SERS .ROUP (...)|
000002C0: 65 60 61 01 68 06 5F 60 61 01 72 32 5F 03 15 D3 |e`a.h._`a.r2_...|
000002D0: 41 56 45 20 41 20 50 52 4F 47 52 41 4D 3A 20 20 |AVE A PROGRAM: |
000002E0: 53 41 56 45 65 66 02 00 22 4B 65 66 03 04 4E 41 |SAVEef.."Kef..NA|
000002F0: 4D 45 65 66 02 00 22 4B 65 60 61 01 7C 32 5F 03 |MEef.."Ke`a.|2_.|
00000300: 15 CC 4F 41 44 20 41 20 50 52 4F 47 52 41 4D 3A |..OAD A PROGRAM:|
00000310: 20 20 4C 4F 41 44 65 66 02 00 22 4B 65 66 03 04 | LOADef.."Kef..|
00000320: 4E 41 4D 45 65 66 02 00 22 4B 65 60 61 01 86 3A |NAMEef.."Ke`a..:|
00000330: 5F 03 1B CC 49 53 54 20 50 52 4F 47 52 41 4D 20 |_...IST PROGRAM |
00000340: 54 4F 20 44 49 53 4B 3A 20 20 4C 49 53 54 65 66 |TO DISK: LISTef|
00000350: 02 00 22 4B 65 66 03 06 4E 41 4D 45 2E 4C 65 66 |.."Kef..NAME.Lef|
00000360: 02 00 22 4B 65 60 61 01 90 31 5F 03 28 C5 4E 54 |.."Ke`a..1_.(.NT|
00000370: 45 52 20 41 20 50 52 4F 47 52 41 4D 20 54 48 41 |ER A PROGRAM THA|
00000380: 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |T |
00000390: 20 20 20 20 20 65 66 61 01 9A 3A 5F 03 1B 20 20 | efa..:_.. |
000003A0: 57 41 53 20 4C 49 53 54 45 44 20 54 4F 20 44 49 |WAS LISTED TO DI|
000003B0: 53 4B 3A 20 45 4E 54 45 52 65 66 02 00 22 4B 65 |SK: ENTERef.."Ke|
000003C0: 66 03 06 4E 41 4D 45 2E 4C 65 66 02 00 22 4B 65 |f..NAME.Lef.."Ke|
000003D0: 60 61 01 A4 31 5F 03 28 A2 A2 A2 A2 A2 A2 A2 A2 |`a..1_.(........|
000003E0: A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 |................|
000003F0: A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 |................|
00000400: 65 66 61 01 AE 32 5F 03 29 12 D0 4C 45 41 53 45 |efa..2_.)..LEASE|
00000410: 20 42 41 43 4B 55 50 20 54 48 49 53 20 44 49 53 | BACKUP THIS DIS|
00000420: 4B 20 42 45 46 4F 52 45 20 55 53 49 4E 47 20 49 |K BEFORE USING I|
00000430: 54 2E 65 66 61 01 B8 31 5F 03 28 C1 4E 20 45 58 |T.efa..1_.(.N EX|
00000440: 43 45 4C 4C 45 4E 54 20 50 55 42 4C 49 43 20 44 |CELLENT PUBLIC D|
00000450: 4F 4D 41 49 4E 20 42 41 53 49 43 20 50 52 4F 47 |OMAIN BASIC PROG|
00000460: 52 41 4D 65 66 61 01 C2 31 5F 03 28 27 31 35 34 |RAMefa..1_.('154|
00000470: 31 42 41 43 4B 55 50 28 46 52 45 45 29 27 20 49 |1BACKUP(FREE)' I|
00000480: 53 20 54 48 45 20 4C 41 53 54 20 50 52 4F 47 52 |S THE LAST PROGR|
00000490: 41 4D 20 20 65 66 61 01 CC 31 5F 03 28 4F 4E 20 |AM efa..1_.(ON |
000004A0: 54 48 49 53 20 44 49 53 4B 20 2D 20 D5 53 45 20 |THIS DISK - .SE |
000004B0: 49 54 20 54 4F 20 43 4F 50 59 20 54 48 45 20 57 |IT TO COPY THE W|
000004C0: 48 4F 4C 45 20 65 66 61 01 D6 32 5F 03 29 44 49 |HOLE efa..2_.)DI|
000004D0: 53 4B 20 2D 20 D4 48 45 4E 20 52 55 4E 20 C3 CF |SK - .HEN RUN ..|
000004E0: CD C1 CC 20 2E 2E 2E 20 20 20 20 20 20 20 20 20 |... ... |
000004F0: 20 20 20 20 20 20 92 65 66 61 01 E0 31 5F 03 28 | .efa..1_.(|
00000500: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
00000510: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
00000520: B8 B8 B8 B8 B8 B8 B8 B8 65 66 61 01 EA 21 5F 03 |........efa..!_.|
00000530: 18 CE 45 57 53 4C 45 54 54 45 52 3A 20 C3 CF CD |..EWSLETTER: ...|
00000540: C1 CC 20 D4 CF C4 C1 D9 2E 65 60 61 01 F4 2E 5F |.. ......e`a..._|
00000550: 03 25 D4 55 54 4F 52 49 41 4C 3A 20 C6 4F 55 4E |.%.UTORIAL: .OUN|
00000560: 44 41 54 49 4F 4E 53 20 2E 2E 2E 20 57 49 54 48 |DATIONS ... WITH|
00000570: 20 C3 CF CD C1 CC 2E 65 60 61 01 FE 23 5F 03 1A | ......e`a..#_..|
00000580: D2 45 46 45 52 45 4E 43 45 3A 20 C3 CF CD C1 CC |.EFERENCE: .....|
00000590: 20 C8 41 4E 44 42 4F 4F 4B 2E 65 60 61 02 08 30 | .ANDBOOK.e`a..0|
000005A0: 5F 03 27 C6 52 4F 4D 3A C3 CF CD C1 CC 20 D5 53 |_.'.ROM:..... .S|
000005B0: 45 52 53 20 C7 52 4F 55 50 2C 20 D5 2E D3 2E C1 |ERS .ROUP, .....|
000005C0: 2E 2C 20 CC 49 4D 49 54 45 44 65 60 61 02 12 2E |., .IMITEDe`a...|
000005D0: 5F 03 25 35 35 30 31 20 C7 52 4F 56 45 4C 41 4E |_.%5501 .ROVELAN|
000005E0: 44 20 D4 45 52 2C 20 CD 41 44 49 53 4F 4E 20 D7 |D .ER, .ADISON .|
000005F0: C9 20 35 33 37 31 36 2E 65 60 61 02 1C 31 5F 03 |. 53716.e`a..1_.|
00000600: 28 D3 45 4C 46 20 41 44 44 52 45 53 53 45 44 20 |(.ELF ADDRESSED |
00000610: 53 54 41 4D 50 45 44 20 45 4E 56 45 4C 4F 50 45 |STAMPED ENVELOPE|
00000620: 20 46 4F 52 20 C9 CE C6 CF 65 66 61 02 26 04 00 | FOR ....efa.&..|
00000630: 02 30 0C 8C 8F 04 00 02 00 01 93 C5 02 3A 04 95 |.0...........:..|
00000640: 02 44 30 5F 03 27 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |.D0_.'..........|
00000650: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000660: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 65 60 61 |.............e`a|
00000670: 02 4E 38 B5 03 2D 12 C8 92 45 4C 50 20 12 C4 92 |.N8..-...ELP ...|
00000680: 45 4D 4F 20 12 C3 92 4F 4D 41 4C 20 12 C7 92 52 |EMO ...OMAL ...R|
00000690: 41 50 48 49 43 53 20 28 C8 2C C4 2C C3 2C C7 29 |APHICS (.,.,.,.)|
000006A0: 3A C0 9D B7 09 04 BA BB 02 58 09 A1 06 04 A3 FC |:........X......|
000006B0: 8F 02 62 19 A4 39 92 03 01 C3 A6 03 01 43 A6 03 |..b..9.......C..|
000006C0: 01 50 A6 03 01 D0 A6 A7 33 90 02 6C 1A 5F 03 11 |.P......3..l._..|
000006D0: 59 4F 55 52 20 54 55 52 4E 20 4E 4F 57 20 2E 2E |YOUR TURN NOW ..|
000006E0: 2E 65 60 61 02 76 04 9F 02 80 11 A4 39 92 03 01 |.e`a.v......9...|
000006F0: 48 A6 03 01 C8 A6 A7 B8 91 02 8A 1B 5F 03 12 C8 |H..........._...|
00000700: 45 4C 50 20 52 45 51 55 45 53 54 45 44 20 21 21 |ELP REQUESTED !!|
00000710: 21 65 60 61 02 94 06 5F 60 61 02 9E 18 5F 03 0F |!e`a..._`a..._..|
00000720: C9 20 2D 20 C9 4E 46 4F 52 4D 41 54 49 4F 4E 65 |. - .NFORMATIONe|
00000730: 60 61 02 A8 1B 5F 03 12 C3 20 2D 20 C3 CF CD C1 |`a..._... - ....|
00000740: CC 20 4B 45 59 57 4F 52 44 53 65 60 61 02 B2 28 |. KEYWORDSe`a..(|
00000750: 5F 03 1F C7 20 2D 20 C7 52 41 50 48 49 43 53 20 |_... - .RAPHICS |
00000760: 28 49 4E 43 4C 55 44 49 4E 47 20 54 55 52 54 4C |(INCLUDING TURTL|
00000770: 45 29 65 60 61 02 BC 1E 5F 03 15 D3 20 2D 20 D3 |E)e`a..._... - .|
00000780: 50 52 49 54 45 20 53 54 41 54 45 4D 45 4E 54 53 |PRITE STATEMENTS|
00000790: 65 60 61 02 C6 06 5F 60 61 02 D0 20 B5 03 15 D7 |e`a..._`a.. ....|
000007A0: 48 49 43 48 20 C8 C5 CC D0 20 54 4F 20 53 45 45 |HICH .... TO SEE|
000007B0: 3F 20 BF 9D B7 09 04 BA BB 02 DA 09 A1 06 04 A3 |? ..............|
000007C0: 0D 91 02 E4 11 A4 B4 91 03 01 C9 A6 03 01 49 A6 |..............I.|
000007D0: A7 32 91 02 EE 14 7F 05 03 0C 49 4E 46 4F 52 4D |.2........INFORM|
000007E0: 41 54 49 4F 4E 2A 15 02 F8 11 A4 B4 91 03 01 C3 |ATION*..........|
000007F0: A6 03 01 43 A6 A7 55 91 03 02 12 7F 05 03 0A 48 |...C..U........H|
00000800: 45 4C 50 2D 43 4F 4D 41 4C 15 03 0C 11 A4 B4 91 |ELP-COMAL.......|
00000810: 03 01 47 A6 03 01 C7 A6 A7 7B 91 03 16 15 7F 05 |..G......{......|
00000820: 03 0D 48 45 4C 50 2D 47 52 41 50 48 49 43 53 15 |..HELP-GRAPHICS.|
00000830: 03 20 11 A4 B4 91 03 01 D3 A6 03 01 53 A6 A7 A0 |. ..........S...|
00000840: 91 03 2A 14 7F 05 03 0C 48 45 4C 50 2D 53 50 52 |..*.....HELP-SPR|
00000850: 49 54 45 53 15 03 34 06 A8 B4 91 03 3E 0E 5F 03 |ITES..4.....>._.|
00000860: 05 D7 48 41 54 3F 65 60 61 03 48 04 A9 03 52 11 |..HAT?e`a.H...R.|
00000870: A4 39 92 03 01 C4 A6 03 01 44 A6 A7 01 92 03 5C |.9.......D.....\|
00000880: 20 5F 03 17 4C 4F 41 44 49 4E 47 20 49 4E 20 44 | _..LOADING IN D|
00000890: 45 4D 4F 20 50 52 4F 47 52 41 4D 65 60 61 03 66 |EMO PROGRAMe`a.f|
000008A0: 18 D2 03 10 4C 4F 47 4F 27 42 4F 4F 4B 27 53 41 |....LOGO'BOOK'SA|
000008B0: 4D 50 4C 45 D4 D3 03 70 11 A4 39 92 03 01 C7 A6 |MPLE...p..9.....|
000008C0: 03 01 47 A6 A7 25 92 03 7A 0A FF 16 02 00 00 FF |..G..%..z.......|
000008D0: 17 03 84 05 FF 4C 03 8E 04 9F 03 98 06 A8 39 92 |.....L........9.|
000008E0: 03 A2 0E 5F 03 05 57 48 41 54 3F 65 60 61 03 AC |..._..WHAT?e`a..|
000008F0: 04 A9 03 B6 13 DA 43 44 2C 96 87 8F 00 20 46 4F |......CD,.... FO|
00000900: 52 45 56 45 52 03 C0 23 00 20 2D 2D 2D 2D 2D 2D |REVER..#. ------|
00000910: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000920: 2D 2D 2D 2D 2D 2D 2D 2D 03 CA 39 00 20 53 45 51 |--------..9. SEQ|
00000930: 55 45 4E 54 49 41 4C 20 46 49 4C 45 20 54 4F 20 |UENTIAL FILE TO |
00000940: 53 43 52 45 45 4E 20 53 43 52 4F 4C 4C 49 4E 47 |SCREEN SCROLLING|
00000950: 20 2D 20 42 59 20 4C 45 4E 20 4C 49 4E 44 53 41 | - BY LEN LINDSA|
00000960: 59 03 D4 40 00 20 53 45 45 27 52 4F 4C 4C 28 22 |Y..@. SEE'ROLL("|
00000970: 53 43 52 45 45 4E 2E 54 45 53 54 2E 57 22 29 20 |SCREEN.TEST.W") |
00000980: 3C 2D 2D 2D 20 43 41 4C 4C 20 50 52 4F 43 20 53 |<--- CALL PROC S|
00000990: 45 45 27 52 4F 4C 4C 20 4C 49 4B 45 20 54 48 49 |EE'ROLL LIKE THI|
000009A0: 53 03 DE 0B 70 05 4F 96 01 74 06 7C 03 E8 36 00 |S...p.O..t.|..6.|
000009B0: 20 20 49 4D 50 4F 52 54 20 53 48 49 46 54 27 57 | IMPORT SHIFT'W|
000009C0: 41 49 54 20 2F 2F 20 4E 45 45 44 45 44 20 4F 4E |AIT // NEEDED ON|
000009D0: 4C 59 20 49 4E 20 56 45 52 53 49 4F 4E 20 32 2E |LY IN VERSION 2.|
000009E0: 30 30 03 F2 34 8C 8F 07 00 02 00 50 93 C5 00 20 |00..4......P... |
000009F0: 41 4C 4C 4F 57 20 52 4F 4F 4D 20 46 4F 52 20 4F |ALLOW ROOM FOR O|
00000A00: 4E 45 20 53 43 52 45 45 4E 20 4C 49 4E 45 20 4F |NE SCREEN LINE O|
00000A10: 46 20 54 45 58 54 03 FC 42 07 08 02 00 6A 3A 00 |F TEXT..B....j:.|
00000A20: 20 46 49 4C 45 20 4E 55 4D 42 45 52 20 2D 20 52 | FILE NUMBER - R|
00000A30: 45 53 54 20 4F 46 20 50 52 4F 47 52 41 4D 20 53 |EST OF PROGRAM S|
00000A40: 48 4F 55 4C 44 4E 27 54 20 55 53 45 20 53 41 4D |HOULDN'T USE SAM|
00000A50: 45 20 4E 55 4D 42 45 52 04 06 21 CF 04 08 D0 00 |E NUMBER..!.....|
00000A60: 20 4D 41 4B 45 20 53 55 52 45 20 46 49 4C 45 20 | MAKE SURE FILE |
00000A70: 49 53 20 43 4C 4F 53 45 44 04 10 0B DB 04 08 DC |IS CLOSED.......|
00000A80: 06 06 DD DE 04 1A 37 5F 03 01 93 65 60 61 00 20 |......7_...e`a. |
00000A90: 43 4C 45 41 52 20 53 43 52 45 45 4E 20 57 49 54 |CLEAR SCREEN WIT|
00000AA0: 48 4F 55 54 20 43 4F 4D 4D 41 20 2D 20 45 4E 44 |HOUT COMMA - END|
00000AB0: 53 20 4F 4E 20 4C 49 4E 45 20 32 04 24 04 95 04 |S ON LINE 2.$...|
00000AC0: 2E 24 B5 04 08 C8 CB CC 09 07 BA BB 00 20 47 45 |.$........... GE|
00000AD0: 54 20 4E 45 58 54 20 4C 49 4E 45 20 4F 46 20 54 |T NEXT LINE OF T|
00000AE0: 45 58 54 04 38 45 00 20 4D 41 44 45 20 54 4F 20 |EXT.8E. MADE TO |
00000AF0: 52 45 41 44 20 57 4F 52 44 50 52 4F 20 50 52 49 |READ WORDPRO PRI|
00000B00: 4E 54 45 52 20 46 49 4C 45 53 20 4D 41 44 45 20 |NTER FILES MADE |
00000B10: 55 4E 44 45 52 20 43 42 4D 20 50 52 49 4E 54 45 |UNDER CBM PRINTE|
00000B20: 52 20 43 48 4F 49 43 45 04 42 39 00 20 4E 45 58 |R CHOICE.B9. NEX|
00000B30: 54 20 4C 49 4E 45 20 52 45 4D 4F 56 45 53 20 41 |T LINE REMOVES A|
00000B40: 20 43 55 52 53 4F 52 20 44 4F 57 4E 20 43 48 41 | CURSOR DOWN CHA|
00000B50: 52 41 43 54 45 52 20 2D 20 43 48 52 24 28 31 37 |RACTER - CHR$(17|
00000B60: 29 04 4C 42 00 20 57 48 49 43 48 20 49 53 20 55 |).LB. WHICH IS U|
00000B70: 53 45 44 20 42 59 20 54 48 45 20 43 42 4D 20 50 |SED BY THE CBM P|
00000B80: 52 49 4E 54 45 52 20 54 4F 20 53 57 49 54 43 48 |RINTER TO SWITCH|
00000B90: 20 54 4F 20 4C 4F 57 45 52 20 43 41 53 45 20 4D | TO LOWER CASE M|
00000BA0: 4F 44 45 04 56 3C 00 20 41 4C 53 4F 20 53 51 55 |ODE.V<. ALSO SQU|
00000BB0: 41 52 45 20 42 52 41 43 4B 45 54 53 20 41 52 45 |ARE BRACKETS ARE|
00000BC0: 20 46 49 58 45 44 20 3A 3A 20 43 48 52 24 28 32 | FIXED :: CHR$(2|
00000BD0: 31 39 29 20 26 20 43 48 52 24 28 32 32 31 29 04 |19) & CHR$(221).|
00000BE0: 60 1B 68 02 00 11 4B 06 07 36 6A 0C 07 02 00 11 |`.h...K..6j.....|
00000BF0: 4B 06 07 36 19 02 00 00 4B 3C 04 6A 1C 97 02 00 |K..6....K<.j....|
00000C00: DB 4B 06 07 36 99 0C 07 02 00 DB 4B 06 07 36 19 |.K..6......K..6.|
00000C10: 02 00 5B 4B 3C 9A 04 74 1C 97 02 00 DD 4B 06 07 |..[K<..t.....K..|
00000C20: 36 99 0C 07 02 00 DD 4B 06 07 36 19 02 00 5D 4B |6......K..6...]K|
00000C30: 3C 9A 04 7E 35 7F 09 81 00 20 43 41 4C 4C 20 50 |<..~5.... CALL P|
00000C40: 52 4F 43 20 54 4F 20 57 41 49 54 20 46 4F 52 20 |ROC TO WAIT FOR |
00000C50: 53 48 49 46 54 20 42 45 46 4F 52 45 20 43 4F 4E |SHIFT BEFORE CON|
00000C60: 54 49 4E 55 49 4E 47 04 88 15 5F 06 07 65 60 61 |TINUING..._..e`a|
00000C70: 00 20 50 52 49 4E 54 20 4C 49 4E 45 04 92 31 DA |. PRINT LINE..1.|
00000C80: 04 08 5D 96 06 94 00 20 55 4E 54 49 4C 20 48 49 |..].... UNTIL HI|
00000C90: 54 20 45 4E 44 20 4F 46 20 53 45 51 55 45 4E 54 |T END OF SEQUENT|
00000CA0: 49 41 4C 20 54 45 58 54 20 46 49 4C 45 04 9C 17 |IAL TEXT FILE...|
00000CB0: CF 04 08 D0 00 20 43 4C 4F 53 45 20 54 48 45 20 |..... CLOSE THE |
00000CC0: 46 49 4C 45 04 A6 3A B5 03 22 46 49 4E 49 53 48 |FILE..:.."FINISH|
00000CD0: 45 44 20 2D 20 48 49 54 20 3C 52 45 54 55 52 4E |ED - HIT <RETURN|
00000CE0: 3E 20 57 48 45 4E 20 52 45 41 44 59 B7 09 07 BA |> WHEN READY....|
00000CF0: BC 00 20 45 4E 44 20 4F 46 20 50 52 4F 43 04 B0 |.. END OF PROC..|
00000D00: 06 5F 60 61 04 BA 05 7D 05 04 C4 04 00 04 CE 09 |._`a...}........|
00000D10: 70 09 EE 96 00 7C 04 D8 31 07 0A 02 02 8D 3A 00 |p....|..1.....:.|
00000D20: 31 35 32 20 52 4F 4D 20 4C 4F 43 41 54 49 4F 4E |152 ROM LOCATION|
00000D30: 20 46 4F 52 20 53 48 49 46 54 20 53 54 41 54 55 | FOR SHIFT STATU|
00000D40: 53 20 2D 20 50 45 54 04 E2 0B 97 04 0A D8 37 98 |S - PET.......7.|
00000D50: E8 96 04 EC 27 5F 03 0C 50 52 45 53 53 20 53 48 |....'_..PRESS SH|
00000D60: 49 46 54 91 65 60 61 00 20 43 55 52 53 4F 52 20 |IFT.e`a. CURSOR |
00000D70: 55 50 20 41 54 20 45 4E 44 04 F6 24 5F 03 0C 20 |UP AT END..$_.. |
00000D80: 20 20 20 20 20 20 20 20 20 20 91 65 60 61 00 20 | .e`a. |
00000D90: 45 52 41 53 45 20 4D 45 53 53 41 47 45 05 00 06 |ERASE MESSAGE...|
00000DA0: 9B 92 96 05 0A 05 7D 09 12 FC AF 00 00 12 F1 AF |......}.........|
00000DB0: 00 00 00 00 00 00 00 00 00 00 00 00 14 EC 92 00 |................|
00000DC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00000DD0: 14 58 96 00 00 00 00 00 00 00 00 00 00 00 00 00 |.X..............|
00000DE0: 00 00 00 00 00 00 00 00 00 05 52 45 50 4C 59 07 |..........REPLY.|
00000DF0: 4D 45 53 53 41 47 45 01 58 01 43 08 53 45 45 27 |MESSAGE.X.C.SEE'|
00000E00: 52 4F 4C 4C 09 46 49 4C 45 27 4E 41 4D 45 04 54 |ROLL.FILE'NAME.T|
00000E10: 45 58 54 08 53 45 45 27 46 49 4C 45 0A 53 48 49 |EXT.SEE'FILE.SHI|
00000E20: 46 54 27 57 41 49 54 0A 53 48 49 46 54 27 46 4C |FT'WAIT.SHIFT'FL|
00000E30: 41 47 04 4C 49 44 54 04 4A 55 4D 50 03 4C 53 54 |AG.LIDT.JUMP.LST|
00000E40: 00 00 |.. |
....;...;.AUTO BOOT :: (C)1984 COMAL USE
RS GROUP, U.S.A., LIMITED...............
.(._...KEFA.LOWER CASE.2................
.E.<)...DO YOU WANT ERROR MESSAGES? Y...
....F.H....N-....N-9I...P.....SETMSG-<.Z
.N&..D.....SETMSG+<.N.O.X._...KEFA.CLEAR
SCREEN................_`A...._..E`A..._
`A. ._..DEL -240E`A..._`A..._..RUNE`A...
_...KEFA.HOME.H)...W......KEYBOARD BUFFE
R <RETURN KEY>.R....X...........Y.......
"...F......KEYBOARD BUFFER COUNT........
(C)1984 COMAL USERS GROUP, U.S.A., LIMIT
ED.... ...G.!....F...G.G........G..."._.
..KEFA. LOWER CASE MODE.,...6._...KEFA.C
LEAR SCREEN.@0_.'WELCOME TO THE REPLACEM
ENT OF BASIC ...E`A.J#_.. ..
. COMAL ...E`A.T._`A.^/_.©RIGHT 1983
COMAL USERS GROUP (USA)E`A.H._`A.R2_..S
AVE A PROGRAM: SAVEEF.."KEF..NAMEEF.."K
E`A.|2_..LOAD A PROGRAM: LOADEF.."KEF..
NAMEEF.."KE`A..:_..LIST PROGRAM TO DISK:
LISTEF.."KEF..NAME.LEF.."KE`A..1_.(ENT
ER A PROGRAM THAT EFA
..:_.. WAS LISTED TO DISK: ENTEREF.."KE
F..NAME.LEF.."KE`A..1_.(................
........................EFA..2_.).PLEASE
BACKUP THIS DISK BEFORE USING IT.EFA..1
_.(AN EXCELLENT PUBLIC DOMAIN BASIC PROG
RAMEFA.B1_.('1541BACKUP(FREE)' IS THE LA
ST PROGRAM EFA.L1_.(ON THIS DISK - USE
IT TO COPY THE WHOLE EFA.V2_.)DISK - THE
N RUN COMAL ... .EFA..1_.(
........................................
EFA..!_..NEWSLETTER: COMAL TODAY.E`A..._
.%TUTORIAL: FOUNDATIONS ... WITH COMAL.E
`A..#_..REFERENCE: COMAL HANDBOOK.E`A..0
_.'FROM:COMAL USERS GROUP, U.S.A., LIMIT
EDE`A..._.%5501 GROVELAND TER, MADISON W
I 53716.E`A..1_.(SELF ADDRESSED STAMPED
ENVELOPE FOR INFOEFA.&...0.........E.:..
.D0_.'..................................
.....E`A.N8..-.H.ELP .D.EMO .C.OMAL .G.R
APHICS (H,D,C,G):........X........B..9..
.C...C...P...P..3..L._..YOUR TURN NOW ..
.E`A.V......9...H...H......._..HELP REQU
ESTED !!!E`A..._`A..._..I - INFORMATIONE
`A..._..C - COMAL KEYWORDSE`A..(_..G - G
RAPHICS (INCLUDING TURTLE)E`A..._..S - S
PRITE STATEMENTSE`A.F._`A.P ...WHICH HEL
P TO SEE? ........Z...............I...I.
.2.......INFORMATION*.........C...C..U.
......HELP-COMAL.........G...G..{.....
..HELP-GRAPHICS.. ......S...S.. ..*....
HELP-SPRITES..4.....>._..WHAT?E`A.H...R.
.9...D...D.....\ _..LOADING IN DEMO PROG
RAME`A.F.R..LOGO'BOOK'SAMPLETS.P..9...G.
..G..%..Z............L........9...._..WH
AT?E`A.......ZCD,.... FOREVER..#. ------
------------------------.J9. SEQUENTIAL
FILE TO SCREEN SCROLLING - BY LEN LINDSA
Y.T@. SEE'ROLL("SCREEN.TEST.W") <--- CAL
L PROC SEE'ROLL LIKE THIS...P.O..T.|..6.
IMPORT SHIFT'WAIT // NEEDED ONLY IN VE
RSION 2.00..4......P.E. ALLOW ROOM FOR O
NE SCREEN LINE OF TEXT..B....J:. FILE NU
MBER - REST OF PROGRAM SHOULDN'T USE SAM
E NUMBER..!O..P. MAKE SURE FILE IS CLOSE
D.............7_...E`A. CLEAR SCREEN WIT
HOUT COMMA - ENDS ON LINE 2.$....$...HKL
..... GET NEXT LINE OF TEXT.8E. MADE TO
READ WORDPRO PRINTER FILES MADE UNDER CB
M PRINTER CHOICE.B9. NEXT LINE REMOVES A
CURSOR DOWN CHARACTER - CHR$(17).LB. WH
ICH IS USED BY THE CBM PRINTER TO SWITCH
TO LOWER CASE MODE.V<. ALSO SQUARE BRAC
KETS ARE FIXED :: CHR$(219) & CHR$(221).
`.H...K..6J.....K..6....K<.J.....K..6...
...K..6...[K<..T.....K..6......K..6...]K
<..~5... CALL PROC TO WAIT FOR SHIFT BE
FORE CONTINUING..._..E`A. PRINT LINE..1Z
..].... UNTIL HIT END OF SEQUENTIAL TEXT
FILE...O..P. CLOSE THE FILE..:.."FINISH
ED - HIT <RETURN> WHEN READY...... END O
F PROC..._`A...}..D...N.P....|.X1.....:.
152 ROM LOCATION FOR SHIFT STATUS - PET.
.....X7.....'_..PRESS SHIFT.E`A. CURSOR
UP AT END..$_.. .E`A. ERASE ME
SSAGE.........}.........................
.................X......................
..REPLY.MESSAGE.X.C.SEE'ROLL.FILE'NAME.T
EXT.SEE'FILE.SHIFT'WAIT.SHIFT'FLAG.LIDT.
JUMP.LST..
> CLICK IMAGE PREVIEW FOR FULL MODAL