Class routine

Blitz3D Forums/Blitz3D Programming/Class routine

Oh, you need my poke/peek string lib:

Global svar.s

ProcedureDLL PokeString(*bank,offset,value.s)
PokeS(*bank+offset,value)
EndProcedure

ProcedureDLL.l PeekString(*bank,offset)
svar=PeekS(*bank+offset)
ProcedureReturn @svar
EndProcedure