사용자 정의 문자를 CLCD에 보내는 방법
명령어 : ESC ‘D’,캐릭터코드, 데이터…
해당 캐릭터 : chr(8)~chr(15)까지의 8개
매뉴얼 상엔 ESC ‘D’ 8byte 라고만 설명되어있다. 8~15라고 되어있는데, 5~12까지도 가능한 것 같다. 앞 뒤로는 중복되어 같은 캐릭터가 표시된다.
ESC’D’ 를 BASIC상에서 표현하는 법
Print Chr(27),”D”
ESC’D’,캐릭터코드,데이터(5*8) 표시법.
Print Chr(27),”D”,&H05,&b00001,&b00000,&b00000,&b00000,&b00000,&b00000,&b00000,&b00000
Const Device = CB280 Set Display 2,0,0,50 Cls Delay 15 Csroff '화살표 Print Chr(27),"D",&H08,&b00100,&b01110,&b11111,&b00100,&b00100,&b00100,&b00100,&b00100 '화살표 Print Chr(27),"D",&H09,&b00100,&b00100,&b00100,&b00100,&b00100,&b11111,&b01110,&b00100 '(C) Print Chr(27),"D",&H0a,&b01110,&b10001,&b10101,&b11001,&b11001,&b10101,&b10001,&b01110 '하트 Print Chr(27),"D",&H0b,&b00000,&b01010,&b11111,&b11111,&b11111,&b01110,&b00100,&b00000 '스페이드 Print Chr(27),"D",&H0c,&b00000,&b00100,&b01110,&b11111,&b11111,&b00100,&b01110,&b00000 '다이아 Print Chr(27),"D",&H0d,&b00000,&b00100,&b01110,&b11111,&b11111,&b01110,&b00100,&b00000 '클로버 Print Chr(27),"D",&H0e,&b00000,&b01110,&b10101,&b11111,&b10101,&b00100,&b01110,&b00000 '삼각형 Print Chr(27),"D",&H0f,&b00000,&b00000,&b00100,&b01110,&b11111,&b00000,&b00000,&b00000 Locate 00,02 Print " 8:",Chr(8)," 9:",Chr(9)," 10:",Chr(10)," 11:",Chr(11) Locate 00,03 Print "12:",Chr(12)," 13:",Chr(13)," 14:",Chr(14)," 15:",Chr(15)
왜 매뉴얼엔 이 설명도 없고, 이상하게 나와있어서 사람을 고생시키는지 모르겠다. ㅡ.-);
하긴, 직업으로 하는 거였으면 아주 뭐같은 상황이었겠지만, 취미로 할 땐 찾아내는 나름 즐거움일지도..