P/PCSsrc

Home » Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_25.ADF » P/PCSsrc

P/PCSsrc

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk:	Home » Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_25.ADF
Filename:	P/PCSsrc
Read OK:	✔
File size:	1A2F bytes
Load address:	FFFF0E00
Exec address:	FFFF8023

Duplicates

There is 1 duplicate copy of this file in the archive:

AEW website » eug » eug_5_25_discs_Eug-25_D-EUG25.dsd » U.PCSSrc
Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_25.ADF » P/PCSsrc

File contents

   10REM ***************************
   20REM Printer Code Setter
   30REM by Richard A. Dimond
   40REM (c) March 1993
   50REM ***************************
   60REM
   70PROCassem
   80PRINT"Saving..."
   90OSCLI"SAVE PCS 5000 "+STR$~P%+" "+STR$~start
  100END
  110DEFPROCassem
  120mem=&70:tmp=&72:ptr=&F2
  130osasci=&FFE3:oswrch=&FFEE:osnewl=&FFE7
  140FORpass=0TO2STEP2
  150P%=&5000
  160[OPTpass
  170.prt
  180STXmem:STYmem+1
  190.lp1 LDY#0
  200.lp2 LDA(mem),Y
  210CMP#&FF:BEQexit
  220JSRosasci:INY:BNElp2
  230INCmem+1
  240JMPlp1
  250.exit RTS
  260.start LDA#22:JSRoswrch:LDA#6:JSRoswrch
  270LDX#text1 MOD256
  280LDY#text1 DIV256
  290JSRprt
  300JSR&FFE0
  310LDA#12:JSRoswrch
  320LDX#text2 MOD256
  330LDY#text2 DIV256
  340JSRprt
  350.enter JSR&FFE7:LDA#63:JSRoswrch
  360LDA#0
  370LDX#buffer MOD256
  380LDY#buffer DIV256
  390JSR&FFF1
  400LDA&600:CMP#&0D:BNEcommand:RTS
  410.command 
  420LDX#0
  430.com1 LDAcoms,X:CMP#&FF:BEQnocom:LDY#0
  440.com2 LDAcoms,X:BEQgotcom:LDA&600,Y:CMP#&2A:BEQskip:AND#&DF:CMPcoms,X:BNEnextone:INY:INX:BNEcom2
  450.nextone INX:LDAcoms,X:BNEnextone:INX:INX:INX:BNEcom1
  460.gotcom INX:LDAcoms,X:STAmem:LDAcoms+1,X:STAmem+1:JMP(mem)
  470.nocom EQUB0:EQUB255:EQUS"Bad command":EQUB0
  480.comout JMPenter
  490.skip INY:JMPcom2
  500.buffer
  510EQUW&600:EQUB4:EQUB32:EQUB127
  520.text1  EQUB13:EQUS "  Printer Code Setter Commands:"+CHR$13+CHR$13
  530EQUS"*RES  *DRA  *NLQ"+CHR$13+CHR$13
  540EQUS"*PIC  *ELI  *COS  *COF"+CHR$13
  550EQUS"*DHS  *DHF  *DSS  *DSF"+CHR$13
  560EQUS"*EMS  *EMF  *ENS  *ENF"+CHR$13
  570EQUS"*ITS  *ITF  *SPS  *SBS  *SSF"+CHR$13
  580EQUS"*ULS  *ULF"+CHR$13+CHR$13
  590EQUS"*ENG  English Set up for the ` sign"+CHR$13
  600EQUS"*EXP  Expand character set to Graphics"+CHR$13+CHR$13
  610EQUS"*LFA  Line feed 1/8"""+CHR$13
  620EQUS"*LFB  Line feed 7/72"""+CHR$13
  630EQUS"*LFC  Line feed 1/6"""+CHR$13+CHR$13
  640EQUS"*CNA  Column 1 at TAB(0)"+CHR$13
  650EQUS"*CNB  Column 2 at TAB(45)"+CHR$13
  660EQUS"*CNC  Column 3 at TAB(90)"+CHR$13
  670EQUS"     All 40 characters wide"+CHR$13+CHR$13
  680EQUS"         Press space to continue":EQUB-1
  690.text2 EQUB13:EQUS"NOTE:"+CHR$13
  700EQUS"   For 2 column printing use ELI+DSS"+CHR$13
  710EQUS"   For 3 column printing use COS+DSS"+CHR$13+CHR$13
  720EQUS"Enter commands"+CHR$13+CHR$13
  730EQUB-1
  740.coms
  750EQUS"RES":EQUB0:EQUWres
  760EQUS"DRA":EQUB0:EQUWdra
  770EQUS"NLQ":EQUB0:EQUWnlq
  780EQUS"PIC":EQUB0:EQUWpic
  790EQUS"ELI":EQUB0:EQUWeli
  800EQUS"COS":EQUB0:EQUWcos
  810EQUS"COF":EQUB0:EQUWcof
  820EQUS"DHS":EQUB0:EQUWdhs
  830EQUS"DHF":EQUB0:EQUWdhf
  840EQUS"DSS":EQUB0:EQUWdsf
  850EQUS"EMS":EQUB0:EQUWems
  860EQUS"EMF":EQUB0:EQUWemf
  870EQUS"ENG":EQUB0:EQUWeng
  880EQUS"ENS":EQUB0:EQUWens
  890EQUS"ENF":EQUB0:EQUWenf
  900EQUS"ITS":EQUB0:EQUWits
  910EQUS"ITF":EQUB0:EQUWitf
  920EQUS"SPS":EQUB0:EQUWsps
  930EQUS"SBS":EQUB0:EQUWsbs
  940EQUS"SSF":EQUB0:EQUWssf
  950EQUS"ULS":EQUB0:EQUWuls
  960EQUS"ULF":EQUB0:EQUWulf
  970EQUS"EXP":EQUB0:EQUWexp
  980EQUS"LFA":EQUB0:EQUWlfa
  990EQUS"LFB":EQUB0:EQUWlfb
 1000EQUS"LFC":EQUB0:EQUWlfc
 1010EQUS"CNA":EQUB0:EQUWcna
 1020EQUS"CNB":EQUB0:EQUWcnb
 1030EQUS"CNC":EQUB0:EQUWcnc
 1040EQUB-1
 1050.prtron
 1060LDA#2:JMPoswrch
 1070.prtroff
 1080LDA#3:JMPoswrch
 1090.esc
 1100LDA#1:JSRoswrch
 1110LDA#27:JMPoswrch
 1120.res
 1130JSRprtron
 1140JSResc
 1150LDA#1:JSRoswrch:LDA#64:JSRoswrch
 1160JSRprtroff
 1170JMPcomout
 1180.dra
 1190JSRprtron
 1200JSResc
 1210LDA#1:JSRoswrch:LDA#120:JSRoswrch
 1220LDA#1:JSRoswrch:LDA#0:JSRoswrch
 1230JSRprtroff
 1240JMPcomout
 1250.nlq
 1260JSRprtron
 1270JSResc
 1280LDA#1:JSRoswrch:LDA#120:JSRoswrch
 1290LDA#1:JSRoswrch:LDA#1:JSRoswrch
 1300JSRprtroff
 1310JMPcomout
 1320.pic
 1330JSRprtron
 1340JSResc
 1350LDA#1:JSRoswrch:LDA#80:JSRoswrch
 1360JSRprtroff
 1370JMPcomout
 1380.eli
 1390JSRprtron
 1400JSResc
 1410LDA#1:JSRoswrch:LDA#77:JSRoswrch
 1420JSRprtroff
 1430JMPcomout
 1440.cos
 1450JSRprtron
 1460JSResc
 1470LDA#1:JSRoswrch:LDA#15:JSRoswrch
 1480JSRprtroff
 1490JMPcomout
 1500.cof
 1510JSRprtron
 1520LDA#1:JSRoswrch:LDA#18:JSRoswrch
 1530JSRprtroff
 1540JMPcomout
 1550.dhs
 1560JSRprtron
 1570JSResc
 1580LDA#1:JSRoswrch:LDA#119:JSRoswrch
 1590LDA#1:JSRoswrch:LDA#1:JSRoswrch
 1600JSRprtroff
 1610JMPcomout
 1620.dhf
 1630JSRprtron
 1640JSResc
 1650LDA#1:JSRoswrch:LDA#119:JSRoswrch
 1660LDA#1:JSRoswrch:LDA#0:JSRoswrch
 1670JSRprtroff
 1680JMPcomout
 1690.dss
 1700JSRprtron
 1710JSResc
 1720LDA#1:JSRoswrch:LDA#71:JSRoswrch
 1730JSRprtroff
 1740JMPcomout
 1750.dsf
 1760JSRprtron
 1770JSResc
 1780LDA#1:JSRoswrch:LDA#72:JSRoswrch
 1790JSRprtroff
 1800JMPcomout
 1810.ems
 1820JSRprtron
 1830JSResc
 1840LDA#1:JSRoswrch:LDA#69:JSRoswrch
 1850JSRprtroff
 1860JMPcomout
 1870.emf
 1880JSRprtron
 1890JSResc
 1900LDA#1:JSRoswrch:LDA#70:JSRoswrch
 1910JSRprtroff
 1920JMPcomout
 1930.eng
 1940JSRprtron
 1950JSResc
 1960LDA#1:JSRoswrch:LDA#82:JSRoswrch
 1970LDA#1:JSRoswrch:LDA#3:JSRoswrch
 1980JSRprtroff
 1990JMPcomout
 2000.ens
 2010JSRprtron
 2020JSResc
 2030LDA#1:JSRoswrch:LDA#87:JSRoswrch
 2040LDA#1:JSRoswrch:LDA#1:JSRoswrch
 2050JSRprtroff
 2060JMPcomout
 2070.enf
 2080JSRprtron
 2090JSResc
 2100LDA#1:JSRoswrch:LDA#87:JSRoswrch
 2110LDA#1:JSRoswrch:LDA#0:JSRoswrch
 2120JSRprtroff
 2130JMPcomout
 2140.its
 2150JSRprtron
 2160JSResc
 2170LDA#1:JSRoswrch:LDA#52:JSRoswrch
 2180JSRprtroff
 2190JMPcomout
 2200.itf
 2210JSRprtron
 2220JSResc
 2230LDA#1:JSRoswrch:LDA#53:JSRoswrch
 2240JSRprtroff
 2250JMPcomout
 2260.sps
 2270JSRprtron
 2280JSResc
 2290LDA#1:JSRoswrch:LDA#83:JSRoswrch
 2300LDA#1:JSRoswrch:LDA#0:JSRoswrch
 2310JSRprtroff
 2320JMPcomout
 2330.sbs
 2340JSRprtron
 2350JSResc
 2360LDA#1:JSRoswrch:LDA#83:JSRoswrch
 2370LDA#1:JSRoswrch:LDA#1:JSRoswrch
 2380JSRprtroff
 2390JMPcomout
 2400.ssf
 2410JSRprtron
 2420JSResc
 2430LDA#1:JSRoswrch:LDA#84:JSRoswrch
 2440JSRprtroff
 2450JMPcomout
 2460.uls
 2470JSRprtron
 2480JSResc
 2490LDA#1:JSRoswrch:LDA#45:JSRoswrch
 2500LDA#1:JSRoswrch:LDA#1:JSRoswrch
 2510JSRprtroff
 2520JMPcomout
 2530.ulf
 2540JSRprtron
 2550JSResc
 2560LDA#1:JSRoswrch:LDA#45:JSRoswrch
 2570LDA#1:JSRoswrch:LDA#0:JSRoswrch
 2580JSRprtroff
 2590JMPcomout
 2600.exp
 2610JSRprtron
 2620JSResc
 2630LDA#1:JSRoswrch:LDA#54:JSRoswrch
 2640JSResc
 2650LDA#1:JSRoswrch:LDA#73:JSRoswrch
 2660LDA#1:JSRoswrch:LDA#0:JSRoswrch
 2670JSResc
 2680LDA#1:JSRoswrch:LDA#116:JSRoswrch
 2690LDA#1:JSRoswrch:LDA#1:JSRoswrch
 2700JSRprtroff
 2710JMPcomout
 2720.lfa
 2730JSRprtron
 2740JSResc
 2750LDA#1:JSRoswrch:LDA#48:JSRoswrch
 2760JSRprtroff
 2770JMPcomout
 2780.lfb
 2790JSRprtron
 2800JSResc
 2810LDA#1:JSRoswrch:LDA#49:JSRoswrch
 2820JSRprtroff
 2830JMPcomout
 2840.lfc
 2850JSRprtron
 2860JSResc
 2870LDA#1:JSRoswrch:LDA#50:JSRoswrch
 2880JSRprtroff
 2890JMPcomout
 2900.cna
 2910JSRprtron
 2920JSResc
 2930LDA#1:JSRoswrch:LDA#108:JSRoswrch
 2940LDA#1:JSRoswrch:LDA#0:JSRoswrch
 2950JSResc
 2960LDA#1:JSRoswrch:LDA#81:JSRoswrch
 2970LDA#1:JSRoswrch:LDA#40:JSRoswrch
 2980JSRprtroff
 2990JMPcomout
 3000.cnb
 3010JSRprtron
 3020JSResc
 3030LDA#1:JSRoswrch:LDA#81:JSRoswrch
 3040LDA#1:JSRoswrch:LDA#85:JSRoswrch
 3050JSResc
 3060LDA#1:JSRoswrch:LDA#108:JSRoswrch
 3070LDA#1:JSRoswrch:LDA#45:JSRoswrch
 3080JSRprtroff
 3090JMPcomout
 3100.cnc
 3110JSRprtron
 3120JSResc
 3130LDA#1:JSRoswrch:LDA#81:JSRoswrch
 3140 LDA#1:JSRoswrch:LDA#130:JSRoswrch
 3150JSResc
 3160LDA#1:JSRoswrch:LDA#108:JSRoswrch
 3170LDA#1:JSRoswrch:LDA#90:JSRoswrch
 3180JSRprtroff
 3190JMPcomout
 3200]
 3210NEXT:ENDPROC


