00000000: 01 40 1B 40 0A 00 8F 20 42 41 53 49 43 20 50 52 |.@.@... BASIC PR|
00000010: 4F 47 52 41 4D 20 53 45 54 55 50 00 36 40 14 00 |OGRAM SETUP.6@..|
00000020: FE 25 3A 20 8F 20 45 4E 41 42 4C 45 20 32 20 4D |.%: . ENABLE 2 M|
00000030: 48 20 4D 4F 44 45 00 69 40 1E 00 97 34 37 2C 30 |H MODE.i@...47,0|
00000040: 3A 97 34 38 2C 36 38 3A 9C 3A 20 8F 20 53 45 54 |:.48,68:.: . SET|
00000050: 20 55 50 20 31 36 4B 20 42 55 46 46 45 52 20 46 | UP 16K BUFFER F|
00000060: 4F 52 20 40 53 54 41 53 48 00 AD 40 28 00 40 9C |OR @STASH..@(.@.|
00000070: 2C 30 3A 40 DE 2C 34 2C 30 3A 8F 20 43 4C 52 20 |,0:@.,4,0:. CLR |
00000080: 41 4E 44 20 47 4F 54 4F 20 55 4C 54 52 41 20 48 |AND GOTO ULTRA H|
00000090: 49 52 45 53 20 53 43 52 45 45 4E 2C 20 53 45 54 |IRES SCREEN, SET|
000000A0: 20 43 4F 4C 4F 52 53 20 42 47 2C 46 47 00 F8 40 | COLORS BG,FG..@|
000000B0: 32 00 D7 20 31 37 30 3A 8F 20 53 45 54 20 55 50 |2.. 170:. SET UP|
000000C0: 20 53 59 4E 54 41 58 20 45 52 52 4F 52 20 54 52 | SYNTAX ERROR TR|
000000D0: 41 50 20 54 4F 20 52 45 54 55 52 4E 20 54 4F 20 |AP TO RETURN TO |
000000E0: 54 45 58 54 20 4D 4F 44 45 20 41 4E 44 20 4C 49 |TEXT MODE AND LI|
000000F0: 53 54 20 45 52 52 4F 52 00 12 41 3C 00 8F 20 50 |ST ERROR..A<.. P|
00000100: 52 4F 47 52 41 4D 20 42 45 47 49 4E 53 20 48 45 |ROGRAM BEGINS HE|
00000110: 52 45 00 1F 41 46 00 41 44 B2 35 35 32 39 36 00 |RE..AF.AD.55296.|
00000120: 25 41 50 00 3A 00 42 41 5A 00 40 E0 2C 41 44 2C |%AP.:.BAZ.@.,AD,|
00000130: 31 35 30 2C 30 2C 31 30 2C 31 30 2C 22 C8 C5 CC |150,0,10,10,"...|
00000140: D0 22 00 8B 41 64 00 40 E0 2C 41 44 2C 37 35 2C |."..Ad.@.,AD,75,|
00000150: 31 30 30 2C 32 2C 31 2C 22 D5 4C 54 52 41 20 C8 |100,2,1,".LTRA .|
00000160: 49 52 45 53 20 43 4F 4D 45 53 20 43 4F 4E 46 49 |IRES COMES CONFI|
00000170: 47 55 52 45 44 20 46 4F 52 20 41 4E 20 C5 50 53 |GURED FOR AN .PS|
00000180: 4F 4E 20 50 52 49 4E 54 45 52 22 00 D3 41 6E 00 |ON PRINTER"..An.|
00000190: 40 E0 2C 41 44 2C 38 33 2C 31 32 34 2C 32 2C 31 |@.,AD,83,124,2,1|
000001A0: 2C 22 C9 46 20 59 4F 55 20 57 49 53 48 20 54 4F |,".F YOU WISH TO|
000001B0: 20 43 48 41 4E 47 45 20 49 54 20 54 4F 20 D3 D0 | CHANGE IT TO ..|
000001C0: C9 D2 C9 D4 38 30 20 4F 52 20 CF 4C 49 56 45 54 |....80 OR .LIVET|
000001D0: 54 49 22 00 12 42 78 00 40 E0 2C 41 44 2C 38 33 |TI"..Bx.@.,AD,83|
000001E0: 2C 31 34 38 2C 32 2C 31 2C 22 52 55 4E 20 54 48 |,148,2,1,"RUN TH|
000001F0: 45 20 50 52 4F 47 52 41 4D 20 43 41 4C 4C 45 44 |E PROGRAM CALLED|
00000200: 20 55 48 2E 50 52 49 4E 54 45 52 2D 53 45 54 55 | UH.PRINTER-SETU|
00000210: 50 22 00 3D 42 82 00 40 E0 2C 41 44 2C 38 33 2C |P".=B..@.,AD,83,|
00000220: 31 37 32 2C 32 2C 31 2C 22 46 4F 55 4E 44 20 4F |172,2,1,"FOUND O|
00000230: 4E 20 54 48 49 53 20 44 49 53 4B 2E 22 00 46 42 |N THIS DISK.".FB|
00000240: 8C 00 FE 0B 20 36 00 53 42 96 00 8A 20 22 44 45 |.... 6.SB... "DE|
00000250: 4D 4F 22 00 86 42 A0 00 8F 20 47 4F 54 4F 20 54 |MO"..B... GOTO T|
00000260: 45 58 54 20 4D 4F 44 45 2C 20 50 52 49 4E 54 20 |EXT MODE, PRINT |
00000270: 53 54 41 54 55 53 20 41 4E 44 20 45 4E 44 20 50 |STATUS AND END P|
00000280: 52 4F 47 52 41 4D 00 94 42 AA 00 40 54 45 58 54 |ROGRAM..B..@TEXT|
00000290: 3A EA 3A 80 00 00 00 |:.:.... |
.@.@... BASIC PROGRAM SETUP.6@...%: . EN
ABLE 2 MH MODE.I@...47,0:.48,68:.: . SET
UP 16K BUFFER FOR @STASH..@(.@.,0:@.,4,
0:. CLR AND GOTO ULTRA HIRES SCREEN, SET
COLORS BG,FG..@2.W 170:. SET UP SYNTAX
ERROR TRAP TO RETURN TO TEXT MODE AND LI
ST ERROR..A<.. PROGRAM BEGINS HERE..AF.A
D.55296.%AP.:.BAZ.@.,AD,150,0,10,10,"HEL
P"..AD.@.,AD,75,100,2,1,"ULTRA HIRES COM
ES CONFIGURED FOR AN EPSON PRINTER".SAN.
@.,AD,83,124,2,1,"IF YOU WISH TO CHANGE
IT TO SPIRIT80 OR OLIVETTI"..BX.@.,AD,83
,148,2,1,"RUN THE PROGRAM CALLED UH.PRIN
TER-SETUP".=B..@.,AD,83,172,2,1,"FOUND O
N THIS DISK.".FB.... 6.SB... "DEMO"..B .
. GOTO TEXT MODE, PRINT STATUS AND END P
ROGRAM..B..@TEXT:.:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL