0 Members and 4 Guests are viewing this topic.
I did not know that yet.PRGM after Error.Thanks. SmileyIt's the Pt-ON( command.Now, it says MISSING END( after the Pause 5000 )What should that be?
JosJuice is right: every If needs an EndJosjuice is wrong: we can do Else
:.FORCEATT:ClrDraw:Circle(15,15,10:Circle(80,15,10:Text(57,10,(„DEF“):Text(57,75,(“OFF”):Line(25,15,30,10:Line(70,15,65,10:Line(30,10,45,10:Line(65,10,50,10:Line(45,10,47,8:Line(50,10,48,8:Line(30,7,65,7:Line(30,7,28,0:Line(65,7,67,0:Line(5,15,0,10:Line(90,15,95,10:rand^1+101→F:For(U,1,F:If U≥0 and (U≤9):-3→Q:End:If U>99:3→Q:End:If U≥10 and (U≤99):0→Q:End:Text(-1,44,10-Q,U:End:rand^1+101→N:For(U,1,N:If U≥0 and (U≤9):-3→Q:End:If U>99:3→Q:End:If U≥10 and (U≤99):0→Q:End:Text(-1,44,75-Q,U:End:Line(36,60,58,60:Pt-On(35,62:Pt-On(35,61:Pt-On(59,62:Pt-On(59,61:Line(89,29,89,61:Line(89,29,93,29:Line(94,29,94,61:Line(89,61,4,61:Line(91,U,92,U:Pause 5000
Text(57,10,("DEF")Must be Text(10,57,"DEF")Text(-1,X,YMust beFix 1Text(X,YFix 0If you want to display the value of U, use Text(X,Y,U>dec (Found via math-2)
:.FORCEATT:ClrDraw:Circle(15,15,10:Circle(80,15,10:Text(57,10,(„DEF“):Text(57,75,(“OFF”):Line(25,15,30,10:Line(70,15,65,10:Line(30,10,45,10:Line(65,10,50,10:Line(45,10,47,8:Line(50,10,48,8:Line(30,7,65,7:Line(30,7,28,0:Line(65,7,67,0:Line(5,15,0,10:Line(90,15,95,10:rand^1+101→F:For(U,1,F:If U≥0 and (U≤9):-3→Q:End:If U>99:3→Q:End:If U≥10 and (U≤99):0→Q:End:Fix 1:Text(44,10-Q,U▶Dec:Fix 0:End:rand^1+101→N:For(U,1,N:If U≥0 and (U≤9):-3→Q:End:If U>99:3→Q:End:If U≥10 and (U≤99):0→Q:End:Fix 1:Text(44,75-Q,U▶Dec:Fix 0:End:Line(36,60,58,60:Pt-On(35,62:Pt-On(35,61:Pt-On(59,62:Pt-On(59,61:Line(89,29,89,61:Line(89,29,93,29:Line(94,29,94,61:Line(89,61,4,61:Line(91,U,92,U:Pause 5000
And also, you'll want a DispGraph at the end to display the buffer on the LCD.
Fix 5
Fix 4