0 Members and 5 Guests are viewing this topic.
!If GetCalc("Str1",SIZE)→A.ERROREnd.A holds pointer to a new string that is SIZE bytes large
:.A:Data(40,44)→Pic1:[00003A00000001E1900000079764000000719A00:[002DFEB500002E688980002207B2800069DE6D80:[00A803C2C00097DC9C40066233F7E006DF07F960:[0F661C96A00D99E32D501E271CDEA02963F36760:[34260C9D503B45F36AA03CB70C95602969FB6D60:[46A90D2A502AD5F2EA40151776AAE014AAD52A40:[0AA12B6BC0A955EAB90084543545405457CF5140:[122852AB00255DB54E000AAE856D00154A440800:[AAB1EBB500152CAA9800202612B600149A4DF000:[0812B540000865382000082A0A80000212A80000:[02A4040000010850000000128000000000000000:Tangent(10,20,Pic1:Repeat getKey:End
Reverse the order of the height and width bytes.
While getKey(0)Pause 5End
Haleyia, I had the same problem, so I added a pause :Code: [Select]While getKey(0)Pause 5End
It's pretty hard not to fail when spelling your name
"test"[00]→Str1Text(0,0,Str1)
Text(0,0,"test")
Text(x,y,"string")
Text(Y*256+X):Text "String"
In term of space in the compiled code. Are those methods the same ?Code: [Select]"test"[00]→Str1Text(0,0,Str1) Code: [Select]Text(0,0,"test")
"test"→Str1Text(0,0,Str1)
Tip:Instead of Code: [Select]Text(x,y,"string") you can use Code: [Select]Text(Y*256+X):Text "String" to save space (could be outdated, and maybe you have to invert x and y in Y*256+X)