mirror of
https://github.com/KarolS/millfork.git
synced 2026-04-20 18:16:35 +00:00
panic()
This commit is contained in:
@@ -21,3 +21,25 @@ inline asm void enable_irq() {
|
||||
CLI
|
||||
}
|
||||
|
||||
asm byte hi_nibble_to_hex(byte a) {
|
||||
LSR
|
||||
LSR
|
||||
LSR
|
||||
LSR
|
||||
JMP lo_nibble_to_hex
|
||||
}
|
||||
|
||||
asm byte lo_nibble_to_hex(byte a) {
|
||||
AND #$F
|
||||
CLC
|
||||
ADC #$30
|
||||
CMP #$3A
|
||||
BCC _lo_nibble_to_hex_lbl
|
||||
ADC #$6 // carry is set
|
||||
_lo_nibble_to_hex_lbl:
|
||||
RTS
|
||||
}
|
||||
|
||||
inline asm void panic() {
|
||||
JSR _panic
|
||||
}
|
||||
Reference in New Issue
Block a user