aboutsummaryrefslogtreecommitdiff
path: root/timed_getch.s
diff options
context:
space:
mode:
Diffstat (limited to 'timed_getch.s')
-rw-r--r--timed_getch.s13
1 files changed, 11 insertions, 2 deletions
diff --git a/timed_getch.s b/timed_getch.s
index eaf7ab3..5c5ff7c 100644
--- a/timed_getch.s
+++ b/timed_getch.s
@@ -1,7 +1,7 @@
.export _timed_getch, _set_jiffy_timer, _agetc, _numgetc
- .export _yngetc, _lcgetc, _jsleep, _get_item
- .import _cgetc, _cblank, putchar, _rand
+ .export _yngetc, _lcgetc, _jsleep, _get_item, _tjsleep
+ .import _cgetc, _cblank, putchar, _rand, _turbo
.include "atari.inc"
@@ -13,6 +13,14 @@
; keyboard and timer functions for taipan.
+; sleep for j jiffies, unless _turbo is set.
+; extern void __fastcall__ tjsleep(unsigned int j);
+_tjsleep:
+ sta FR0+4
+ lda _turbo
+ bne jret
+ lda FR0+4
+
; sleep for j jiffies.
; extern void __fastcall__ jsleep(unsigned int j);
_jsleep:
@@ -21,6 +29,7 @@ jiffy_wait:
lda CDTMV3
ora CDTMV3+1
bne jiffy_wait
+jret:
rts
; extern void __fastcall__ set_jiffy_timer(unsigned int jiffies);