poke haut glaube ich nicht so hin !

mach das am besten so :

Dim b1 as Byte at $60 OVERLAY
Dim b2 as Byte at $61 OVERLAY

b1=1
b2=2

lo und hi-byte dort reinpacken.