summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLeo C2016-09-01 21:30:28 +0200
committerLeo C2016-09-01 21:30:28 +0200
commitd1d6fee5bb2d081bc54378ed610ab021fd768128 (patch)
tree8688903fca7af3e213bb7093c57798f466467799
parentf81f70a950ede8386b4107add2956ba68dd6ceb5 (diff)
downloadddt180-d1d6fee5bb2d081bc54378ed610ab021fd768128.zip
out.bin.b: opt
-rw-r--r--ddt180.z8018
1 files changed, 9 insertions, 9 deletions
diff --git a/ddt180.z80 b/ddt180.z80
index 96f0e83..3d4e6e7 100644
--- a/ddt180.z80
+++ b/ddt180.z80
@@ -296,7 +296,7 @@ sub_01d9h:
out_hl_dec_neg:
push hl
call sub_01d9h
- defb 03eh
+ defb 03eh ;ld a,.. swallow push hl
out.hl.dec:
push hl
ld b,006h
@@ -356,11 +356,11 @@ out.bin.w:
out.bin.b:
ld b,8
l01c9h:
- add a,a
- push af
- ld a,00
- adc a,a
- call out_dgt
+ rlca
+ push af
+ ld a,'0'/2
+ adc a,a
+ call outchar
pop af
djnz l01c9h
ld a,'"'
@@ -784,7 +784,7 @@ sub_0377h:
jr l0366h
b_037c_start:
- defb 0e6h
+ defb 0e6h ;and a,.. clear carry
get_arg_range:
scf
ex af,af'
@@ -796,7 +796,7 @@ get_arg_range:
jr c,error0
ex af,af'
pop hl
- defb 03eh
+ defb 03eh ;ld a,.. swallow pop af
l038ch:
pop af
call get_range
@@ -1378,7 +1378,7 @@ error11:
sub_060ch:
call get_char_upper
- cp '['
+ cp 'Z'+1
jr l0614h
get.hexdigit: