1:Is a T200 LCD pixel ON or OFF?]:POINT.200 subrout - RHPigford 6/8/03:(27)"V": (0,0)(119,7),1,BF: (125,0)(239,0),1­"What x value (0-239)";X:@68,"X = "X"What y value (0-127)";Y:@108,"Y = "Y 100'@120,"P = "P;:P1ͣ" TRUE" : " FALSE"-Ud:POINT.200 to test pixels on/offzn:Uses cursor flash (on-off) tox:load himem w/ 8 bytes duplicate of̮:the LCD bytes (only 6 bits tall):Input = x (0-239) and y (0-127):of LCD pixel to be tested for onE:Output P = True (-1) = it's ON or e:P = False (0) = it'a OFFrE$(27):pick which of the 8 HIMEM flashed:bytes to use: BY= 0 to 7կR(Y8):BY%(YR8)":pick which bit in that byte (0-5),C(X6):BT%((XC6))@6:flash the cursor at the targetZ@ E$"P"; :cursor on~J:flash at row and col numbersT@(40RC),""; :curs locnð^:get the right byte from himemڰhB%((64864BY%))r:disable cursor flash|36768!:curs on, re-enable flash,E$"Q"G:test the target bit_T%2BT%:D%B% T%|D%0 P1::: P0: