Skip to content

Commit

Permalink
feat(UAEquit): Added UAEquit at the end of the startup script
Browse files Browse the repository at this point in the history
  • Loading branch information
prb28 committed Jan 5, 2019
1 parent 3c6fc89 commit 9706ac4
Show file tree
Hide file tree
Showing 3 changed files with 21 additions and 17 deletions.
Binary file added fs-uae/hd0/c/UAEquit
Binary file not shown.
5 changes: 4 additions & 1 deletion fs-uae/hd0/s/Startup-Sequence
Original file line number Diff line number Diff line change
@@ -1 +1,4 @@
gencop
gencop

; Quits the emulator at the end of the program
UAEquit
33 changes: 17 additions & 16 deletions gencop.s
Original file line number Diff line number Diff line change
Expand Up @@ -2,26 +2,27 @@

;Registres

INTENA=$09A
INTENAR=$01C
INTREQ=$09C
INTREQR=$01E
DMACON=$096
DMACONR=$002
COLOR00=$dff180
C_COLOR00=$180
COP1LCH=$dff080
COP1LCL=$dff082
COPJMP1=$dff088
VPOSR=$dff004
INTENA = $09A
INTENAR = $01C
INTREQ = $09C
INTREQR = $01E
DMACON = $096
DMACONR = $002
COLOR00 = $dff180
C_COLOR00 = $180
COP1LCH = $dff080
COP1LCL = $dff082
COPJMP1 = $dff088
VPOSR = $dff004

;Programme

COPPERLIST_SIZE=1000 ;Size of the copperlist
LINE=100 ;<= 255
COPPERLIST_SIZE = 1000 ;Size of the copperlist
LINE = 100 ;<= 255

init:
move.l 4.w,a6 ; execbase
movem.l d0-a6,-(sp)
move.l 4.w,a6 ; execbase
clr.l d0

; Allocation of chip memory
Expand Down Expand Up @@ -124,7 +125,6 @@ resetcount:

******************************************************************
mainloop:

; Wait for vertical blank
move.w #$0c,d0 ;No buffering, so wait until raster
bsr.w WaitRaster ;is below the Display Window.
Expand Down Expand Up @@ -157,6 +157,7 @@ exit:
move.l d4,$dff080 ; restoring copperlist
or #$c000,d5 ; activating interruptions
move d5,$dff09a
movem.l (sp)+,d0-a6
rts

WaitRaster: ;Wait for scanline d0. Trashes d1.
Expand Down

0 comments on commit 9706ac4

Please sign in to comment.