0 Members and 2 Guests are viewing this topic.
.A00->A->K->P->{pointer}^^rFill(pointer,max amount of characters+1)DeltaList(47,39,31,46,38,30,22,14,45,37,29,21,13,44,36,28,20,12,43,35,27,19,11,42,34,26,18,0)->GDB0AGDB0A->G64->LDeltaList(33,34,26,18,35,27,19,36,28,20,0)->GDB0N[]->Str00"ABC"[00]"abc"[00]"123"[00]While K-9getKey->K!If -48A+1->A!If -3->AEnd!If AGDB0A->G64->LEnd!If -1GDB0A->G96->LEnd!If -1GDB0N->G47->LEndEndText(0,58,A*4+Str00If KIf inString(,G)+L->{P+pointer}If P-(max amount of characters-1)P+1->P0->{P+pointer+1}EndEndEndText(x position,y position,pointerEnd
Asm(DB0665)^256->theta //run this line at the beginning of the program and make sure that you don't touch theta ever)...stuffGetCalc("prgmBLA",Y1){degreeY1+2}Asm(7DD306).Now whenever you want to reference Y1...Pt-On(X,Y,{degreeY1}r.If you have more than one file object make sure that the last 7DD306 matches the one you are using....at the end of the programthetaAsm(7DD306)