1 X =  INT ( RND (1) * 280)
 2 Y =  INT ( RND (1) * 192)
 3  HGR2 
 4  HCOLOR= 3
 5  HPLOT X,Y
 10 PG =  PEEK (230)
 20 VT =  INT (Y / 8)
 30 Y8 = Y - VT * 8
 40 YH =  INT (VT / 2)
 50 Y2 = VT - YH * 2
 60 Y3 =  INT (YH / 4)
 70 Y4 = YH - Y3 * 4
 80 HT =  INT (X / 7)
 90 X7 = X - HT * 7
 100 A = Y3 * 0040 + HT
 110 A = Y2 * 0128 + A
 120 A = Y4 * 0256 + A
 130 A = PG * 0256 + A
 140 A = Y8 * 1024 + A
 150  PRINT X;",";Y, PEEK (A)
 160  PRINT "POKE ";A;",",2 ^ X7
 170  TEXT