AmigaBasic to BlitzMax

BlitzMax Forums/BlitzMax Beginners Area/AmigaBasic to BlitzMax

Fernecho

(Posted 2014) [#1]

Hi all,
I am new to BlitzMax

I'm trying to convert a Amigabasic program to BlitzMax, and not get it to work, the code is as follows.

Graphics 640,400

Cls

dr=3.14/180

For r=30 To 330 Step 7
For t=0 To 355 Step 5

x=r*Cos(t*dr)*.5
y=r*Sin(r*dr)*.3
z=r*Sin(t*dr)*.5

xp=x+(Cos(15*dr)*z)
yp=y+(Sin(15*dr)*z)

xp=xp+320
yp=50-yp

Plot xp,yp

Next
Next

flip


WaitKey

This is the result on an Amiga Computer : www.youtube.com/watch?v=DVDbH-M6IA0

tonyg

(Posted 2014) [#2]

I can't see you youtube video but you need a 'flip' in there to see anything

Fernecho

(Posted 2014) [#3]

I have included flip and still not working

how do I put a link youtube?

The link to see the code in action on an Amiga computer

www.youtube.com/watch?v=DVDbH-M6IA0

Fernecho

(Posted 2014) [#4]

Ok now the link works

Brucey

(Posted 2014) [#5]

AmigaBasic worked in Radians, BlitzMax works in Degrees. If you set dr = 1, then you will see the plot.

Fernecho

(Posted 2014) [#6]

Thanks for your answer, I can now see the result.