S1 Wiki

文字列(メッセージ)を画面、または設定したファイルに出力します。

メモリ上に格納されている文字列を現在のカーソル位置から表示します。
文字列の終了コードは、NULL($00)で指定します。

X:文字列データが格納されているメモリ空間上での先頭アドレス
AccA:文字列データが格納されているメモリ空間番号
FILNUM($EF9E):ファイル番号

• 0…文字列データを、ディスプレイに出力
• 1〜$F…文字列データを、指定したファイル番号のファイルに出力

"MESSAGE"の文字列(メッセージ)データを、現在のカーソル位置に表示します。

 0           0000   STOUT2  EQU  *          --SAMPLE OF "STOUT2" ROUTINE--
 1           EFE9   FILNUM  EQU  $EFE9
 2 0000   20 09             BRA  EXEC
 3 0002      4D     CHDATA  FCC  /M/
 4 0003      45             FCC  /E/
 5 0004      53             FCC  /S/
 6 0005      53             FCC  /S/
 7 0006      41             FCC  /A/
 8 0007      47             FCC  /G/
 9 0008      45             FCC  /E/
10 0009      00             FCB  $00        MESSAGE END CODE
11 000A      0F     MAPNO   FCB  $0F        CURRENT MAP=$0F
12           000B   EXEC    EQU  *          PROGRAM START
13 000B   30 8CF4           LEAX CHDATA,PCR X:TOP ADDR OF MESSAGE AREA
14 000E   A6 8CF9           LDA  MAPNO,PCR  A:MAP NO=15
15 0011   5F                CLRB
16 0012   F7 EFE9           STB  FILNUM     FILNUM--->0: DISPLAY OUT
17                  *                                 1-16: FILE# OUT
18 0015 103F                SWI2            CALL "STOUT2" ROUTINE
19 0017      41             FCB  $41        MAP NO=1 ROUTINE NO=$39 
20 0018      39             FCB  $39
21 0019   39                RTS
22                          END