Move buffers out of zero page
This commit is contained in:
+17
-6
@@ -16,10 +16,6 @@ conin equ 01h
|
|||||||
|
|
||||||
char_idx equ 10h
|
char_idx equ 10h
|
||||||
|
|
||||||
temperature equ 20h
|
|
||||||
humidity equ 30h
|
|
||||||
pressure equ 40h
|
|
||||||
|
|
||||||
start:
|
start:
|
||||||
call init_lcd
|
call init_lcd
|
||||||
call init_siob
|
call init_siob
|
||||||
@@ -46,6 +42,7 @@ start:
|
|||||||
main:
|
main:
|
||||||
call read_char_b
|
call read_char_b
|
||||||
call parse_char
|
call parse_char
|
||||||
|
;call lcd_delay
|
||||||
;call print_char_to_lcd
|
;call print_char_to_lcd
|
||||||
ld c,11
|
ld c,11
|
||||||
call bdos
|
call bdos
|
||||||
@@ -97,6 +94,7 @@ delay1:
|
|||||||
|
|
||||||
convert_to_hpa:
|
convert_to_hpa:
|
||||||
ld a,(pressure)
|
ld a,(pressure)
|
||||||
|
ret
|
||||||
|
|
||||||
read_char_b:
|
read_char_b:
|
||||||
wait:
|
wait:
|
||||||
@@ -134,6 +132,15 @@ print_telem_to_lcd:
|
|||||||
call move_to_tempaddr
|
call move_to_tempaddr
|
||||||
ld hl,temperature
|
ld hl,temperature
|
||||||
call print_str_to_lcd
|
call print_str_to_lcd
|
||||||
|
|
||||||
|
call move_to_presaddr
|
||||||
|
ld hl,pressure
|
||||||
|
call print_str_to_lcd
|
||||||
|
|
||||||
|
call move_to_humidaddr
|
||||||
|
ld hl,humidity
|
||||||
|
call print_str_to_lcd
|
||||||
|
|
||||||
ld a,1h
|
ld a,1h
|
||||||
out (0),a
|
out (0),a
|
||||||
ret
|
ret
|
||||||
@@ -195,21 +202,25 @@ move_to_tempaddr:
|
|||||||
ld a,85h
|
ld a,85h
|
||||||
out (lcd_ctrl),a
|
out (lcd_ctrl),a
|
||||||
ld a,c
|
ld a,c
|
||||||
|
call lcd_delay
|
||||||
ret
|
ret
|
||||||
|
|
||||||
move_to_presaddr:
|
move_to_presaddr:
|
||||||
ld a,0c1h
|
ld a,0c1h
|
||||||
out (lcd_ctrl),a
|
out (lcd_ctrl),a
|
||||||
|
call lcd_delay
|
||||||
ret
|
ret
|
||||||
|
|
||||||
move_to_humidaddr:
|
move_to_humidaddr:
|
||||||
ld a,99h
|
ld a,99h
|
||||||
out (lcd_ctrl),a
|
out (lcd_ctrl),a
|
||||||
|
call lcd_delay
|
||||||
ret
|
ret
|
||||||
|
|
||||||
clabel: DB 'degree C',0
|
clabel: DB 'degree C',0
|
||||||
plabel: DB 'pascal',0
|
plabel: DB 'pascal',0
|
||||||
hlabel: DB '% RH',0
|
hlabel: DB '% RH',0
|
||||||
|
|
||||||
end start
|
temperature: DS 16
|
||||||
|
humidity: DS 16
|
||||||
|
pressure: DS 16
|
||||||
|
|||||||
Reference in New Issue
Block a user