I was making a program so I can draw on the screen, and it saves the points to a list so I can plot it in a program. Unfortunately, I can 't get it to work. The cursor doesn't move around, and it won't store the variables. Anyone have an idea on what I'm doing wrong? :S
Here's my code:
:ZStandard:ZInteger :AxesOff :0→K :500→dim(∟PTDX) :500→dim(∟PTDY) :1→dim(∟PTCX) :1→dim(∟PTCY) :0→∟PTCX(1) :0→∟PTCY(1) :Plot1Scatter ,∟PTCX,∟PTCY,┼ :Plot2Scatter ,∟PTDX,∟PTDY,∙ :1→Q :While 1 :0→K :getKey→K :If K=24 :∟PTCX-1→∟PTCX :Pt-Change(48,48 :End : :If K=26 :∟PTCX+1→∟PTCX :Pt-Change(48,48 : :End : :If K=25 :∟PTCY+1→∟PTCY :Pt-Change(48,48 :End : :If K=34 :∟PTCY-1→∟PTCY :Pt-Change(48,48 :End : :If K=105 :∟PTCX(1)→∟PTDX(Q) :∟PTCY(1)→∟PTDY(Q) :Pt-Change(48,48 :End :0→K : : :End
Edit: I just figured out why it wasn't going, I forgot the :Then.
But, it's REALLY slow. Is there a way to speed it up?