Mercurial > hg > Members > kono > nitros9-code

comparison level1/cmds/prompt.asm @ 1359:2b0af03a7915

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Replaced decb with subd #$0001 which is more "proper"
author boisy
date Thu, 18 Sep 2003 12:38:15 +0000
parents 84ea83668304
children
comparison
equal deleted inserted replaced
1358:d9227f484be8 1359:2b0af03a7915
32 name fcs /Prompt/ 32 name fcs /Prompt/
33 fcb edition 33 fcb edition
34 34
35 cr fcb C$CR 35 cr fcb C$CR
36 36
37 start decb subtract CR from param length 37 start subd #$0001 subtract CR from param length
38 beq readkey if zero, don't print anything 38 beq readkey if zero, don't print anything
39 clra clear upper 8 bits 39 clra clear upper 8 bits
40 tfr d,y transfer length to Y 40 tfr d,y transfer length to Y
41 lda #$01 stdout 41 lda #$01 stdout
42 os9 I$Write 42 os9 I$Write