0 Members and 2 Guests are viewing this topic.
{3,3,3,3,3,3→L1 ;Y-coordinatesAns→L2 ;X-coordinatesRepeat getKey=45For(A,1,6L2(A→XL1(A→YIf pxl-Test(Ans+1,XThen ;This checks left/right2randInt(0,1)-1→B ;B becomes 1 or -1If pxl-Test(Y,X+B-B→BIf not(pxl-Test(Y,X+BThenPxl-Off(Y,XX+B→L2(APxl-On(Y,AnsEndElseY+1→L1(APxl-Off(Y,XPxl-On(Ans,XEndEndEnd
ClrDraw ;Clears graph screen and sets text coordinates to zeroText(2,,"ax ;Displays text at Y=2, leave X unchangedText(-2,,"2 ;Draws the 2 as a superscript (though really, you could use 0 instead of -2 in this case)Text(+2,,"bx+c ;Draws the rest back down 2 pixels