SAMPLE 8: Input 포트 입력상태확인

본 프로그램은 입력포트의 상태를 화면상에 표시해주는 프로그램입니다.

#include "CT18XX"
Style 0,0,0
Locate 1,1
Print "Input Status"
Style 0,0,1
Locate 3,3
Print " 0 1 2 3 4 5"
Locate 3,6
Print " 8 9 10 11 12 13 14 15"
Locate 3,9
Print "16 17 18 19 20 21 22 23"
Style 0,0,0
Do
Locate 2,4
Print hex3 In(0),hex3 In(1),hex3 In(2),hex3 In(3),hex3 In(4),hex3 In(5)
Locate 2,7
Print hex3 In(8),hex3 In(9),hex3 In(10),hex3 In(11)
Print hex3 In(12),hex3 In(13),hex3 In(14),hex3 In(15)
Locate 2,10
Print hex3 In(16),hex3 In(17),hex3 In(18),hex3 In(19)
Print hex3 In(20),hex3 In(21),hex3 In(22),hex3 In(23)
Wait 500
Loop