====== GetPad( ) ====== ''variable = GetPad(length)'' | //variable// |Variable to store results | | //length// |Length of data to receive | Reads length bytes from the pad buffer allocated with Set Pad. Const Device = CB280 Dim X As Integer Dim Y As Integer Set Pad 0,4,20 'Mode 0, Packet size 4 bytes, Buffer 20 bytes On Pad GoSub ABC 'Define ABC as interrupt service routine Do 'Run forever Loop ABC: X = GetPad(2) 'First 2 bytes is the x coordinate Y = GetPad(2) 'Second 2 bytes is y coordinate Debug Dec X, Cr 'Print x coordinate Debug Dec Y, Cr 'Print y coordinate Return [[cubloc:index#system_library:|Go CUBLOC home]]