diff options
author | B. Watson <yalhcru@gmail.com> | 2021-04-15 13:02:39 -0400 |
---|---|---|
committer | B. Watson <yalhcru@gmail.com> | 2021-04-15 13:02:39 -0400 |
commit | ca3c75a316e152dca0dcbac1f0adbd7789d09489 (patch) | |
tree | 1ea0c872d3f153c3496e2b3475405456f685eccc /console.s | |
parent | c94725152b4bb2e46f94a32d0dbee68f47de343b (diff) | |
download | taipan-ca3c75a316e152dca0dcbac1f0adbd7789d09489.tar.gz |
Save 20 bytes
Diffstat (limited to 'console.s')
-rw-r--r-- | console.s | 27 |
1 files changed, 8 insertions, 19 deletions
@@ -2,7 +2,7 @@ .include "atari.inc" .include "conio/mul40.s" - .export _clrtobot, _clrtoeol, _clr_screen, _clrtoline, _cspaces, _cblank, _cblankto, _backspace, _cprint_pipe, _cprint_bang, _cspace, _cputc_s, _comma_space, _cprint_colon_space, _cprint_question_space, _cprint_period, _cprint_taipan_prompt, _plus_or_space, _gotox0y22, _gotox0y3, _gotox0y, _gotox0y3_clrtoeol,_cputc0, _set_orders + .export _clrtobot, _clrtoeol, _clr_screen, _clrtoline, _cspaces, _cblank, _cblankto, _backspace, _cprint_pipe, _cprint_bang, _cspace, _cputc_s, _comma_space, _cprint_colon_space, _cprint_question_space, _cprint_period, _cprint_taipan_prompt, _plus_or_space, _gotox0y22, _gotox0y3, _gotox0y, _gotox0y3_clrtoeol,_cputc0, _set_orders, _pluralize .export _rvs_on, _rvs_off .importzp tmp3 ; ditto @@ -254,24 +254,13 @@ _gotox0y3_clrtoeol: jsr _gotox0y3 jmp _clrtoeol -; extern void set_orders(void); -;_set_orders: -; jsr _timed_getch -; ldx _orders -; cmp #'f' -; bne @notf -; ldx #1 -;@notf: -; cmp #'r' -; bne @notr -; ldx #2 -;@notr: -; cmp #'t' -; bne @nott -; ldx #3 -;@nott: -; stx _orders -; rts +; extern void __fastcall__ pluralize(int num); +_pluralize: + cmp #1 + bne _cputc_s + txa + bne _cputc_s + rts ; extern void set_orders(void); _set_orders: |