Ditch periodic routine

This commit is contained in:
Elliot Nunn 2021-03-27 16:11:04 +08:00
parent 02f6a6281f
commit 45e36cca05

View File

@ -189,8 +189,6 @@ DACtl
MOVE.W $1A(A0),D0 ; get the control opCode MOVE.W $1A(A0),D0 ; get the control opCode
SUB.W #64,D0 ; = 64? (event) SUB.W #64,D0 ; = 64? (event)
BEQ.S DoCtlEvent BEQ.S DoCtlEvent
SUB.W #1,D0 ; = 65? (periodic)
BEQ DoPeriodic
CtlDone CtlDone
MOVE.L A4,A1 ; put DCE ptr back in A1 MOVE.L A4,A1 ; put DCE ptr back in A1
@ -294,16 +292,6 @@ CtlEvtMouse
BRA CtlEvtDone BRA CtlEvtDone
**************************** PERIODIC ROUTINE *****************************
DoPeriodic
MOVE.L $1E(A4),-(SP) ; DCtlEntry.DCtlWindow set the port
DC.W $A873 ; __SetPort
BSR.S DrawWindow ; draw our window every 5s
BRA CtlDone
****************************** FONT METRICS ******************************* ****************************** FONT METRICS *******************************
DrawWindow DrawWindow