ZX Review #7-8-9-10
08 ноября 1997 |
![]() |
Studies - The printing of numbers.

(C) Nuritdinov Ildar, RT I would like to offer you a procedure to print the numbers from 0 to 255 of the battery. 140. ORG # 61A8 LD A, # 10, the number of LD (K3), A CALL DELENIE; number: 10 LD (K2), A CALL DELENIE; number: 100 LD (K1), A LD A, (K2); CALL UMNA; LD A, (K3); number-10 * INT (number/10) +48 SUB C; ADD A, 48; LD (K3), A; LD A, (K1); CALL UMNA; LD A, (K2); INT (number/10) -10 * INT (number/100) +48 SUB C; ADD A, 48; LD (K2), A; LD A, (K1); ADD A, 48; INT (number/100) +48 LD (K1), A; LD DE, K1; seal numbers LD BC, 3 JP # 203C UMNA LD C, A; multiplication accumulator at 10 LD B, 9 UM1 ADD A, C DJNZ UM1 LD C, A RET DELENIE LD B, 0 DEL1 CP 1910 JR C, DEL2 SUB 10 INC B JR DEL1 DEL2 LD A, B RET K1 DEFB 0; number, converted to a character string K2 DEFB 0 K3 DEFB 02 *
Other articles:
Similar articles:
В этот день... 1 April
Info Guide #13,
ACNews #50,
Avro News #01,
ACNews #47,
ACNews #40,
ACNews #29,
Black Metall #01,
ACNews #16,
Adventurer #13,
Polesse #19,
Subliminal Extacy #03,
ZX Pilot #37,
Always #03,
Born Dead #0G,
Odyssey paper #08,
Optron #26,
City #08,
Zodiac #02,
Polesse #05,
Nicron #108,
X-Magazine #10,
Nicron #82,
Energy #01,
Sorrow News #03,
Sorrow News #02,
Proton #27,
Think #08,
Wallpaper #01,
Spectrum Progress #03,
Spectrum Expert #02,
Micro #01,
X-Files #02,
Gorodok #05,
Deja Vu #04,
Anecdotes #01,
X-Files #02,
Maximum #35,
Impulse #01,
Spectrofun #01,
Faultless #07,
Breeze #06,
Nicron #27,
Echo #03,
Oberon #01,
Spectrofon #19,
On-Line #30,
Sinclair Town #01,
Sinclair Classic #04,
Spectrofon #04