Posts: 581
Threads: 107
Joined: Apr 2022
Reputation:
39
(11-14-2022, 08:47 AM)PhilOfPerth Wrote: Can someone please elaborate a bit on the m x,y (and its related +/- options) in the draw command? It doesn't get a mention (that I can find) in the Help file, and the Wiki one is pretty unclear. How is it fitted into a draw string, and does it need parentheses, or commas etc? 
Sample code if you want to play around:
Code: (Select All) screen _newimage(200, 200, 12)
xf = 150
yf = 150
do
x = int(rnd*200)
y = int(rnd*200)
draw "B M" + str$(x) + "," + str$(y)
draw "d15 r15 u15 l15 m " + str$(xf) + "," + str$(yf)
_display
_delay 1.25
loop
Posts: 398
Threads: 57
Joined: Apr 2022
Reputation:
15
Ok, one more shot at this
This seems to work
Screen 9
PSet (10, 10), 2
Draw "D50"
Draw "r100"
Draw "u50"
Draw "l100"
Draw "M25,50"
Draw "M" + "25,-10"
At least it doesn't error out
Posts: 581
Threads: 107
Joined: Apr 2022
Reputation:
39
(11-14-2022, 06:49 PM)CharlieJV Wrote: (11-14-2022, 08:47 AM)PhilOfPerth Wrote: Can someone please elaborate a bit on the m x,y (and its related +/- options) in the draw command? It doesn't get a mention (that I can find) in the Help file, and the Wiki one is pretty unclear. How is it fitted into a draw string, and does it need parentheses, or commas etc? 
Sample code if you want to play around:
Code: (Select All) screen _newimage(200, 200, 12)
xf = 150
yf = 150
do
x = int(rnd*200)
y = int(rnd*200)
draw "B M" + str$(x) + "," + str$(y)
draw "d15 r15 u15 l15 m " + str$(xf) + "," + str$(yf)
_display
_delay 1.25
loop
And now, for the giggles, try the same program with a little tweak so that the second M command is a relative coordinate instead of a fixed coordinate:
Code: (Select All) screen _newimage(200, 200, 12)
xf = 150
yf = 150
do
x = int(rnd*200)
y = int(rnd*200)
draw "B M" + str$(x) + "," + str$(y)
draw "d15 r15 u15 l15 m -" + str$(xf) + ",-" + str$(yf)
_display
_delay 1.25
loop
Posts: 702
Threads: 106
Joined: Apr 2022
Reputation:
26
Thanks Charlie and Dimster. It's much clearer now. Time to go play!
The question was related to a little exercise I'm doing at the moment, involving pi.
(no, Bplus, not that pie)!
Of all the places on Earth, and all the planets in the Universe, I'd rather live here (Perth, Western Australia.) 
Please visit my Website at: http://oldendayskids.blogspot.com/
Posts: 4,152
Threads: 190
Joined: Apr 2022
Reputation:
255
I hope it's apple! :-))
b = b + ...
Posts: 2,584
Threads: 263
Joined: Apr 2022
Reputation:
138
Does Apple Pi run on Windows?
Pete
Shoot first and shoot people who ask questions, later.
Posts: 702
Threads: 106
Joined: Apr 2022
Reputation:
26
(11-14-2022, 10:54 PM)Pete Wrote: Does Apple Pi run on Windows?
Pete Apple pi doesn't run! Lemonade runs!
Of all the places on Earth, and all the planets in the Universe, I'd rather live here (Perth, Western Australia.) 
Please visit my Website at: http://oldendayskids.blogspot.com/
Posts: 1,428
Threads: 58
Joined: Jul 2022
Reputation:
52
(11-14-2022, 08:16 PM)Dimster Wrote: :
Draw "M" + "25,-10"
At least it doesn't error out
The plus sign needs to be inside the quoted string like:
Code: (Select All) Draw "M+25,-10"
so the processor knows it's a relative draw. You wouldn't be able to change the plus to minus in that line of code of yours because it would give out a syntax error.
Posts: 2,584
Threads: 263
Joined: Apr 2022
Reputation:
138
(11-14-2022, 10:59 PM)PhilOfPerth Wrote: (11-14-2022, 10:54 PM)Pete Wrote: Does Apple Pi run on Windows?
Pete Apple pi doesn't run! Lemonade runs!
I tried putting Lemonade on my Windows, once, but my keyboard shorted out. I guess I made a pour choice.
Pete
Posts: 702
Threads: 106
Joined: Apr 2022
Reputation:
26
(11-14-2022, 11:08 PM)Pete Wrote: (11-14-2022, 10:59 PM)PhilOfPerth Wrote: (11-14-2022, 10:54 PM)Pete Wrote: Does Apple Pi run on Windows?
Pete Apple pi doesn't run! Lemonade runs!
I tried putting Lemonade on my Windows, once, but my keyboard shorted out. I guess I made a pour choice.
Pete Sounds like you'll need a new keyboard, if your liquid assets allow it!
Of all the places on Earth, and all the planets in the Universe, I'd rather live here (Perth, Western Australia.) 
Please visit my Website at: http://oldendayskids.blogspot.com/
|