стой, стой
Ща, я совсем забыл про твою тему. Сейчас..
Type Ololo
Field r:Byte Ptr
Method update()
'тут всякие вычисления, от них зависит
' result будет ложным или правдивым
Self.r[0] = Rand(0,1)
End Method
Function CreateOlolo:Ololo(result:Byte Ptr)
Local o:Ololo = New Ololo
o.r = result
Return o
End Function
End Type
Local blablabla:Byte
Local o:ololo = Ololo.CreateOlolo(Varptr blablabla)
While True
Print blablabla
o.update()
Delay(1000)
Wend
твои объекты Ololo запоминают указатель на внешнюю переменную, и могут делать с ней чо угодно