NAS-SEM – Nascom Z80 assembler Page 0002
e108 +
ADBC CB 7F 9109 BIT 7,8
ADBE 20 14 e110 JR NZ,UC
oiits
@112 £1/P PRINTER CASE
e113 5
ance FS 11a Lc PUSH AF
ADEI DB Os eS Ler INA, (SD
O16 5
117 $1F WRONG SEND LC
e118 5
anc e119 BIT 1,8
apes, 9120 JR Z,SENDL.
apc? er2t RCAL RY
aves e122 LD a2
abee 128 our ya
ADeD 12a RAL ROY
0125 +
0126 $CHECK CASE CHANGED
0127 +
ADCF 16 Fe 128 uk ten
0129
9150 :CASE CORRECT, RECOVER CHAR AND SEND
appt Fi 0151 SENDL POP “AF
ApD2 18 12 e132 aR SENDCH
e135 i
0134 SUPPER CASE CHARS.
e135 5
appa Fs 136 UC PUSH AF
ADDS DB os e137 UC1 INA, (D
aDD7 CB AF e130 Br 1a
9159 5
@140 iCHECK CASE
ian i
avo9 20 0A e142 Jk NZ, SENDU
avon 07 1F 0143 RcAL ROY
14a
9145 $1F WRONG SEND UC CHAR
eae +
anno 3e 01 Lo a,gor
ADDF D3 04 our a
ADEI 07 19 RCAL DY
ASE CHANGED
ADES 18 FO oF ued
9155 F1F CASK CORRECT SEND CHAR
21st +
AES Fi 2157 SeNDU POF AF
Pisa +
2159 ;BIT 7 SET EOUALS CHAR
8189 $NOT SET EOUALS CONTROL