S1 Wiki

マウスのトリガ・ボタンをチェックします(MTRIG)。

AccBに格納されたトリガ・ボタン番号をチェックし、その状態をAccD格納します。

AccB:トリガ・ボタン番号1または2

AccD:座標値または方向値

	トリガ・ボタンの状態
0	押されていない
$FFFF(-1)	押されている

マウスのトリガ・ボタン1をチェックして、押されたときのみ画面にメッセージを表示します。

 0           0000   MTRIG2  EQU  *          --SAMPLE OF "MTRIG2" ROUTINE--
 1           EF9E   FILNUM  EQU  $EF9E      FILE NUMBER VEC.
 2 0000   20 0A             BRA  EXEC
 3 0002      CE     MSG     FCC  /ﾎ/
 4 0003      DE             FCC  /ﾞ/
 5 0004      C0             FCC  /ﾀ/
 6 0005      DD             FCC  /ﾝ/
 7 0006      20             FCC  / /
 8 0007      50             FCC  /P/
 9 0008      55             FCC  /U/
10 0009      53             FCC  /S/
11 000A      48             FCC  /H/
12 000B      00             FCB  $00        MESSAGE END CODE
13           000C   EXEC    EQU  *          PROGRAM START
14 000C   C6 01             LDB  #$01       B:MOUSE TRIG. NO
15 000E 103F        LOOP    SWI2            CALL "MTRIG2" ROUTINE
16 0010      42             FCB  $42
17 0011      11             FCB  $11
18 0012 1083 0000           CMPD #$0000     MOUSE TRIG. PUSH?
19 0016   27 F4             BEQ  LOOP
20 0018   30 8CE7           LEAX MSG,PCR    X:TOP ADDR. OF MESSAGE
21 001B   5F                CLRB
22 001C   F7 EFE9           STB  FILNUM     FILNUM:0
23 001F 103F                SWI2            CALL "STOUT2" ROUTINE
24 0021      41             FCB  $41        MAP NO=1 ROUTINE NO=$39 
25 0022      39             FCB  $39
26 0023   20 E7             BRA LOOP
27                          END