mirror of
https://github.com/bobbimanners/emailler.git
synced 2024-09-26 18:56:35 +00:00
27 lines
341 B
ArmAsm
27 lines
341 B
ArmAsm
|
.include "../inc/common.i"
|
||
|
|
||
|
.export _sntp_get_time
|
||
|
|
||
|
.import sntp_get_time
|
||
|
.import sntp_ip
|
||
|
.import sntp_utc_timestamp
|
||
|
|
||
|
.importzp sreg
|
||
|
|
||
|
_sntp_get_time:
|
||
|
stax sntp_ip
|
||
|
ldax sreg
|
||
|
stax sntp_ip+2
|
||
|
jsr sntp_get_time
|
||
|
bcs error
|
||
|
ldax sntp_utc_timestamp+2
|
||
|
stax sreg
|
||
|
ldax sntp_utc_timestamp
|
||
|
rts
|
||
|
|
||
|
error:
|
||
|
ldx #$00
|
||
|
txa
|
||
|
stax sreg
|
||
|
rts
|