Mouse Help finding Absolute

[Smithdoor]

I found a basic program for using a mouse fromthe 1980's
I know works as used in the 1980's
The problem is on line 70 (70 CALL Absolute(100)) can not fine Absolute
Can any one help

Thank you
Dave

5 'Mouse poke
6 ft=1
10 POKE 100, 184: POKE 101, Ft: POKE 102, 0
20 POKE 103, 205: POKE 104, 51: POKE 105, 137
30 POKE 106, 30: POKE 107, 170: POKE 108, 10
40 POKE 109, 137: POKE 110, 14: POKE 111, 187
50 POKE 112, 11: POKE 113, 137: POKE 114, 22
60 POKE 115, 204: POKE 116, 12: POKE 117, 203
70 CALL Absolute(100)
80 B = PEEK(&HAAA)
90 H = (PEEK(&HBBB) + PEEK(&HBBC) * 256)
100 V = (PEEK(&HCCC) + PEEK(&HCCD) * 256)
130 cls
150 PEN ON
160 FOR I = 1 TO 500
170 X = PEN(0): X1 = PEN(1)
171 X2 = PEN(2): X3 = PEN(3)
172 X4 = PEN(4): X5 = PEN(5)
173 X6 = PEN(6)
180 if x>0 then print "000":end
181 if x1>0 then print "111":end
182 if x2>0 then print "222":end
183 if x3>0 then print "333":end
184 if x4>0 then print "444":end
185 if x5>0 then print "555":end
186 if x6>0 then print "666":end
190 NEXT

[Marc 'BlackJack' Rintsch]

Even if there would be an Absolute function, which seems unnecessary here, have a look at the PC-BASIC documentation of the CALL function. It's not implemented. It most likely will be ever, because that would mean emulating a PC on the processor level.

[Smithdoor]

Thank you
Dave

I trying who use a mouse to use in pc basic