Blame |
Last modification |
View Log
| Download
| RSS feed
MODULE cmd2ve
PUBLIC cmd2ve
#include "sysdefs.asm"
RSEG CODE
cmd2ve: ;e=command ╨▓╨╛╨╖╨▓╤А╨░╤Й╨░╨╡╨╝ ╤А╨╡╨╖╤Г╨╗╤М╤В╨░╤В ╨▓ A
di
push bc
ld bc,0x55FE ;╨░╨┤╤А╨╡╤Б 8952
in a,(c) ;╨Я╨╡╤А╨╡╤Е╨╛╨┤ ╨▓ ╤А╨╡╨╢╨╕╨╝ ╨║╨╛╨╝╨░╨╜╨┤╤Л
ld b,e ;╨║╨╛╨╝╨░╨╜╨┤╨░ ╨╕╨╖ E ╨┐╨╡╤А╨╡╨╜╨╛c╨╕╨╝ ╨▓ B
in a,(c) ;╨▓╤Л╨┐╨╛╨╗╨╜╨╕╤В╤М ╨║╨╛╨╝╨░╨╜╨┤╤Г
pop bc
ei
ret
ENDMOD
MODULE send2ve
PUBLIC send2ve
#include "sysdefs.asm"
RSEG CODE
send2ve: ;e=command b=data
di
ld d,c
ld bc,0x55FE ;╨░╨┤╤А╨╡╤Б 8952
in a,(c) ;╨Я╨╡╤А╨╡╤Е╨╛╨┤ ╨▓ ╤А╨╡╨╢╨╕╨╝ ╨║╨╛╨╝╨░╨╜╨┤╤Л
ld b,e ;╨║╨╛╨╝╨░╨╜╨┤╨░
IN a,(c)
ld b,d ;╨Я╨░╤А╨░╨╝╨╡╤В╤А
in a,(c)
ei
ret
ENDMOD
END