最終更新:ID:InM6Emp9CA 2015年01月22日(木) 19:56:00履歴
メモリ空間 | 2 |
---|---|
ルーチン番号 | $11 |
マウスのトリガ・ボタン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
コメントをかく