\r
\r
cseg ;common!\r
-isvprt0:\r
- push af\r
- in0 a,(tcr) ;reset TIF0 flag\r
- in0 a,(tmdr0l)\r
- in0 a,(tmdr0h)\r
+isvprt0: ;\r
+ push af ; 11\r
+ in0 a,(tcr) ;reset TIF0 flag 12\r
+ in0 a,(tmdr0l) ; 12\r
+ in0 a,(tmdr0h) ; 12\r
+ ;\r
\r
push hl ;11\r
ld hl,uptime ; 9\r
- inc (hl) ;10\r
- jr nz,iprt_1 ;6/8 38\r
+ inc (hl) ; 10 77\r
+ jr nz,iprt_1 ; 6/8 -2\r
inc hl ; 4\r
- inc (hl) ;10\r
- jr nz,iprt_1 ;6/8 58\r
+ inc (hl) ; 10 14\r
+ jr nz,iprt_1 ; 6/8\r
inc hl ; 4\r
inc (hl) ;10\r
jr nz,iprt_1 ;6/8\r
inc hl ; 4\r
inc (hl) ;10\r
-iprt_1:\r
+iprt_1: ; 85 138\r
pop hl ; 9\r
- ld a,(time_to)\r
- sub a,1\r
- jr c,iprt_0\r
- ld (time_to),a\r
-iprt_0:\r
- pop af\r
- ei\r
- ret\r
+ ld a,(time_to) ; 12\r
+ sub a,1 ; 6 112\r
+ jr c,iprt_0 ; 6/8\r
+ ld (time_to),a ; 13\r
+iprt_0: ; 120 178\r
+ pop af ; 9\r
+ ei ; 3\r
+ ret ; 9 141 199\r
+ ; +intack 18 159 217\r
\r
uptime:\r
dw 0,0\r