사용자 도구

사이트 도구

English

ct1820:sample_3_터치지점_표시:index

SAMPLE 3 터치지점표시

터치한 지점에 원을 표시하는 프로그램입니다.

 #include “CT18XX”
 Dim I As Integer
 Dim TX1 As Integer, TY1 As Integer
 Ct18contrast 150
 On Pad Gosub GETTOUCH
 Do
 Loop
 
GETTOUCH:
 TX1 = Sys(10)
 TY1 = Sys(11)
 Circlefill TX1,TY1,2
 CT18beep 20       '키터치음 발생
 Return 
ct1820/sample_3_터치지점_표시/index.txt · 마지막으로 수정됨: 2017/10/19 22:44 저자 Comfile Technology