mirror of
https://gitlab.com/camelot/kickc.git
synced 2024-09-29 03:56:15 +00:00
36 lines
1.3 KiB
INI
36 lines
1.3 KiB
INI
@begin: scope:[] from
|
|
[0] phi()
|
|
to:@1
|
|
@1: scope:[] from @begin
|
|
[1] phi()
|
|
[2] call main
|
|
to:@end
|
|
@end: scope:[] from @1
|
|
[3] phi()
|
|
|
|
(void()) main()
|
|
main: scope:[main] from @1
|
|
asm { sei }
|
|
[5] *((const nomodify byte*) PROCPORT_DDR) ← (const nomodify byte) PROCPORT_DDR_MEMORY_MASK
|
|
[6] *((const nomodify byte*) PROCPORT) ← (const nomodify byte) PROCPORT_RAM_IO
|
|
[7] *((const nomodify byte*) CIA1_INTERRUPT) ← (const nomodify byte) CIA_INTERRUPT_CLEAR
|
|
[8] *((const nomodify byte*) VIC_CONTROL) ← *((const nomodify byte*) VIC_CONTROL) | (byte) $80
|
|
[9] *((const nomodify byte*) RASTER) ← (byte) 0
|
|
[10] *((const nomodify byte*) IRQ_ENABLE) ← (const nomodify byte) IRQ_RASTER
|
|
[11] *((const nomodify void()**) HARDWARE_IRQ) ← &interrupt(HARDWARE_STACK)(void()) irq()
|
|
asm { cli }
|
|
to:main::@1
|
|
main::@1: scope:[main] from main main::@1
|
|
[13] *((const nomodify byte*) FGCOL) ← ++ *((const nomodify byte*) FGCOL)
|
|
to:main::@1
|
|
|
|
interrupt(HARDWARE_STACK)(void()) irq()
|
|
irq: scope:[irq] from
|
|
[14] *((const nomodify byte*) BG_COLOR) ← (const nomodify byte) WHITE
|
|
[15] *((const nomodify byte*) BG_COLOR) ← (const nomodify byte) BLACK
|
|
[16] *((const nomodify byte*) IRQ_STATUS) ← (const nomodify byte) IRQ_RASTER
|
|
to:irq::@return
|
|
irq::@return: scope:[irq] from irq
|
|
[17] return
|
|
to:@return
|