emailler/ip65/ip65_c.s
2018-02-22 22:33:47 +01:00

32 lines
419 B
ArmAsm

.include "../inc/common.i"
.export _ip65_init
.export _ip65_process
.export _ip65_random_word
.export _ip65_error
.import ip65_init
.import ip65_process
.import ip65_random_word
.import ip65_error
.import drv_init
_ip65_init:
jsr drv_init
jsr ip65_init
ldx #$00
txa
rol
rts
_ip65_process:
jsr ip65_process
ldx #$00
txa
rol
rts
_ip65_random_word := ip65_random_word
_ip65_error := ip65_error