Author Topic: Lame problem with simple loop  (Read 2534 times)

0 Members and 1 Guest are viewing this topic.

Offline theron

  • ZX 81
  • *
  • Posts: 5
  • Karma: 0
    • View Profile
Lame problem with simple loop
« on: November 27, 2011 »
Why loop in line 26 does not work, and the program did not draw another flower?
Code: [Select]
screenres 320,240
draw "bm 160,120"
draw "c50"
draw "U50,R10,D50,L10"
draw "TA45"
draw "U50,R10,D50,L10"
draw "TA90"
draw "U50,R10,D50,L10"
draw "TA135"
draw "U50,R10,D50,L10"
draw "TA180"
draw "U50,R10,D50,L10"
draw "ta225"
draw "U50,R10,D50,L10"
draw "ta270"
draw "U50,R10,D50,L10"
draw "ta315"
draw "U50,R10,D50,L10"
sleep 500
cls
draw "bm 160,120"
draw "ta0"
draw "c100"
draw "U50,R10,D50,L10"
dim x as integer
for x=0 to 315 step 45
draw"TA x"
draw "U50,R10,D50,L10"
next x
sleep

Offline Rbz

  • Founder Member
  • DBF Aficionado
  • ********
  • Posts: 2750
  • Karma: 493
    • View Profile
    • http://www.rbraz.com/
Re: Lame problem with simple loop
« Reply #1 on: November 27, 2011 »
To work with draw command, you need to convert "x" variable into string.
Quote
TAn  =  Rotate n degrees (n ranges 0-359)

So change this line:
Code: [Select]
draw"TA x"to
Code: [Select]
draw"TA"+str(x)
Challenge Trophies Won:

Offline theron

  • ZX 81
  • *
  • Posts: 5
  • Karma: 0
    • View Profile
Re: Lame problem with simple loop
« Reply #2 on: November 27, 2011 »
Thanks for your help. I'll try your advice.

Offline theron

  • ZX 81
  • *
  • Posts: 5
  • Karma: 0
    • View Profile
Re: Lame problem with simple loop
« Reply #3 on: November 27, 2011 »
It works! Cool man!