mirror of
https://github.com/KarolS/millfork.git
synced 2024-12-23 08:29:35 +00:00
Formatting update
This commit is contained in:
parent
db4a5eed00
commit
b0e8b5c8d6
@ -1,40 +1,48 @@
|
||||
|
||||
void RasterA()
|
||||
{
|
||||
void RasterA() {
|
||||
vic_rasterirq_acknowledge()
|
||||
vic_border = $00
|
||||
|
||||
// First raster split, set border to black
|
||||
vic_border = black
|
||||
|
||||
// Set up next raster split
|
||||
vic_rasterirq_reconfigure(RasterB.addr, $40)
|
||||
vic_raster_return()
|
||||
|
||||
vic_rasterirq_return()
|
||||
}
|
||||
|
||||
void RasterB()
|
||||
{
|
||||
void RasterB() {
|
||||
vic_rasterirq_acknowledge()
|
||||
vic_border = $04
|
||||
|
||||
// Second raster split, Dark grey
|
||||
vic_border = dark_grey
|
||||
|
||||
// Set up next raster split
|
||||
vic_rasterirq_reconfigure(RasterC.addr, $A0)
|
||||
vic_raster_return()
|
||||
|
||||
vic_rasterirq_return()
|
||||
}
|
||||
|
||||
void RasterC()
|
||||
{
|
||||
void RasterC() {
|
||||
vic_rasterirq_acknowledge()
|
||||
vic_border = $02
|
||||
|
||||
// Third raster split, Light grey
|
||||
vic_border = light_grey
|
||||
|
||||
// Set up next raster split
|
||||
vic_rasterirq_reconfigure(RasterA.addr, $00)
|
||||
vic_raster_return()
|
||||
|
||||
vic_rasterirq_return()
|
||||
}
|
||||
|
||||
void main()
|
||||
{
|
||||
void main() {
|
||||
byte i
|
||||
|
||||
// Configure Raster IRQ
|
||||
vic_rasterirq_configure(RasterA.addr, $00)
|
||||
|
||||
while true
|
||||
{
|
||||
i = 0
|
||||
// Loop forever
|
||||
while true {
|
||||
i = 0 // Do nothing here
|
||||
}
|
||||
}
|
||||
|
@ -167,8 +167,7 @@ const byte light_grey = 15
|
||||
const byte light_gray = 15
|
||||
|
||||
|
||||
asm void vic_rasterirq_configure(pointer CallbackFunction, byte RasterLine)
|
||||
{
|
||||
asm void vic_rasterirq_configure(pointer CallbackFunction, byte RasterLine) {
|
||||
sei
|
||||
ldx CallbackFunction.lo
|
||||
stx $0314
|
||||
@ -187,8 +186,7 @@ asm void vic_rasterirq_configure(pointer CallbackFunction, byte RasterLine)
|
||||
rts
|
||||
}
|
||||
|
||||
asm void vic_rasterirq_reconfigure(pointer CallbackFunction, byte RasterLine)
|
||||
{
|
||||
asm void vic_rasterirq_reconfigure(pointer CallbackFunction, byte RasterLine) {
|
||||
ldx CallbackFunction.lo
|
||||
stx $0314
|
||||
ldy CallbackFunction.hi
|
||||
@ -198,14 +196,12 @@ asm void vic_rasterirq_reconfigure(pointer CallbackFunction, byte RasterLine)
|
||||
rts
|
||||
}
|
||||
|
||||
asm macro void vic_rasterirq_acknowledge()
|
||||
{
|
||||
asm macro void vic_rasterirq_acknowledge() {
|
||||
lda #$FF
|
||||
sta $D019
|
||||
}
|
||||
|
||||
asm macro void vic_raster_return()
|
||||
{
|
||||
asm macro void vic_rasterirq_return() {
|
||||
lda #$00
|
||||
jmp $EA81
|
||||
}
|
||||
|
Loading…
Reference in New Issue
Block a user