!� ***************************
� Printer Code Setter
� by Richard A. Dimond
(� (c) March 1993
2!� ***************************
<�
F
�assem
P�"Saving..."
Z&�"SAVE PCS 5000 "+�~P%+" "+�~start
d�
n��assem
xmem=&70:tmp=&72:ptr=&F2
�*osasci=&FFE3:oswrch=&FFEE:osnewl=&FFE7
��pass=0�2�2
�P%=&5000
�[OPTpass
�.prt
�STXmem:STYmem+1
�.lp1 LDY#0
�.lp2 LDA(mem),Y
�CMP#&FF:BEQexit
�JSRosasci:INY:BNElp2
�INCmem+1
�
JMPlp1
�
.exit RTS
+.start LDA#22:JSRoswrch:LDA#6:JSRoswrch
LDX#text1 �256
LDY#text1 �256
"
JSRprt
,JSR&FFE0
6LDA#12:JSRoswrch
@LDX#text2 �256
JLDY#text2 �256
T
JSRprt
^$.enter JSR&FFE7:LDA#63:JSRoswrch
h	LDA#0
rLDX#buffer �256
|LDY#buffer �256
�JSR&FFF1
�"LDA&600:CMP#&0D:BNEcommand:RTS
�
.command 
�	LDX#0
�*.com1 LDAcoms,X:CMP#&FF:BEQnocom:LDY#0
�b.com2 LDAcoms,X:BEQgotcom:LDA&600,Y:CMP#&2A:BEQskip:�#&DF:CMPcoms,X:BNEnextone:INY:INX:BNEcom2
�9.nextone INX:LDAcoms,X:BNEnextone:INX:INX:INX:BNEcom1
�>.gotcom INX:LDAcoms,X:STAmem:LDAcoms+1,X:STAmem+1:JMP(mem)
�0.nocom EQUB0:EQUB255:EQUS"Bad command":EQUB0
�.comout JMPenter
�.skip INY:JMPcom2
�.buffer
�!EQUW&600:EQUB4:EQUB32:EQUB127
A.text1  EQUB13:EQUS "  Printer Code Setter Commands:"+�13+�13
"EQUS"*RES  *DRA  *NLQ"+�13+�13
$EQUS"*PIC  *ELI  *COS  *COF"+�13
&$EQUS"*DHS  *DHF  *DSS  *DSF"+�13
0$EQUS"*EMS  *EMF  *ENS  *ENF"+�13
:*EQUS"*ITS  *ITF  *SPS  *SBS  *SSF"+�13
DEQUS"*ULS  *ULF"+�13+�13
N1EQUS"*ENG  English Set up for the ` sign"+�13
X8EQUS"*EXP  Expand character set to Graphics"+�13+�13
b#EQUS"*LFA  Line feed 1/8"""+�13
l$EQUS"*LFB  Line feed 7/72"""+�13
v'EQUS"*LFC  Line feed 1/6"""+�13+�13
�&EQUS"*CNA  Column 1 at TAB(0)"+�13
�'EQUS"*CNB  Column 2 at TAB(45)"+�13
�'EQUS"*CNC  Column 3 at TAB(90)"+�13
�-EQUS"     All 40 characters wide"+�13+�13
�1EQUS"         Press space to continue":EQUB-1
�!.text2 EQUB13:EQUS"NOTE:"+�13
�2EQUS"   For 2 column printing use ELI+DSS"+�13
�6EQUS"   For 3 column printing use COS+DSS"+�13+�13
� EQUS"Enter commands"+�13+�13
�
EQUB-1
�	.coms
�EQUS"RES":EQUB0:EQUWres
�EQUS"DRA":EQUB0:EQUWdra
EQUS"NLQ":EQUB0:EQUWnlq
EQUS"PIC":EQUB0:EQUWpic
EQUS"ELI":EQUB0:EQUWeli
 EQUS"COS":EQUB0:EQUWcos
*EQUS"COF":EQUB0:EQUWcof
4EQUS"DHS":EQUB0:EQUWdhs
>EQUS"DHF":EQUB0:EQUWdhf
HEQUS"DSS":EQUB0:EQUWdsf
REQUS"EMS":EQUB0:EQUWems
\EQUS"EMF":EQUB0:EQUWemf
fEQUS"ENG":EQUB0:EQUWeng
pEQUS"ENS":EQUB0:EQUWens
zEQUS"ENF":EQUB0:EQUWenf
�EQUS"ITS":EQUB0:EQUWits
�EQUS"ITF":EQUB0:EQUWitf
�EQUS"SPS":EQUB0:EQUWsps
�EQUS"SBS":EQUB0:EQUWsbs
�EQUS"SSF":EQUB0:EQUWssf
�EQUS"ULS":EQUB0:EQUWuls
�EQUS"ULF":EQUB0:EQUWulf
�EQUS"EXP":EQUB0:EQUWexp
�EQUS"LFA":EQUB0:EQUWlfa
�EQUS"LFB":EQUB0:EQUWlfb
�EQUS"LFC":EQUB0:EQUWlfc
�EQUS"CNA":EQUB0:EQUWcna
�EQUS"CNB":EQUB0:EQUWcnb
EQUS"CNC":EQUB0:EQUWcnc

EQUB-1
.prtron
$LDA#2:JMPoswrch
..prtroff
8LDA#3:JMPoswrch
B.esc
LLDA#1:JSRoswrch
VLDA#27:JMPoswrch
`.res
j
JSRprtron
t
JSResc
~$LDA#1:JSRoswrch:LDA#64:JSRoswrch
�JSRprtroff
�
JMPcomout
�.dra
�
JSRprtron
�
JSResc
�%LDA#1:JSRoswrch:LDA#120:JSRoswrch
�#LDA#1:JSRoswrch:LDA#0:JSRoswrch
�JSRprtroff
�
JMPcomout
�.nlq
�
JSRprtron
�
JSResc
%LDA#1:JSRoswrch:LDA#120:JSRoswrch

#LDA#1:JSRoswrch:LDA#1:JSRoswrch
JSRprtroff

JMPcomout
(.pic
2
JSRprtron
<
JSResc
F$LDA#1:JSRoswrch:LDA#80:JSRoswrch
PJSRprtroff
Z
JMPcomout
d.eli
n
JSRprtron
x
JSResc
�$LDA#1:JSRoswrch:LDA#77:JSRoswrch
�JSRprtroff
�
JMPcomout
�.cos
�
JSRprtron
�
JSResc
�$LDA#1:JSRoswrch:LDA#15:JSRoswrch
�JSRprtroff
�
JMPcomout
�.cof
�
JSRprtron
�$LDA#1:JSRoswrch:LDA#18:JSRoswrch
�JSRprtroff

JMPcomout
.dhs

JSRprtron
"
JSResc
,%LDA#1:JSRoswrch:LDA#119:JSRoswrch
6#LDA#1:JSRoswrch:LDA#1:JSRoswrch
@JSRprtroff
J
JMPcomout
T.dhf
^
JSRprtron
h
JSResc
r%LDA#1:JSRoswrch:LDA#119:JSRoswrch
|#LDA#1:JSRoswrch:LDA#0:JSRoswrch
�JSRprtroff
�
JMPcomout
�.dss
�
JSRprtron
�
JSResc
�$LDA#1:JSRoswrch:LDA#71:JSRoswrch
�JSRprtroff
�
JMPcomout
�.dsf
�
JSRprtron
�
JSResc
�$LDA#1:JSRoswrch:LDA#72:JSRoswrch
�JSRprtroff

JMPcomout
.ems

JSRprtron
&
JSResc
0$LDA#1:JSRoswrch:LDA#69:JSRoswrch
:JSRprtroff
D
JMPcomout
N.emf
X
JSRprtron
b
JSResc
l$LDA#1:JSRoswrch:LDA#70:JSRoswrch
vJSRprtroff
�
JMPcomout
�.eng
�
JSRprtron
�
JSResc
�$LDA#1:JSRoswrch:LDA#82:JSRoswrch
�#LDA#1:JSRoswrch:LDA#3:JSRoswrch
�JSRprtroff
�
JMPcomout
�.ens
�
JSRprtron
�
JSResc
�$LDA#1:JSRoswrch:LDA#87:JSRoswrch
�#LDA#1:JSRoswrch:LDA#1:JSRoswrch
JSRprtroff

JMPcomout
.enf
 
JSRprtron
*
JSResc
4$LDA#1:JSRoswrch:LDA#87:JSRoswrch
>#LDA#1:JSRoswrch:LDA#0:JSRoswrch
HJSRprtroff
R
JMPcomout
\.its
f
JSRprtron
p
JSResc
z$LDA#1:JSRoswrch:LDA#52:JSRoswrch
�JSRprtroff
�
JMPcomout
�.itf
�
JSRprtron
�
JSResc
�$LDA#1:JSRoswrch:LDA#53:JSRoswrch
�JSRprtroff
�
JMPcomout
�.sps
�
JSRprtron
�
JSResc
�$LDA#1:JSRoswrch:LDA#83:JSRoswrch
�#LDA#1:JSRoswrch:LDA#0:JSRoswrch
	JSRprtroff
	
JMPcomout
	.sbs
	$
JSRprtron
	.
JSResc
	8$LDA#1:JSRoswrch:LDA#83:JSRoswrch
	B#LDA#1:JSRoswrch:LDA#1:JSRoswrch
	LJSRprtroff
	V
JMPcomout
	`.ssf
	j
JSRprtron
	t
JSResc
	~$LDA#1:JSRoswrch:LDA#84:JSRoswrch
	�JSRprtroff
	�
JMPcomout
	�.uls
	�
JSRprtron
	�
JSResc
	�$LDA#1:JSRoswrch:LDA#45:JSRoswrch
	�#LDA#1:JSRoswrch:LDA#1:JSRoswrch
	�JSRprtroff
	�
JMPcomout
	�.ulf
	�
JSRprtron
	�
JSResc
$LDA#1:JSRoswrch:LDA#45:JSRoswrch

#LDA#1:JSRoswrch:LDA#0:JSRoswrch
JSRprtroff

JMPcomout
(.exp
2
JSRprtron
<
JSResc
F$LDA#1:JSRoswrch:LDA#54:JSRoswrch
P
JSResc
Z$LDA#1:JSRoswrch:LDA#73:JSRoswrch
d#LDA#1:JSRoswrch:LDA#0:JSRoswrch
n
JSResc
x%LDA#1:JSRoswrch:LDA#116:JSRoswrch
�#LDA#1:JSRoswrch:LDA#1:JSRoswrch
�JSRprtroff
�
JMPcomout
�.lfa
�
JSRprtron
�
JSResc
�$LDA#1:JSRoswrch:LDA#48:JSRoswrch
�JSRprtroff
�
JMPcomout
�.lfb
�
JSRprtron
�
JSResc
�$LDA#1:JSRoswrch:LDA#49:JSRoswrch
JSRprtroff

JMPcomout
.lfc
"
JSRprtron
,
JSResc
6$LDA#1:JSRoswrch:LDA#50:JSRoswrch
@JSRprtroff
J
JMPcomout
T.cna
^
JSRprtron
h
JSResc
r%LDA#1:JSRoswrch:LDA#108:JSRoswrch
|#LDA#1:JSRoswrch:LDA#0:JSRoswrch
�
JSResc
�$LDA#1:JSRoswrch:LDA#81:JSRoswrch
�$LDA#1:JSRoswrch:LDA#40:JSRoswrch
�JSRprtroff
�
JMPcomout
�.cnb
�
JSRprtron
�
JSResc
�$LDA#1:JSRoswrch:LDA#81:JSRoswrch
�$LDA#1:JSRoswrch:LDA#85:JSRoswrch
�
JSResc
�%LDA#1:JSRoswrch:LDA#108:JSRoswrch
�$LDA#1:JSRoswrch:LDA#45:JSRoswrch
JSRprtroff

JMPcomout
.cnc
&
JSRprtron
0
JSResc
:$LDA#1:JSRoswrch:LDA#81:JSRoswrch
D& LDA#1:JSRoswrch:LDA#130:JSRoswrch
N
JSResc
X%LDA#1:JSRoswrch:LDA#108:JSRoswrch
b$LDA#1:JSRoswrch:LDA#90:JSRoswrch
lJSRprtroff
v
JMPcomout
�]
��:�
�

00000000  0d 00 0a 21 f4 20 2a 2a  2a 2a 2a 2a 2a 2a 2a 2a  |...!. **********|
00000010  2a 2a 2a 2a 2a 2a 2a 2a  2a 2a 2a 2a 2a 2a 2a 2a  |****************|
00000020  2a 0d 00 14 19 f4 20 50  72 69 6e 74 65 72 20 43  |*..... Printer C|
00000030  6f 64 65 20 53 65 74 74  65 72 0d 00 1e 1a f4 20  |ode Setter..... |
00000040  62 79 20 52 69 63 68 61  72 64 20 41 2e 20 44 69  |by Richard A. Di|
00000050  6d 6f 6e 64 0d 00 28 14  f4 20 28 63 29 20 4d 61  |mond..(.. (c) Ma|
00000060  72 63 68 20 31 39 39 33  0d 00 32 21 f4 20 2a 2a  |rch 1993..2!. **|
00000070  2a 2a 2a 2a 2a 2a 2a 2a  2a 2a 2a 2a 2a 2a 2a 2a  |****************|
00000080  2a 2a 2a 2a 2a 2a 2a 2a  2a 0d 00 3c 05 f4 0d 00  |*********..<....|
00000090  46 0a f2 61 73 73 65 6d  0d 00 50 10 f1 22 53 61  |F..assem..P.."Sa|
000000a0  76 69 6e 67 2e 2e 2e 22  0d 00 5a 26 ff 22 53 41  |ving..."..Z&."SA|
000000b0  56 45 20 50 43 53 20 35  30 30 30 20 22 2b c3 7e  |VE PCS 5000 "+.~|
000000c0  50 25 2b 22 20 22 2b c3  7e 73 74 61 72 74 0d 00  |P%+" "+.~start..|
000000d0  64 05 e0 0d 00 6e 0b dd  f2 61 73 73 65 6d 0d 00  |d....n...assem..|
000000e0  78 1b 6d 65 6d 3d 26 37  30 3a 74 6d 70 3d 26 37  |x.mem=&70:tmp=&7|
000000f0  32 3a 70 74 72 3d 26 46  32 0d 00 82 2a 6f 73 61  |2:ptr=&F2...*osa|
00000100  73 63 69 3d 26 46 46 45  33 3a 6f 73 77 72 63 68  |sci=&FFE3:oswrch|
00000110  3d 26 46 46 45 45 3a 6f  73 6e 65 77 6c 3d 26 46  |=&FFEE:osnewl=&F|
00000120  46 45 37 0d 00 8c 0f e3  70 61 73 73 3d 30 b8 32  |FE7.....pass=0.2|
00000130  88 32 0d 00 96 0c 50 25  3d 26 35 30 30 30 0d 00  |.2....P%=&5000..|
00000140  a0 0c 5b 4f 50 54 70 61  73 73 0d 00 aa 08 2e 70  |..[OPTpass.....p|
00000150  72 74 0d 00 b4 13 53 54  58 6d 65 6d 3a 53 54 59  |rt....STXmem:STY|
00000160  6d 65 6d 2b 31 0d 00 be  0e 2e 6c 70 31 20 4c 44  |mem+1.....lp1 LD|
00000170  59 23 30 0d 00 c8 13 2e  6c 70 32 20 4c 44 41 28  |Y#0.....lp2 LDA(|
00000180  6d 65 6d 29 2c 59 0d 00  d2 13 43 4d 50 23 26 46  |mem),Y....CMP#&F|
00000190  46 3a 42 45 51 65 78 69  74 0d 00 dc 18 4a 53 52  |F:BEQexit....JSR|
000001a0  6f 73 61 73 63 69 3a 49  4e 59 3a 42 4e 45 6c 70  |osasci:INY:BNElp|
000001b0  32 0d 00 e6 0c 49 4e 43  6d 65 6d 2b 31 0d 00 f0  |2....INCmem+1...|
000001c0  0a 4a 4d 50 6c 70 31 0d  00 fa 0d 2e 65 78 69 74  |.JMPlp1.....exit|
000001d0  20 52 54 53 0d 01 04 2b  2e 73 74 61 72 74 20 4c  | RTS...+.start L|
000001e0  44 41 23 32 32 3a 4a 53  52 6f 73 77 72 63 68 3a  |DA#22:JSRoswrch:|
000001f0  4c 44 41 23 36 3a 4a 53  52 6f 73 77 72 63 68 0d  |LDA#6:JSRoswrch.|
00000200  01 0e 12 4c 44 58 23 74  65 78 74 31 20 83 32 35  |...LDX#text1 .25|
00000210  36 0d 01 18 12 4c 44 59  23 74 65 78 74 31 20 81  |6....LDY#text1 .|
00000220  32 35 36 0d 01 22 0a 4a  53 52 70 72 74 0d 01 2c  |256..".JSRprt..,|
00000230  0c 4a 53 52 26 46 46 45  30 0d 01 36 14 4c 44 41  |.JSR&FFE0..6.LDA|
00000240  23 31 32 3a 4a 53 52 6f  73 77 72 63 68 0d 01 40  |#12:JSRoswrch..@|
00000250  12 4c 44 58 23 74 65 78  74 32 20 83 32 35 36 0d  |.LDX#text2 .256.|
00000260  01 4a 12 4c 44 59 23 74  65 78 74 32 20 81 32 35  |.J.LDY#text2 .25|
00000270  36 0d 01 54 0a 4a 53 52  70 72 74 0d 01 5e 24 2e  |6..T.JSRprt..^$.|
00000280  65 6e 74 65 72 20 4a 53  52 26 46 46 45 37 3a 4c  |enter JSR&FFE7:L|
00000290  44 41 23 36 33 3a 4a 53  52 6f 73 77 72 63 68 0d  |DA#63:JSRoswrch.|
000002a0  01 68 09 4c 44 41 23 30  0d 01 72 13 4c 44 58 23  |.h.LDA#0..r.LDX#|
000002b0  62 75 66 66 65 72 20 83  32 35 36 0d 01 7c 13 4c  |buffer .256..|.L|
000002c0  44 59 23 62 75 66 66 65  72 20 81 32 35 36 0d 01  |DY#buffer .256..|
000002d0  86 0c 4a 53 52 26 46 46  46 31 0d 01 90 22 4c 44  |..JSR&FFF1..."LD|
000002e0  41 26 36 30 30 3a 43 4d  50 23 26 30 44 3a 42 4e  |A&600:CMP#&0D:BN|
000002f0  45 63 6f 6d 6d 61 6e 64  3a 52 54 53 0d 01 9a 0d  |Ecommand:RTS....|
00000300  2e 63 6f 6d 6d 61 6e 64  20 0d 01 a4 09 4c 44 58  |.command ....LDX|
00000310  23 30 0d 01 ae 2a 2e 63  6f 6d 31 20 4c 44 41 63  |#0...*.com1 LDAc|
00000320  6f 6d 73 2c 58 3a 43 4d  50 23 26 46 46 3a 42 45  |oms,X:CMP#&FF:BE|
00000330  51 6e 6f 63 6f 6d 3a 4c  44 59 23 30 0d 01 b8 62  |Qnocom:LDY#0...b|
00000340  2e 63 6f 6d 32 20 4c 44  41 63 6f 6d 73 2c 58 3a  |.com2 LDAcoms,X:|
00000350  42 45 51 67 6f 74 63 6f  6d 3a 4c 44 41 26 36 30  |BEQgotcom:LDA&60|
00000360  30 2c 59 3a 43 4d 50 23  26 32 41 3a 42 45 51 73  |0,Y:CMP#&2A:BEQs|
00000370  6b 69 70 3a 80 23 26 44  46 3a 43 4d 50 63 6f 6d  |kip:.#&DF:CMPcom|
00000380  73 2c 58 3a 42 4e 45 6e  65 78 74 6f 6e 65 3a 49  |s,X:BNEnextone:I|
00000390  4e 59 3a 49 4e 58 3a 42  4e 45 63 6f 6d 32 0d 01  |NY:INX:BNEcom2..|
000003a0  c2 39 2e 6e 65 78 74 6f  6e 65 20 49 4e 58 3a 4c  |.9.nextone INX:L|
000003b0  44 41 63 6f 6d 73 2c 58  3a 42 4e 45 6e 65 78 74  |DAcoms,X:BNEnext|
000003c0  6f 6e 65 3a 49 4e 58 3a  49 4e 58 3a 49 4e 58 3a  |one:INX:INX:INX:|
000003d0  42 4e 45 63 6f 6d 31 0d  01 cc 3e 2e 67 6f 74 63  |BNEcom1...>.gotc|
000003e0  6f 6d 20 49 4e 58 3a 4c  44 41 63 6f 6d 73 2c 58  |om INX:LDAcoms,X|
000003f0  3a 53 54 41 6d 65 6d 3a  4c 44 41 63 6f 6d 73 2b  |:STAmem:LDAcoms+|
00000400  31 2c 58 3a 53 54 41 6d  65 6d 2b 31 3a 4a 4d 50  |1,X:STAmem+1:JMP|
00000410  28 6d 65 6d 29 0d 01 d6  30 2e 6e 6f 63 6f 6d 20  |(mem)...0.nocom |
00000420  45 51 55 42 30 3a 45 51  55 42 32 35 35 3a 45 51  |EQUB0:EQUB255:EQ|
00000430  55 53 22 42 61 64 20 63  6f 6d 6d 61 6e 64 22 3a  |US"Bad command":|
00000440  45 51 55 42 30 0d 01 e0  14 2e 63 6f 6d 6f 75 74  |EQUB0.....comout|
00000450  20 4a 4d 50 65 6e 74 65  72 0d 01 ea 15 2e 73 6b  | JMPenter.....sk|
00000460  69 70 20 49 4e 59 3a 4a  4d 50 63 6f 6d 32 0d 01  |ip INY:JMPcom2..|
00000470  f4 0b 2e 62 75 66 66 65  72 0d 01 fe 21 45 51 55  |...buffer...!EQU|
00000480  57 26 36 30 30 3a 45 51  55 42 34 3a 45 51 55 42  |W&600:EQUB4:EQUB|
00000490  33 32 3a 45 51 55 42 31  32 37 0d 02 08 41 2e 74  |32:EQUB127...A.t|
000004a0  65 78 74 31 20 20 45 51  55 42 31 33 3a 45 51 55  |ext1  EQUB13:EQU|
000004b0  53 20 22 20 20 50 72 69  6e 74 65 72 20 43 6f 64  |S "  Printer Cod|
000004c0  65 20 53 65 74 74 65 72  20 43 6f 6d 6d 61 6e 64  |e Setter Command|
000004d0  73 3a 22 2b bd 31 33 2b  bd 31 33 0d 02 12 22 45  |s:"+.13+.13..."E|
000004e0  51 55 53 22 2a 52 45 53  20 20 2a 44 52 41 20 20  |QUS"*RES  *DRA  |
000004f0  2a 4e 4c 51 22 2b bd 31  33 2b bd 31 33 0d 02 1c  |*NLQ"+.13+.13...|
00000500  24 45 51 55 53 22 2a 50  49 43 20 20 2a 45 4c 49  |$EQUS"*PIC  *ELI|
00000510  20 20 2a 43 4f 53 20 20  2a 43 4f 46 22 2b bd 31  |  *COS  *COF"+.1|
00000520  33 0d 02 26 24 45 51 55  53 22 2a 44 48 53 20 20  |3..&$EQUS"*DHS  |
00000530  2a 44 48 46 20 20 2a 44  53 53 20 20 2a 44 53 46  |*DHF  *DSS  *DSF|
00000540  22 2b bd 31 33 0d 02 30  24 45 51 55 53 22 2a 45  |"+.13..0$EQUS"*E|
00000550  4d 53 20 20 2a 45 4d 46  20 20 2a 45 4e 53 20 20  |MS  *EMF  *ENS  |
00000560  2a 45 4e 46 22 2b bd 31  33 0d 02 3a 2a 45 51 55  |*ENF"+.13..:*EQU|
00000570  53 22 2a 49 54 53 20 20  2a 49 54 46 20 20 2a 53  |S"*ITS  *ITF  *S|
00000580  50 53 20 20 2a 53 42 53  20 20 2a 53 53 46 22 2b  |PS  *SBS  *SSF"+|
00000590  bd 31 33 0d 02 44 1c 45  51 55 53 22 2a 55 4c 53  |.13..D.EQUS"*ULS|
000005a0  20 20 2a 55 4c 46 22 2b  bd 31 33 2b bd 31 33 0d  |  *ULF"+.13+.13.|
000005b0  02 4e 31 45 51 55 53 22  2a 45 4e 47 20 20 45 6e  |.N1EQUS"*ENG  En|
000005c0  67 6c 69 73 68 20 53 65  74 20 75 70 20 66 6f 72  |glish Set up for|
000005d0  20 74 68 65 20 60 20 73  69 67 6e 22 2b bd 31 33  | the ` sign"+.13|
000005e0  0d 02 58 38 45 51 55 53  22 2a 45 58 50 20 20 45  |..X8EQUS"*EXP  E|
000005f0  78 70 61 6e 64 20 63 68  61 72 61 63 74 65 72 20  |xpand character |
00000600  73 65 74 20 74 6f 20 47  72 61 70 68 69 63 73 22  |set to Graphics"|
00000610  2b bd 31 33 2b bd 31 33  0d 02 62 23 45 51 55 53  |+.13+.13..b#EQUS|
00000620  22 2a 4c 46 41 20 20 4c  69 6e 65 20 66 65 65 64  |"*LFA  Line feed|
00000630  20 31 2f 38 22 22 22 2b  bd 31 33 0d 02 6c 24 45  | 1/8"""+.13..l$E|
00000640  51 55 53 22 2a 4c 46 42  20 20 4c 69 6e 65 20 66  |QUS"*LFB  Line f|
00000650  65 65 64 20 37 2f 37 32  22 22 22 2b bd 31 33 0d  |eed 7/72"""+.13.|
00000660  02 76 27 45 51 55 53 22  2a 4c 46 43 20 20 4c 69  |.v'EQUS"*LFC  Li|
00000670  6e 65 20 66 65 65 64 20  31 2f 36 22 22 22 2b bd  |ne feed 1/6"""+.|
00000680  31 33 2b bd 31 33 0d 02  80 26 45 51 55 53 22 2a  |13+.13...&EQUS"*|
00000690  43 4e 41 20 20 43 6f 6c  75 6d 6e 20 31 20 61 74  |CNA  Column 1 at|
000006a0  20 54 41 42 28 30 29 22  2b bd 31 33 0d 02 8a 27  | TAB(0)"+.13...'|
000006b0  45 51 55 53 22 2a 43 4e  42 20 20 43 6f 6c 75 6d  |EQUS"*CNB  Colum|
000006c0  6e 20 32 20 61 74 20 54  41 42 28 34 35 29 22 2b  |n 2 at TAB(45)"+|
000006d0  bd 31 33 0d 02 94 27 45  51 55 53 22 2a 43 4e 43  |.13...'EQUS"*CNC|
000006e0  20 20 43 6f 6c 75 6d 6e  20 33 20 61 74 20 54 41  |  Column 3 at TA|
000006f0  42 28 39 30 29 22 2b bd  31 33 0d 02 9e 2d 45 51  |B(90)"+.13...-EQ|
00000700  55 53 22 20 20 20 20 20  41 6c 6c 20 34 30 20 63  |US"     All 40 c|
00000710  68 61 72 61 63 74 65 72  73 20 77 69 64 65 22 2b  |haracters wide"+|
00000720  bd 31 33 2b bd 31 33 0d  02 a8 31 45 51 55 53 22  |.13+.13...1EQUS"|
00000730  20 20 20 20 20 20 20 20  20 50 72 65 73 73 20 73  |         Press s|
00000740  70 61 63 65 20 74 6f 20  63 6f 6e 74 69 6e 75 65  |pace to continue|
00000750  22 3a 45 51 55 42 2d 31  0d 02 b2 21 2e 74 65 78  |":EQUB-1...!.tex|
00000760  74 32 20 45 51 55 42 31  33 3a 45 51 55 53 22 4e  |t2 EQUB13:EQUS"N|
00000770  4f 54 45 3a 22 2b bd 31  33 0d 02 bc 32 45 51 55  |OTE:"+.13...2EQU|
00000780  53 22 20 20 20 46 6f 72  20 32 20 63 6f 6c 75 6d  |S"   For 2 colum|
00000790  6e 20 70 72 69 6e 74 69  6e 67 20 75 73 65 20 45  |n printing use E|
000007a0  4c 49 2b 44 53 53 22 2b  bd 31 33 0d 02 c6 36 45  |LI+DSS"+.13...6E|
000007b0  51 55 53 22 20 20 20 46  6f 72 20 33 20 63 6f 6c  |QUS"   For 3 col|
000007c0  75 6d 6e 20 70 72 69 6e  74 69 6e 67 20 75 73 65  |umn printing use|
000007d0  20 43 4f 53 2b 44 53 53  22 2b bd 31 33 2b bd 31  | COS+DSS"+.13+.1|
000007e0  33 0d 02 d0 20 45 51 55  53 22 45 6e 74 65 72 20  |3... EQUS"Enter |
000007f0  63 6f 6d 6d 61 6e 64 73  22 2b bd 31 33 2b bd 31  |commands"+.13+.1|
00000800  33 0d 02 da 0a 45 51 55  42 2d 31 0d 02 e4 09 2e  |3....EQUB-1.....|
00000810  63 6f 6d 73 0d 02 ee 1b  45 51 55 53 22 52 45 53  |coms....EQUS"RES|
00000820  22 3a 45 51 55 42 30 3a  45 51 55 57 72 65 73 0d  |":EQUB0:EQUWres.|
00000830  02 f8 1b 45 51 55 53 22  44 52 41 22 3a 45 51 55  |...EQUS"DRA":EQU|
00000840  42 30 3a 45 51 55 57 64  72 61 0d 03 02 1b 45 51  |B0:EQUWdra....EQ|
00000850  55 53 22 4e 4c 51 22 3a  45 51 55 42 30 3a 45 51  |US"NLQ":EQUB0:EQ|
00000860  55 57 6e 6c 71 0d 03 0c  1b 45 51 55 53 22 50 49  |UWnlq....EQUS"PI|
00000870  43 22 3a 45 51 55 42 30  3a 45 51 55 57 70 69 63  |C":EQUB0:EQUWpic|
00000880  0d 03 16 1b 45 51 55 53  22 45 4c 49 22 3a 45 51  |....EQUS"ELI":EQ|
00000890  55 42 30 3a 45 51 55 57  65 6c 69 0d 03 20 1b 45  |UB0:EQUWeli.. .E|
000008a0  51 55 53 22 43 4f 53 22  3a 45 51 55 42 30 3a 45  |QUS"COS":EQUB0:E|
000008b0  51 55 57 63 6f 73 0d 03  2a 1b 45 51 55 53 22 43  |QUWcos..*.EQUS"C|
000008c0  4f 46 22 3a 45 51 55 42  30 3a 45 51 55 57 63 6f  |OF":EQUB0:EQUWco|
000008d0  66 0d 03 34 1b 45 51 55  53 22 44 48 53 22 3a 45  |f..4.EQUS"DHS":E|
000008e0  51 55 42 30 3a 45 51 55  57 64 68 73 0d 03 3e 1b  |QUB0:EQUWdhs..>.|
000008f0  45 51 55 53 22 44 48 46  22 3a 45 51 55 42 30 3a  |EQUS"DHF":EQUB0:|
00000900  45 51 55 57 64 68 66 0d  03 48 1b 45 51 55 53 22  |EQUWdhf..H.EQUS"|
00000910  44 53 53 22 3a 45 51 55  42 30 3a 45 51 55 57 64  |DSS":EQUB0:EQUWd|
00000920  73 66 0d 03 52 1b 45 51  55 53 22 45 4d 53 22 3a  |sf..R.EQUS"EMS":|
00000930  45 51 55 42 30 3a 45 51  55 57 65 6d 73 0d 03 5c  |EQUB0:EQUWems..\|
00000940  1b 45 51 55 53 22 45 4d  46 22 3a 45 51 55 42 30  |.EQUS"EMF":EQUB0|
00000950  3a 45 51 55 57 65 6d 66  0d 03 66 1b 45 51 55 53  |:EQUWemf..f.EQUS|
00000960  22 45 4e 47 22 3a 45 51  55 42 30 3a 45 51 55 57  |"ENG":EQUB0:EQUW|
00000970  65 6e 67 0d 03 70 1b 45  51 55 53 22 45 4e 53 22  |eng..p.EQUS"ENS"|
00000980  3a 45 51 55 42 30 3a 45  51 55 57 65 6e 73 0d 03  |:EQUB0:EQUWens..|
00000990  7a 1b 45 51 55 53 22 45  4e 46 22 3a 45 51 55 42  |z.EQUS"ENF":EQUB|
000009a0  30 3a 45 51 55 57 65 6e  66 0d 03 84 1b 45 51 55  |0:EQUWenf....EQU|
000009b0  53 22 49 54 53 22 3a 45  51 55 42 30 3a 45 51 55  |S"ITS":EQUB0:EQU|
000009c0  57 69 74 73 0d 03 8e 1b  45 51 55 53 22 49 54 46  |Wits....EQUS"ITF|
000009d0  22 3a 45 51 55 42 30 3a  45 51 55 57 69 74 66 0d  |":EQUB0:EQUWitf.|
000009e0  03 98 1b 45 51 55 53 22  53 50 53 22 3a 45 51 55  |...EQUS"SPS":EQU|
000009f0  42 30 3a 45 51 55 57 73  70 73 0d 03 a2 1b 45 51  |B0:EQUWsps....EQ|
00000a00  55 53 22 53 42 53 22 3a  45 51 55 42 30 3a 45 51  |US"SBS":EQUB0:EQ|
00000a10  55 57 73 62 73 0d 03 ac  1b 45 51 55 53 22 53 53  |UWsbs....EQUS"SS|
00000a20  46 22 3a 45 51 55 42 30  3a 45 51 55 57 73 73 66  |F":EQUB0:EQUWssf|
00000a30  0d 03 b6 1b 45 51 55 53  22 55 4c 53 22 3a 45 51  |....EQUS"ULS":EQ|
00000a40  55 42 30 3a 45 51 55 57  75 6c 73 0d 03 c0 1b 45  |UB0:EQUWuls....E|
00000a50  51 55 53 22 55 4c 46 22  3a 45 51 55 42 30 3a 45  |QUS"ULF":EQUB0:E|
00000a60  51 55 57 75 6c 66 0d 03  ca 1b 45 51 55 53 22 45  |QUWulf....EQUS"E|
00000a70  58 50 22 3a 45 51 55 42  30 3a 45 51 55 57 65 78  |XP":EQUB0:EQUWex|
00000a80  70 0d 03 d4 1b 45 51 55  53 22 4c 46 41 22 3a 45  |p....EQUS"LFA":E|
00000a90  51 55 42 30 3a 45 51 55  57 6c 66 61 0d 03 de 1b  |QUB0:EQUWlfa....|
00000aa0  45 51 55 53 22 4c 46 42  22 3a 45 51 55 42 30 3a  |EQUS"LFB":EQUB0:|
00000ab0  45 51 55 57 6c 66 62 0d  03 e8 1b 45 51 55 53 22  |EQUWlfb....EQUS"|
00000ac0  4c 46 43 22 3a 45 51 55  42 30 3a 45 51 55 57 6c  |LFC":EQUB0:EQUWl|
00000ad0  66 63 0d 03 f2 1b 45 51  55 53 22 43 4e 41 22 3a  |fc....EQUS"CNA":|
00000ae0  45 51 55 42 30 3a 45 51  55 57 63 6e 61 0d 03 fc  |EQUB0:EQUWcna...|
00000af0  1b 45 51 55 53 22 43 4e  42 22 3a 45 51 55 42 30  |.EQUS"CNB":EQUB0|
00000b00  3a 45 51 55 57 63 6e 62  0d 04 06 1b 45 51 55 53  |:EQUWcnb....EQUS|
00000b10  22 43 4e 43 22 3a 45 51  55 42 30 3a 45 51 55 57  |"CNC":EQUB0:EQUW|
00000b20  63 6e 63 0d 04 10 0a 45  51 55 42 2d 31 0d 04 1a  |cnc....EQUB-1...|
00000b30  0b 2e 70 72 74 72 6f 6e  0d 04 24 13 4c 44 41 23  |..prtron..$.LDA#|
00000b40  32 3a 4a 4d 50 6f 73 77  72 63 68 0d 04 2e 0c 2e  |2:JMPoswrch.....|
00000b50  70 72 74 72 6f 66 66 0d  04 38 13 4c 44 41 23 33  |prtroff..8.LDA#3|
00000b60  3a 4a 4d 50 6f 73 77 72  63 68 0d 04 42 08 2e 65  |:JMPoswrch..B..e|
00000b70  73 63 0d 04 4c 13 4c 44  41 23 31 3a 4a 53 52 6f  |sc..L.LDA#1:JSRo|
00000b80  73 77 72 63 68 0d 04 56  14 4c 44 41 23 32 37 3a  |swrch..V.LDA#27:|
00000b90  4a 4d 50 6f 73 77 72 63  68 0d 04 60 08 2e 72 65  |JMPoswrch..`..re|
00000ba0  73 0d 04 6a 0d 4a 53 52  70 72 74 72 6f 6e 0d 04  |s..j.JSRprtron..|
00000bb0  74 0a 4a 53 52 65 73 63  0d 04 7e 24 4c 44 41 23  |t.JSResc..~$LDA#|
00000bc0  31 3a 4a 53 52 6f 73 77  72 63 68 3a 4c 44 41 23  |1:JSRoswrch:LDA#|
00000bd0  36 34 3a 4a 53 52 6f 73  77 72 63 68 0d 04 88 0e  |64:JSRoswrch....|
00000be0  4a 53 52 70 72 74 72 6f  66 66 0d 04 92 0d 4a 4d  |JSRprtroff....JM|
00000bf0  50 63 6f 6d 6f 75 74 0d  04 9c 08 2e 64 72 61 0d  |Pcomout.....dra.|
00000c00  04 a6 0d 4a 53 52 70 72  74 72 6f 6e 0d 04 b0 0a  |...JSRprtron....|
00000c10  4a 53 52 65 73 63 0d 04  ba 25 4c 44 41 23 31 3a  |JSResc...%LDA#1:|
00000c20  4a 53 52 6f 73 77 72 63  68 3a 4c 44 41 23 31 32  |JSRoswrch:LDA#12|
00000c30  30 3a 4a 53 52 6f 73 77  72 63 68 0d 04 c4 23 4c  |0:JSRoswrch...#L|
00000c40  44 41 23 31 3a 4a 53 52  6f 73 77 72 63 68 3a 4c  |DA#1:JSRoswrch:L|
00000c50  44 41 23 30 3a 4a 53 52  6f 73 77 72 63 68 0d 04  |DA#0:JSRoswrch..|
00000c60  ce 0e 4a 53 52 70 72 74  72 6f 66 66 0d 04 d8 0d  |..JSRprtroff....|
00000c70  4a 4d 50 63 6f 6d 6f 75  74 0d 04 e2 08 2e 6e 6c  |JMPcomout.....nl|
00000c80  71 0d 04 ec 0d 4a 53 52  70 72 74 72 6f 6e 0d 04  |q....JSRprtron..|
00000c90  f6 0a 4a 53 52 65 73 63  0d 05 00 25 4c 44 41 23  |..JSResc...%LDA#|
00000ca0  31 3a 4a 53 52 6f 73 77  72 63 68 3a 4c 44 41 23  |1:JSRoswrch:LDA#|
00000cb0  31 32 30 3a 4a 53 52 6f  73 77 72 63 68 0d 05 0a  |120:JSRoswrch...|
00000cc0  23 4c 44 41 23 31 3a 4a  53 52 6f 73 77 72 63 68  |#LDA#1:JSRoswrch|
00000cd0  3a 4c 44 41 23 31 3a 4a  53 52 6f 73 77 72 63 68  |:LDA#1:JSRoswrch|
00000ce0  0d 05 14 0e 4a 53 52 70  72 74 72 6f 66 66 0d 05  |....JSRprtroff..|
00000cf0  1e 0d 4a 4d 50 63 6f 6d  6f 75 74 0d 05 28 08 2e  |..JMPcomout..(..|
00000d00  70 69 63 0d 05 32 0d 4a  53 52 70 72 74 72 6f 6e  |pic..2.JSRprtron|
00000d10  0d 05 3c 0a 4a 53 52 65  73 63 0d 05 46 24 4c 44  |..<.JSResc..F$LD|
00000d20  41 23 31 3a 4a 53 52 6f  73 77 72 63 68 3a 4c 44  |A#1:JSRoswrch:LD|
00000d30  41 23 38 30 3a 4a 53 52  6f 73 77 72 63 68 0d 05  |A#80:JSRoswrch..|
00000d40  50 0e 4a 53 52 70 72 74  72 6f 66 66 0d 05 5a 0d  |P.JSRprtroff..Z.|
00000d50  4a 4d 50 63 6f 6d 6f 75  74 0d 05 64 08 2e 65 6c  |JMPcomout..d..el|
00000d60  69 0d 05 6e 0d 4a 53 52  70 72 74 72 6f 6e 0d 05  |i..n.JSRprtron..|
00000d70  78 0a 4a 53 52 65 73 63  0d 05 82 24 4c 44 41 23  |x.JSResc...$LDA#|
00000d80  31 3a 4a 53 52 6f 73 77  72 63 68 3a 4c 44 41 23  |1:JSRoswrch:LDA#|
00000d90  37 37 3a 4a 53 52 6f 73  77 72 63 68 0d 05 8c 0e  |77:JSRoswrch....|
00000da0  4a 53 52 70 72 74 72 6f  66 66 0d 05 96 0d 4a 4d  |JSRprtroff....JM|
00000db0  50 63 6f 6d 6f 75 74 0d  05 a0 08 2e 63 6f 73 0d  |Pcomout.....cos.|
00000dc0  05 aa 0d 4a 53 52 70 72  74 72 6f 6e 0d 05 b4 0a  |...JSRprtron....|
00000dd0  4a 53 52 65 73 63 0d 05  be 24 4c 44 41 23 31 3a  |JSResc...$LDA#1:|
00000de0  4a 53 52 6f 73 77 72 63  68 3a 4c 44 41 23 31 35  |JSRoswrch:LDA#15|
00000df0  3a 4a 53 52 6f 73 77 72  63 68 0d 05 c8 0e 4a 53  |:JSRoswrch....JS|
00000e00  52 70 72 74 72 6f 66 66  0d 05 d2 0d 4a 4d 50 63  |Rprtroff....JMPc|
00000e10  6f 6d 6f 75 74 0d 05 dc  08 2e 63 6f 66 0d 05 e6  |omout.....cof...|
00000e20  0d 4a 53 52 70 72 74 72  6f 6e 0d 05 f0 24 4c 44  |.JSRprtron...$LD|
00000e30  41 23 31 3a 4a 53 52 6f  73 77 72 63 68 3a 4c 44  |A#1:JSRoswrch:LD|
00000e40  41 23 31 38 3a 4a 53 52  6f 73 77 72 63 68 0d 05  |A#18:JSRoswrch..|
00000e50  fa 0e 4a 53 52 70 72 74  72 6f 66 66 0d 06 04 0d  |..JSRprtroff....|
00000e60  4a 4d 50 63 6f 6d 6f 75  74 0d 06 0e 08 2e 64 68  |JMPcomout.....dh|
00000e70  73 0d 06 18 0d 4a 53 52  70 72 74 72 6f 6e 0d 06  |s....JSRprtron..|
00000e80  22 0a 4a 53 52 65 73 63  0d 06 2c 25 4c 44 41 23  |".JSResc..,%LDA#|
00000e90  31 3a 4a 53 52 6f 73 77  72 63 68 3a 4c 44 41 23  |1:JSRoswrch:LDA#|
00000ea0  31 31 39 3a 4a 53 52 6f  73 77 72 63 68 0d 06 36  |119:JSRoswrch..6|
00000eb0  23 4c 44 41 23 31 3a 4a  53 52 6f 73 77 72 63 68  |#LDA#1:JSRoswrch|
00000ec0  3a 4c 44 41 23 31 3a 4a  53 52 6f 73 77 72 63 68  |:LDA#1:JSRoswrch|
00000ed0  0d 06 40 0e 4a 53 52 70  72 74 72 6f 66 66 0d 06  |..@.JSRprtroff..|
00000ee0  4a 0d 4a 4d 50 63 6f 6d  6f 75 74 0d 06 54 08 2e  |J.JMPcomout..T..|
00000ef0  64 68 66 0d 06 5e 0d 4a  53 52 70 72 74 72 6f 6e  |dhf..^.JSRprtron|
00000f00  0d 06 68 0a 4a 53 52 65  73 63 0d 06 72 25 4c 44  |..h.JSResc..r%LD|
00000f10  41 23 31 3a 4a 53 52 6f  73 77 72 63 68 3a 4c 44  |A#1:JSRoswrch:LD|
00000f20  41 23 31 31 39 3a 4a 53  52 6f 73 77 72 63 68 0d  |A#119:JSRoswrch.|
00000f30  06 7c 23 4c 44 41 23 31  3a 4a 53 52 6f 73 77 72  |.|#LDA#1:JSRoswr|
00000f40  63 68 3a 4c 44 41 23 30  3a 4a 53 52 6f 73 77 72  |ch:LDA#0:JSRoswr|
00000f50  63 68 0d 06 86 0e 4a 53  52 70 72 74 72 6f 66 66  |ch....JSRprtroff|
00000f60  0d 06 90 0d 4a 4d 50 63  6f 6d 6f 75 74 0d 06 9a  |....JMPcomout...|
00000f70  08 2e 64 73 73 0d 06 a4  0d 4a 53 52 70 72 74 72  |..dss....JSRprtr|
00000f80  6f 6e 0d 06 ae 0a 4a 53  52 65 73 63 0d 06 b8 24  |on....JSResc...$|
00000f90  4c 44 41 23 31 3a 4a 53  52 6f 73 77 72 63 68 3a  |LDA#1:JSRoswrch:|
00000fa0  4c 44 41 23 37 31 3a 4a  53 52 6f 73 77 72 63 68  |LDA#71:JSRoswrch|
00000fb0  0d 06 c2 0e 4a 53 52 70  72 74 72 6f 66 66 0d 06  |....JSRprtroff..|
00000fc0  cc 0d 4a 4d 50 63 6f 6d  6f 75 74 0d 06 d6 08 2e  |..JMPcomout.....|
00000fd0  64 73 66 0d 06 e0 0d 4a  53 52 70 72 74 72 6f 6e  |dsf....JSRprtron|
00000fe0  0d 06 ea 0a 4a 53 52 65  73 63 0d 06 f4 24 4c 44  |....JSResc...$LD|
00000ff0  41 23 31 3a 4a 53 52 6f  73 77 72 63 68 3a 4c 44  |A#1:JSRoswrch:LD|
00001000  41 23 37 32 3a 4a 53 52  6f 73 77 72 63 68 0d 06  |A#72:JSRoswrch..|
00001010  fe 0e 4a 53 52 70 72 74  72 6f 66 66 0d 07 08 0d  |..JSRprtroff....|
00001020  4a 4d 50 63 6f 6d 6f 75  74 0d 07 12 08 2e 65 6d  |JMPcomout.....em|
00001030  73 0d 07 1c 0d 4a 53 52  70 72 74 72 6f 6e 0d 07  |s....JSRprtron..|
00001040  26 0a 4a 53 52 65 73 63  0d 07 30 24 4c 44 41 23  |&.JSResc..0$LDA#|
00001050  31 3a 4a 53 52 6f 73 77  72 63 68 3a 4c 44 41 23  |1:JSRoswrch:LDA#|
00001060  36 39 3a 4a 53 52 6f 73  77 72 63 68 0d 07 3a 0e  |69:JSRoswrch..:.|
00001070  4a 53 52 70 72 74 72 6f  66 66 0d 07 44 0d 4a 4d  |JSRprtroff..D.JM|
00001080  50 63 6f 6d 6f 75 74 0d  07 4e 08 2e 65 6d 66 0d  |Pcomout..N..emf.|
00001090  07 58 0d 4a 53 52 70 72  74 72 6f 6e 0d 07 62 0a  |.X.JSRprtron..b.|
000010a0  4a 53 52 65 73 63 0d 07  6c 24 4c 44 41 23 31 3a  |JSResc..l$LDA#1:|
000010b0  4a 53 52 6f 73 77 72 63  68 3a 4c 44 41 23 37 30  |JSRoswrch:LDA#70|
000010c0  3a 4a 53 52 6f 73 77 72  63 68 0d 07 76 0e 4a 53  |:JSRoswrch..v.JS|
000010d0  52 70 72 74 72 6f 66 66  0d 07 80 0d 4a 4d 50 63  |Rprtroff....JMPc|
000010e0  6f 6d 6f 75 74 0d 07 8a  08 2e 65 6e 67 0d 07 94  |omout.....eng...|
000010f0  0d 4a 53 52 70 72 74 72  6f 6e 0d 07 9e 0a 4a 53  |.JSRprtron....JS|
00001100  52 65 73 63 0d 07 a8 24  4c 44 41 23 31 3a 4a 53  |Resc...$LDA#1:JS|
00001110  52 6f 73 77 72 63 68 3a  4c 44 41 23 38 32 3a 4a  |Roswrch:LDA#82:J|
00001120  53 52 6f 73 77 72 63 68  0d 07 b2 23 4c 44 41 23  |SRoswrch...#LDA#|
00001130  31 3a 4a 53 52 6f 73 77  72 63 68 3a 4c 44 41 23  |1:JSRoswrch:LDA#|
00001140  33 3a 4a 53 52 6f 73 77  72 63 68 0d 07 bc 0e 4a  |3:JSRoswrch....J|
00001150  53 52 70 72 74 72 6f 66  66 0d 07 c6 0d 4a 4d 50  |SRprtroff....JMP|
00001160  63 6f 6d 6f 75 74 0d 07  d0 08 2e 65 6e 73 0d 07  |comout.....ens..|
00001170  da 0d 4a 53 52 70 72 74  72 6f 6e 0d 07 e4 0a 4a  |..JSRprtron....J|
00001180  53 52 65 73 63 0d 07 ee  24 4c 44 41 23 31 3a 4a  |SResc...$LDA#1:J|
00001190  53 52 6f 73 77 72 63 68  3a 4c 44 41 23 38 37 3a  |SRoswrch:LDA#87:|
000011a0  4a 53 52 6f 73 77 72 63  68 0d 07 f8 23 4c 44 41  |JSRoswrch...#LDA|
000011b0  23 31 3a 4a 53 52 6f 73  77 72 63 68 3a 4c 44 41  |#1:JSRoswrch:LDA|
000011c0  23 31 3a 4a 53 52 6f 73  77 72 63 68 0d 08 02 0e  |#1:JSRoswrch....|
000011d0  4a 53 52 70 72 74 72 6f  66 66 0d 08 0c 0d 4a 4d  |JSRprtroff....JM|
000011e0  50 63 6f 6d 6f 75 74 0d  08 16 08 2e 65 6e 66 0d  |Pcomout.....enf.|
000011f0  08 20 0d 4a 53 52 70 72  74 72 6f 6e 0d 08 2a 0a  |. .JSRprtron..*.|
00001200  4a 53 52 65 73 63 0d 08  34 24 4c 44 41 23 31 3a  |JSResc..4$LDA#1:|
00001210  4a 53 52 6f 73 77 72 63  68 3a 4c 44 41 23 38 37  |JSRoswrch:LDA#87|
00001220  3a 4a 53 52 6f 73 77 72  63 68 0d 08 3e 23 4c 44  |:JSRoswrch..>#LD|
00001230  41 23 31 3a 4a 53 52 6f  73 77 72 63 68 3a 4c 44  |A#1:JSRoswrch:LD|
00001240  41 23 30 3a 4a 53 52 6f  73 77 72 63 68 0d 08 48  |A#0:JSRoswrch..H|
00001250  0e 4a 53 52 70 72 74 72  6f 66 66 0d 08 52 0d 4a  |.JSRprtroff..R.J|
00001260  4d 50 63 6f 6d 6f 75 74  0d 08 5c 08 2e 69 74 73  |MPcomout..\..its|
00001270  0d 08 66 0d 4a 53 52 70  72 74 72 6f 6e 0d 08 70  |..f.JSRprtron..p|
00001280  0a 4a 53 52 65 73 63 0d  08 7a 24 4c 44 41 23 31  |.JSResc..z$LDA#1|
00001290  3a 4a 53 52 6f 73 77 72  63 68 3a 4c 44 41 23 35  |:JSRoswrch:LDA#5|
000012a0  32 3a 4a 53 52 6f 73 77  72 63 68 0d 08 84 0e 4a  |2:JSRoswrch....J|
000012b0  53 52 70 72 74 72 6f 66  66 0d 08 8e 0d 4a 4d 50  |SRprtroff....JMP|
000012c0  63 6f 6d 6f 75 74 0d 08  98 08 2e 69 74 66 0d 08  |comout.....itf..|
000012d0  a2 0d 4a 53 52 70 72 74  72 6f 6e 0d 08 ac 0a 4a  |..JSRprtron....J|
000012e0  53 52 65 73 63 0d 08 b6  24 4c 44 41 23 31 3a 4a  |SResc...$LDA#1:J|
000012f0  53 52 6f 73 77 72 63 68  3a 4c 44 41 23 35 33 3a  |SRoswrch:LDA#53:|
00001300  4a 53 52 6f 73 77 72 63  68 0d 08 c0 0e 4a 53 52  |JSRoswrch....JSR|
00001310  70 72 74 72 6f 66 66 0d  08 ca 0d 4a 4d 50 63 6f  |prtroff....JMPco|
00001320  6d 6f 75 74 0d 08 d4 08  2e 73 70 73 0d 08 de 0d  |mout.....sps....|
00001330  4a 53 52 70 72 74 72 6f  6e 0d 08 e8 0a 4a 53 52  |JSRprtron....JSR|
00001340  65 73 63 0d 08 f2 24 4c  44 41 23 31 3a 4a 53 52  |esc...$LDA#1:JSR|
00001350  6f 73 77 72 63 68 3a 4c  44 41 23 38 33 3a 4a 53  |oswrch:LDA#83:JS|
00001360  52 6f 73 77 72 63 68 0d  08 fc 23 4c 44 41 23 31  |Roswrch...#LDA#1|
00001370  3a 4a 53 52 6f 73 77 72  63 68 3a 4c 44 41 23 30  |:JSRoswrch:LDA#0|
00001380  3a 4a 53 52 6f 73 77 72  63 68 0d 09 06 0e 4a 53  |:JSRoswrch....JS|
00001390  52 70 72 74 72 6f 66 66  0d 09 10 0d 4a 4d 50 63  |Rprtroff....JMPc|
000013a0  6f 6d 6f 75 74 0d 09 1a  08 2e 73 62 73 0d 09 24  |omout.....sbs..$|
000013b0  0d 4a 53 52 70 72 74 72  6f 6e 0d 09 2e 0a 4a 53  |.JSRprtron....JS|
000013c0  52 65 73 63 0d 09 38 24  4c 44 41 23 31 3a 4a 53  |Resc..8$LDA#1:JS|
000013d0  52 6f 73 77 72 63 68 3a  4c 44 41 23 38 33 3a 4a  |Roswrch:LDA#83:J|
000013e0  53 52 6f 73 77 72 63 68  0d 09 42 23 4c 44 41 23  |SRoswrch..B#LDA#|
000013f0  31 3a 4a 53 52 6f 73 77  72 63 68 3a 4c 44 41 23  |1:JSRoswrch:LDA#|
00001400  31 3a 4a 53 52 6f 73 77  72 63 68 0d 09 4c 0e 4a  |1:JSRoswrch..L.J|
00001410  53 52 70 72 74 72 6f 66  66 0d 09 56 0d 4a 4d 50  |SRprtroff..V.JMP|
00001420  63 6f 6d 6f 75 74 0d 09  60 08 2e 73 73 66 0d 09  |comout..`..ssf..|
00001430  6a 0d 4a 53 52 70 72 74  72 6f 6e 0d 09 74 0a 4a  |j.JSRprtron..t.J|
00001440  53 52 65 73 63 0d 09 7e  24 4c 44 41 23 31 3a 4a  |SResc..~$LDA#1:J|
00001450  53 52 6f 73 77 72 63 68  3a 4c 44 41 23 38 34 3a  |SRoswrch:LDA#84:|
00001460  4a 53 52 6f 73 77 72 63  68 0d 09 88 0e 4a 53 52  |JSRoswrch....JSR|
00001470  70 72 74 72 6f 66 66 0d  09 92 0d 4a 4d 50 63 6f  |prtroff....JMPco|
00001480  6d 6f 75 74 0d 09 9c 08  2e 75 6c 73 0d 09 a6 0d  |mout.....uls....|
00001490  4a 53 52 70 72 74 72 6f  6e 0d 09 b0 0a 4a 53 52  |JSRprtron....JSR|
000014a0  65 73 63 0d 09 ba 24 4c  44 41 23 31 3a 4a 53 52  |esc...$LDA#1:JSR|
000014b0  6f 73 77 72 63 68 3a 4c  44 41 23 34 35 3a 4a 53  |oswrch:LDA#45:JS|
000014c0  52 6f 73 77 72 63 68 0d  09 c4 23 4c 44 41 23 31  |Roswrch...#LDA#1|
000014d0  3a 4a 53 52 6f 73 77 72  63 68 3a 4c 44 41 23 31  |:JSRoswrch:LDA#1|
000014e0  3a 4a 53 52 6f 73 77 72  63 68 0d 09 ce 0e 4a 53  |:JSRoswrch....JS|
000014f0  52 70 72 74 72 6f 66 66  0d 09 d8 0d 4a 4d 50 63  |Rprtroff....JMPc|
00001500  6f 6d 6f 75 74 0d 09 e2  08 2e 75 6c 66 0d 09 ec  |omout.....ulf...|
00001510  0d 4a 53 52 70 72 74 72  6f 6e 0d 09 f6 0a 4a 53  |.JSRprtron....JS|
00001520  52 65 73 63 0d 0a 00 24  4c 44 41 23 31 3a 4a 53  |Resc...$LDA#1:JS|
00001530  52 6f 73 77 72 63 68 3a  4c 44 41 23 34 35 3a 4a  |Roswrch:LDA#45:J|
00001540  53 52 6f 73 77 72 63 68  0d 0a 0a 23 4c 44 41 23  |SRoswrch...#LDA#|
00001550  31 3a 4a 53 52 6f 73 77  72 63 68 3a 4c 44 41 23  |1:JSRoswrch:LDA#|
00001560  30 3a 4a 53 52 6f 73 77  72 63 68 0d 0a 14 0e 4a  |0:JSRoswrch....J|
00001570  53 52 70 72 74 72 6f 66  66 0d 0a 1e 0d 4a 4d 50  |SRprtroff....JMP|
00001580  63 6f 6d 6f 75 74 0d 0a  28 08 2e 65 78 70 0d 0a  |comout..(..exp..|
00001590  32 0d 4a 53 52 70 72 74  72 6f 6e 0d 0a 3c 0a 4a  |2.JSRprtron..<.J|
000015a0  53 52 65 73 63 0d 0a 46  24 4c 44 41 23 31 3a 4a  |SResc..F$LDA#1:J|
000015b0  53 52 6f 73 77 72 63 68  3a 4c 44 41 23 35 34 3a  |SRoswrch:LDA#54:|
000015c0  4a 53 52 6f 73 77 72 63  68 0d 0a 50 0a 4a 53 52  |JSRoswrch..P.JSR|
000015d0  65 73 63 0d 0a 5a 24 4c  44 41 23 31 3a 4a 53 52  |esc..Z$LDA#1:JSR|
000015e0  6f 73 77 72 63 68 3a 4c  44 41 23 37 33 3a 4a 53  |oswrch:LDA#73:JS|
000015f0  52 6f 73 77 72 63 68 0d  0a 64 23 4c 44 41 23 31  |Roswrch..d#LDA#1|
00001600  3a 4a 53 52 6f 73 77 72  63 68 3a 4c 44 41 23 30  |:JSRoswrch:LDA#0|
00001610  3a 4a 53 52 6f 73 77 72  63 68 0d 0a 6e 0a 4a 53  |:JSRoswrch..n.JS|
00001620  52 65 73 63 0d 0a 78 25  4c 44 41 23 31 3a 4a 53  |Resc..x%LDA#1:JS|
00001630  52 6f 73 77 72 63 68 3a  4c 44 41 23 31 31 36 3a  |Roswrch:LDA#116:|
00001640  4a 53 52 6f 73 77 72 63  68 0d 0a 82 23 4c 44 41  |JSRoswrch...#LDA|
00001650  23 31 3a 4a 53 52 6f 73  77 72 63 68 3a 4c 44 41  |#1:JSRoswrch:LDA|
00001660  23 31 3a 4a 53 52 6f 73  77 72 63 68 0d 0a 8c 0e  |#1:JSRoswrch....|
00001670  4a 53 52 70 72 74 72 6f  66 66 0d 0a 96 0d 4a 4d  |JSRprtroff....JM|
00001680  50 63 6f 6d 6f 75 74 0d  0a a0 08 2e 6c 66 61 0d  |Pcomout.....lfa.|
00001690  0a aa 0d 4a 53 52 70 72  74 72 6f 6e 0d 0a b4 0a  |...JSRprtron....|
000016a0  4a 53 52 65 73 63 0d 0a  be 24 4c 44 41 23 31 3a  |JSResc...$LDA#1:|
000016b0  4a 53 52 6f 73 77 72 63  68 3a 4c 44 41 23 34 38  |JSRoswrch:LDA#48|
000016c0  3a 4a 53 52 6f 73 77 72  63 68 0d 0a c8 0e 4a 53  |:JSRoswrch....JS|
000016d0  52 70 72 74 72 6f 66 66  0d 0a d2 0d 4a 4d 50 63  |Rprtroff....JMPc|
000016e0  6f 6d 6f 75 74 0d 0a dc  08 2e 6c 66 62 0d 0a e6  |omout.....lfb...|
000016f0  0d 4a 53 52 70 72 74 72  6f 6e 0d 0a f0 0a 4a 53  |.JSRprtron....JS|
00001700  52 65 73 63 0d 0a fa 24  4c 44 41 23 31 3a 4a 53  |Resc...$LDA#1:JS|
00001710  52 6f 73 77 72 63 68 3a  4c 44 41 23 34 39 3a 4a  |Roswrch:LDA#49:J|
00001720  53 52 6f 73 77 72 63 68  0d 0b 04 0e 4a 53 52 70  |SRoswrch....JSRp|
00001730  72 74 72 6f 66 66 0d 0b  0e 0d 4a 4d 50 63 6f 6d  |rtroff....JMPcom|
00001740  6f 75 74 0d 0b 18 08 2e  6c 66 63 0d 0b 22 0d 4a  |out.....lfc..".J|
00001750  53 52 70 72 74 72 6f 6e  0d 0b 2c 0a 4a 53 52 65  |SRprtron..,.JSRe|
00001760  73 63 0d 0b 36 24 4c 44  41 23 31 3a 4a 53 52 6f  |sc..6$LDA#1:JSRo|
00001770  73 77 72 63 68 3a 4c 44  41 23 35 30 3a 4a 53 52  |swrch:LDA#50:JSR|
00001780  6f 73 77 72 63 68 0d 0b  40 0e 4a 53 52 70 72 74  |oswrch..@.JSRprt|
00001790  72 6f 66 66 0d 0b 4a 0d  4a 4d 50 63 6f 6d 6f 75  |roff..J.JMPcomou|
000017a0  74 0d 0b 54 08 2e 63 6e  61 0d 0b 5e 0d 4a 53 52  |t..T..cna..^.JSR|
000017b0  70 72 74 72 6f 6e 0d 0b  68 0a 4a 53 52 65 73 63  |prtron..h.JSResc|
000017c0  0d 0b 72 25 4c 44 41 23  31 3a 4a 53 52 6f 73 77  |..r%LDA#1:JSRosw|
000017d0  72 63 68 3a 4c 44 41 23  31 30 38 3a 4a 53 52 6f  |rch:LDA#108:JSRo|
000017e0  73 77 72 63 68 0d 0b 7c  23 4c 44 41 23 31 3a 4a  |swrch..|#LDA#1:J|
000017f0  53 52 6f 73 77 72 63 68  3a 4c 44 41 23 30 3a 4a  |SRoswrch:LDA#0:J|
00001800  53 52 6f 73 77 72 63 68  0d 0b 86 0a 4a 53 52 65  |SRoswrch....JSRe|
00001810  73 63 0d 0b 90 24 4c 44  41 23 31 3a 4a 53 52 6f  |sc...$LDA#1:JSRo|
00001820  73 77 72 63 68 3a 4c 44  41 23 38 31 3a 4a 53 52  |swrch:LDA#81:JSR|
00001830  6f 73 77 72 63 68 0d 0b  9a 24 4c 44 41 23 31 3a  |oswrch...$LDA#1:|
00001840  4a 53 52 6f 73 77 72 63  68 3a 4c 44 41 23 34 30  |JSRoswrch:LDA#40|
00001850  3a 4a 53 52 6f 73 77 72  63 68 0d 0b a4 0e 4a 53  |:JSRoswrch....JS|
00001860  52 70 72 74 72 6f 66 66  0d 0b ae 0d 4a 4d 50 63  |Rprtroff....JMPc|
00001870  6f 6d 6f 75 74 0d 0b b8  08 2e 63 6e 62 0d 0b c2  |omout.....cnb...|
00001880  0d 4a 53 52 70 72 74 72  6f 6e 0d 0b cc 0a 4a 53  |.JSRprtron....JS|
00001890  52 65 73 63 0d 0b d6 24  4c 44 41 23 31 3a 4a 53  |Resc...$LDA#1:JS|
000018a0  52 6f 73 77 72 63 68 3a  4c 44 41 23 38 31 3a 4a  |Roswrch:LDA#81:J|
000018b0  53 52 6f 73 77 72 63 68  0d 0b e0 24 4c 44 41 23  |SRoswrch...$LDA#|
000018c0  31 3a 4a 53 52 6f 73 77  72 63 68 3a 4c 44 41 23  |1:JSRoswrch:LDA#|
000018d0  38 35 3a 4a 53 52 6f 73  77 72 63 68 0d 0b ea 0a  |85:JSRoswrch....|
000018e0  4a 53 52 65 73 63 0d 0b  f4 25 4c 44 41 23 31 3a  |JSResc...%LDA#1:|
000018f0  4a 53 52 6f 73 77 72 63  68 3a 4c 44 41 23 31 30  |JSRoswrch:LDA#10|
00001900  38 3a 4a 53 52 6f 73 77  72 63 68 0d 0b fe 24 4c  |8:JSRoswrch...$L|
00001910  44 41 23 31 3a 4a 53 52  6f 73 77 72 63 68 3a 4c  |DA#1:JSRoswrch:L|
00001920  44 41 23 34 35 3a 4a 53  52 6f 73 77 72 63 68 0d  |DA#45:JSRoswrch.|
00001930  0c 08 0e 4a 53 52 70 72  74 72 6f 66 66 0d 0c 12  |...JSRprtroff...|
00001940  0d 4a 4d 50 63 6f 6d 6f  75 74 0d 0c 1c 08 2e 63  |.JMPcomout.....c|
00001950  6e 63 0d 0c 26 0d 4a 53  52 70 72 74 72 6f 6e 0d  |nc..&.JSRprtron.|
00001960  0c 30 0a 4a 53 52 65 73  63 0d 0c 3a 24 4c 44 41  |.0.JSResc..:$LDA|
00001970  23 31 3a 4a 53 52 6f 73  77 72 63 68 3a 4c 44 41  |#1:JSRoswrch:LDA|
00001980  23 38 31 3a 4a 53 52 6f  73 77 72 63 68 0d 0c 44  |#81:JSRoswrch..D|
00001990  26 20 4c 44 41 23 31 3a  4a 53 52 6f 73 77 72 63  |& LDA#1:JSRoswrc|
000019a0  68 3a 4c 44 41 23 31 33  30 3a 4a 53 52 6f 73 77  |h:LDA#130:JSRosw|
000019b0  72 63 68 0d 0c 4e 0a 4a  53 52 65 73 63 0d 0c 58  |rch..N.JSResc..X|
000019c0  25 4c 44 41 23 31 3a 4a  53 52 6f 73 77 72 63 68  |%LDA#1:JSRoswrch|
000019d0  3a 4c 44 41 23 31 30 38  3a 4a 53 52 6f 73 77 72  |:LDA#108:JSRoswr|
000019e0  63 68 0d 0c 62 24 4c 44  41 23 31 3a 4a 53 52 6f  |ch..b$LDA#1:JSRo|
000019f0  73 77 72 63 68 3a 4c 44  41 23 39 30 3a 4a 53 52  |swrch:LDA#90:JSR|
00001a00  6f 73 77 72 63 68 0d 0c  6c 0e 4a 53 52 70 72 74  |oswrch..l.JSRprt|
00001a10  72 6f 66 66 0d 0c 76 0d  4a 4d 50 63 6f 6d 6f 75  |roff..v.JMPcomou|
00001a20  74 0d 0c 80 05 5d 0d 0c  8a 07 ed 3a e1 0d ff     |t....].....:...|
00001a2f

P/PCSsrc.m0

P/PCSsrc.m1

P/PCSsrc.m2

P/PCSsrc.m4

P/PCSsrc.m5

Our privacy policy is here.
Last updated: 28 Jul 2024, 23:31 UTC
Website designed by .