3-  

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 [ 40 ] 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57

1 0000

2 0000

3 0000 4J0OOO

5 0000

6 0000

7 0000

8 0000,

9 0000

10

11 0000 12 0000

13 0003

14 0004

15 0005

16 0007

17 0009

18

19

20 0011

21 00U

22 0017

0018

24 OOIB

25 OOIB

26 001

27 001

28 001

29 001

30 001

31 001

3 2 001

33 001

34 001

35 001

36 001

37 001

38 OOIB

39 OOIB

40 OOIB

41 OOIE

42 21

43 0024 .44 002 6

45 0029

46 002C

47 002C

48 0J3C

49 002C

50 002C

51 002C

52 002

53 002C

54

55 002C

56 002F

57 002F

58 002F

59 002F

60 002F

♦ 1

* 8-28-79 * .. *♦

AI FB

D3 Fo D3 Fl D3 F2 32 00 32 01 32 02 32 03

32 04

ORG 00 .

-,

SP,13FFH

. ,

OiOH

OFlH

Oi2H

000000

KTIME

1=0

CFLAG

CFT,AG=0

KWGHT

KwaHT=o

KCOMP

=0

({0=1

KEOW

KK0VV=00000001

*

1 EQU

CFLAG EQU KTIME+1,

KWGHT EQU CFLAG+1

KCOMP EQU KWGHT+1

KROW EQU KCOMP+1

NROW EQU KbOW+1

innt )t )t -)t ** * )t* nnnnt> )H(-* * * .4.20

CD 00 CD DB 00 01 FE 00 CA IB 00 CD B1 00

SROW CALL OroW

CALL 01

LDA CiLAG

CPI

. JZ sraw

CALL KEYW

COLM

,

, ???

00 10

FE 00

.4.20 .4.21

** . * .* (111 1 )

LDA KTIME KTIME

( 2)

CPI 1=0??

61 0031

62 0034

63 0034

64 0034

65 0034

66 0034

67 0034

68 0037 4F

69 0038

70 0038 9

71

72 003F

73 003F

74 003F

75 003F AF

76 0040 32

77 0043

78 0046

79 0046

80 0046

81 0046

82 0049

83 004 32

84 004D

85 004D 8 6 004D

87 004D FE

88 004F 2

89 0052 CD

90 0055 CD

91 0058

92 005

93 005

94 005

95 005

96 005 32

97 0061

98 0061

99 0061

100 0061 .

101 0063 32

102 0066 0066

104 0066

105 0066

106 0068 32

107 00©

108 006

109 00©

111 006

112

113

114

115

116

117

118 006

119

120

5 00 JZ KCL01

********

( 7)

02 10 LDA KWGHT

MOV ,

03 10 LDA

46 00 JZ KCL02

00 10 66 00

XRA STA KTIME JMP KCL03

00 10 00 10

* ( 9) KCL02

LDA KTIMB INR A STA KTIME

** *( 10)

32 CPI 50

66 00 JNZ KCL03

6 00 CALL KOPN

A7 00 CALL KOUT

IB 00 jmi srow

* ( 3) *

02 10 KCLOl LDA XWGHT

03 10 STA KCOMP

* *( 4)

01 MVI A.OI

00 10 STA KTIME

** ( 5)

01 KCL03 MVI A,01

04 10 STA KROW

* * ( 6) IB 00 JMP SROW

, *********

??? C=KWGHT KC0MP=KWGHT7?? ;0 !! !

KTIME

KTIME

1=1+1

1=1+1

1=5077? 50

KcoMp=KwaHT

KTlMi2=1

0=00000001

♦ * **

* * ♦♦ I*************.....**************************************

* .4.22

. 9.4. 8080.



121 006

122

123 006

124

125 006

126 006

127 006

128 0070

129 007

130 0074

131 0077

132 0077

133 0077

134 0077

135 007

136 007 13 007

138 007

139 007D

140 00711

141 007D

142 00711

143 0080

144 0080

145 0080

146 0080

147 0083

148 0085

149 0088

150 0088

151 0088

152 0088

153 008

154 008

155 008F

156 008F

157 008F

158 008F

159 0091

160 0094

161 0094

162 0094 1 63 0094

164 0097

165 0098

166 009B

167 009

168 009

169 009

170 009

171 009D

172

173

174

175

176 002

177

178 00 6

179

180

01 KOPN 32 04 10 3d

32 05 10

mvi sta dsr sta

a,01 a

neow

.. .. ( 2)

32 00 10 sta ktime

(imr 3)

cd eb oq kopni call orow

cd db 00 call colm

( 5) *

01 10 lda cflag

Fe 00 cpi 00

c2 6e 00 jnz kopn

( 9)

05 10 lda nhow

3c inr a

32 05 10 sta nbow

( 10)

fe 05 cpi 05

c2 7a 00 jnz k0pn1

00 10 lda ktime

3c 1 a

32 00 10 sta ktime

47 mov b,a

* ( 6a)

32 05 10

xra sta

( 7)

32 8

C2 7A 00

MVI a, 50

CMP

JNZ KOPNI

KB0W=0000000l NE0W300OO00OO

KTIME=0

cflaq cflag=0777

=>1

=0

1=50777

,

181

182 07

183 007

184 007

185 007

186 007

187 007

188 007 18 9 07

190 007

191 007

192 007

193

194

195

196

197 GOBI

1 98 001

199 001

200 OOBI

201 01

202 OOBl

203 OOBl

204 OOBl

205 OOBl 20 6 OOBl

207 OOBl

208 OOBl

209 OOBl

210 OOBl

211 00B2

212 00B5

213 dOB5

214 0OB5

215 00B5

216 0037

217 00B7

218 0OB7

219 00B7

2 20 00B8

221 OOBA-

222 OOBA 2 23 OOBA

224 OOBA

225 OOBD 2 26 OOBD

22 7 OOBD

228 OOBD

229 OOBE

230 00C1

231 OOCl

232 OOCl

233 OOCl

23 4 00C2 235 00C5 23 6 00C5

237 0OC5

238 00C5

239 0OC7 2 40 00C7

02 d3 FO d3 Fl d3 iZ c9

* KOUT

* * , ♦ , , ,

lda KWGHT OUT OFOH OUT OFlH OUT 0f2h RET

* KETtf

*

♦ - .4.18 * ( 1)

01

06 00

fe 00

KBIW XRA

LDA CFLAG

MVI ,00

(]] 3)

