NAS-SEM – Nascom 260 assembler Page c000
9000 5
o0et
coz FIGS EGU OIE
poos LETS EDU GIF.
e004 SCAL EOU =o
9003 SRLX EDU CaF.
4#CREED 75R PRINTER DRIVERS
9008 +
9007 ons eepse
epeo Fs oes CREED FUSH AF HSAVE REGISTERS
opat DD ES 9009 PUSH Tx
ea cs poe PUSH EC
opea Es got PUSH HL
DES DD 21 D9 oP eo1z LD TX)FLAG :CHARACTER FLAG
apey DDE op oe1z Loc, ix#0)
bac CB EF 014 Res 7a CHANGE ANY GRAPHICS
9pAE 26 oD ois LD Hon
apse 6F 016 ta
oua1 7e. ai7 Lb aH
e092 CB 77 0018 BIT Ba STF _CR_OR LF NO SHIFT
apea 20 2E eat? OR NZ,OPCRLFS NEEDED
90% CB 7F oor BIT 74a SLETTER OR FIGURE
op98 20 1F 02 OR Zz, Laur
eD9A CB aL e022 BIT,
epee 20 15 a2 7B HIF SAME SHIFT THEN
BDse FS 9024 PusH SEND
DoF SE 18 02s Lo HIF NOT SEND SHIFT
DAL GE OL 9026 Lo 1 CHARACTER
AS DF 0@27 FCOUT RST
wbAaa oF 9028 DEFe
©bAS DD 71 @ 0029 LD 1X4e),c FPUT SHIFT INTO FLAG
epAs FL axe Pop AF
Ag CE AF 20st BIT 5,8 HIF <OR> SEND EXTRA T
eDAB 23 04 9022 oR = Zy 1CoUT
@paD OF 0035 Ret saL,
@OAE BF ora DEFB SRLX
oar 3e 1@ 9025 LD Asie
epe1 DF yess ICOUT RST SCAL
Opa? 6F 0037 DEFR GRLX
pes EL ose POP FOP HL
Spa cL 00s9 FOP BC
Opes DD Et 9040 POF 1x
eey Ft 9081 POP AF
epee 7 oa? RET
DRO CE 41 eos LUT BIT ac SIF WRONG SEND SHIFT
ODER 28 Fa boa OR Ty {COUT 3ELSE CHARACTER
OkD FS 085 PUSH AF
DBE 3E IF 8046 LD BLES.
PDO OE oe 5087 Lb C00
onc2 18 DE eae oR FCOUT
epes FE as 049 OPCRLE CF 884 SPACE
epee 28 EF bose JR 2, 1eouT
Drs SE 02 beet LD A,602— «SEND CR,LF
ora DF 052 RST scaAL
SEB oF bese DEF SRLX