S1 Wiki

ジョイスティックの方向値を読み取ります(STICK)。

AccBに格納されているジョイスティック番号の方向を、AccDに格納します。

AccB:ジョイスティック番号1〜2

AccD:ジョイスティック番号の方向0〜8

8	1	2
7	*	3
6	5	4

0は停止状態

ジョイスティック1の方向値をAccDに格納し、その整数データを単精度型に変換後、FACCに格納します。
次にFACCの値を文字列に変換してバッファに格納し、画面に表示します。

 0           0000   STICK2  EQU  *          --SAMPLE OF "STICK2" ROUTINE--
 1           EEDA   PKBUF   EQU  $EEDA      [PKBUF ADDR.]
 2           EF9E   FILNUM  EQU  $EF9E      FILE NUMBER VEC.
 3                  *                       --- JOY STICK READ ---
 4 0000   C6 01             LDB  #$01       B:JOY STICK NO
 5 0002 103F        LOOP    SWI2            CALL "STICK2" ROUTINE
 6 0004      42             FCB  $42
 7 0005      12             FCB  $12
 8                  *                       --- FACC = ACCD ---
 9 0006 103F                SWI2            CALL "UMOVFD" ROUTINE
10 0008      42             FCB  $42
11 0009      1F             FCB  $1F
12 000A   86 88             LDA  #$88
13 000C   C6 40             LDB  #$40       "+####"
14 000E 103F                SWI2            CALL "UFOUT" ROUTINE
15 0010      42             FCB  $42
16 0011      22             FCB  $22
17                  *                       --- DISPLAY OUT ---
18 0012   BE EEDA           LDX  PKBUF      X:TOP ADDR. OF BUFFER AREA
19 0015   5F                CLRB
20 0016   F7 EF9E           STB  FILNUM     FILNUM:0
21 0019   86 0F             LDA  #$0F       A:MAP NO
22 001B 103F                SWI2            CALL "STOUT2" ROUTINE
23 001D      41             FCB  $41        MAP NO=1 ROUTINE NO=$39 
24 001E      39             FCB  $39
25 001F   20 E1             BRA LOOP
26                          END