KiS-iWi RAR

CPI 00

1 , ?

1 00 jz kexw2 8=0,1,2,3,4 (

7

04

* ( 5)

1nh

00 jmp keywi . ,

♦ ( 7)

KfflfW2 xra

10 lda krow

* ( 8>

6 00 MVI ,00 2

* ( 9)



2*1 07

242 IF

243 00G8 FE 00 2 44

245

246

2 47 D1

248 OOCD

249 OOCD

250 OOCD

251 OOCD

252 7 2 53 00D1

254 O0D1

255 0OD1

256 O0D1

257 00D2 78 2 58 00D3 17 2 59 00D4 17 260 00D5 80 2 61 00D6 8-1 2 62 O0D7

2 63 O0D7

2 64 00D7

265 O0D7 32 02

2 66 OODA

2 67 OODA

2 68 OODA

269 OODA C9

270 OODB

271 OODB

272 OODB 2 73 OODB 274 OODB 2 75 OODB 2 76 OODB 2 77 OODB

278 OODB

279 OODB

280 OODB

281 OODB

282 OODB

283 OODB

284 OODB 28 5 OODB

28 6 OODB AF

287 OODC 32 01

288 OODF

289 OODF

290 OODF

291 OODF DB FE

292 OOEl

293 OOEl

294 OOEl

295 OOEl F6 EO

296

297

298

299 FE FF

300 00E5 C8

KEW3 - RAR

CPI 00

1 , BD7

♦ * ( 10)

00 JZ KS1W4 ,

* **(1 U)

INR

00 JMP

> ( 11)

4 XRA

, = (

RAL 2

BAL *4

ADD 5

ADD ( 5)+=0-24

* * *( 12)

10 KvVGHT

( 13) RET

.

* 04 *

* ,

*

*

* -.4.15

** )( * * * * *♦ -

*** ( 1) *

COLM XRA 10 STA CFLAG =0

( 2)

IN OFEH flAHHiE FE * ( )

ORI D5,D6,D7=t

* (1 ) *

CPI OFEH

RZ (4)

301

302 006

303

304 2F

305 007

306 007

307 7 .

308 007 32 01 10 )09 9

310

311 ;12 ) )15 OOiiB

116

117

8

319

(;

321 1.2 < 14 15

127 04 10 1.8 19

130

131 FE 10

132 00F0 2 F8 00

133 00F3

134 OOF3

135 00F3

13 6 00F3 01

137 00F5 F9 00

138 00F8 >39 00FB

140 00F8

141 00F8 07 U2 00F9

143 OOF9

144 OOF9

145 0OF9 32 04

146 OOFC

147 OOFC

148 OOFC

149 OOFC 2F

150 OOFD ))1 OOFD

152 OOFD

153 OOFD D3 FE

154 OOFF (55 OOFF )56 OOFF )57 OOFF C9 158 0100 I6O 0100

* ( 5)

* * ( 6)

(]

STA CFLAG RET

* * , * ,hhhh h, j

*

-OROW

♦ ** ♦ * ♦♦ * ♦♦ * * * * ♦ * * ** *

.4.10 8080

** ♦ * ♦ ♦ ♦

OHOW LDA KroW *** **( 2)

???

JNZ 0R0W1 , 2

**♦ ( -2)-

MVI ,01 JjiJP ST3 3

.* . (1 2)

0RQW1

* *( 3)

ST3 STA KROW *

**** *( 4)

* ( 5)

OUT OFEH

. DO FE

♦ ( 6)

* * * * * * *** *** **********~



1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 [ 40 ] 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57