KSYCRST
最終更新：ID:4mHyealEgA 2017年02月08日(水) 17:25:43履歴
| メモリ空間 | 1 |
|---|---|
| ルーチン番号 | 4 |
機能 
カーソルの表示状態を設定します。
解説
画面に表示するカーソルの大きさ、およびブリンク表示の状態を設定します。
入力情報
- AccA:
- (D7〜D4):カーソルの表示、または消去 0,2,4,6
- (D3〜D0)スタート・ラスタ・アドレス$0〜$F
| D7 | D6 | D5 | D4 | D3 | D2 | D1 | D0 |
|---|---|---|---|---|---|---|---|
| 0:カーソル表示 2:カーソル消去 4:カーソル表示 6:カーソル表示 | スタート・ラスタ・アドレス $0〜$Fで指定し、カーソルの大きさを下図のように設定します。 | ||||||
- スタート・ラスタ・アドレス
0■■■■■■■■ 1■■■■■■■■ 2■■■■■■■■ :■■■■■■■■ :■■■■■■■■ :■■■■■■■■ :■■■■■■■■ F■■■■■■■■注)スタート・ラスタ・アドレスを$Eに設定すると、漢字DISK BASICの通常カーソルと同じものになります。
下2本だけのカーソルは表示できません。
サンプルプログラム
内容
カーソルの大きさを、スタート・ラスタ・アドレス2として表示します。
0 0000 ORG $0000 1 C000 KSYCRST EQU * --SAMPLE OF "KSYCRST" ROUTINE-- 2 0000 20 02 BRA EXEC 3 0002 04 BLINK FCB $04 BLINK FLAG 4 0003 02 STEN FCB $02 START/LAST ADDR. OF CURSOR 5 0004 4F EXEC CLRA 6 0005 A6 8CFA LDA BLINK,PCR A(d7-d4):0:CURSOR ON 7 * 2:CURSOR OFF 8 * 4:CURSOR ON 9 * 6:CURSOR ON 10 0008 49 ROLA 11 0009 49 ROLA 12 000A 49 ROLA 13 000B 49 ROLA 14 000C AA 8CF4 ORA STEN,PCR A(d3-d0):START/END ADDR. OF CURS 15 000F 103F SWI2 CALL "KSYCRST" ROUTINE 16 0011 41 FCB $41 MAP NO=1 ROUTINE NO=4 17 0012 04 FCB $04 18 0013 39 RTS 19 END
コメントをかく