mirror of
https://github.com/KarolS/millfork.git
synced 2024-11-05 00:05:44 +00:00
27 lines
410 B
Plaintext
27 lines
410 B
Plaintext
void _panic() {
|
|
asm {
|
|
SEI
|
|
PLA // status register
|
|
PLA
|
|
TAY
|
|
PLA
|
|
|
|
TAX
|
|
JSR hi_nibble_to_hex
|
|
JSR putchar
|
|
TXA
|
|
JSR lo_nibble_to_hex
|
|
JSR putchar
|
|
|
|
TYA
|
|
JSR hi_nibble_to_hex
|
|
JSR putchar
|
|
TYA
|
|
JSR lo_nibble_to_hex
|
|
JSR putchar
|
|
|
|
LDA #2
|
|
STA $D020
|
|
}
|
|
while(true){}
|
|
} |