I'm new

Everything that doesn't really have to do with Hollywood

I'm new

Postby ArtBlink » Mon Nov 01, 2010 11:52 am

Hello,

I'm new french "programmer" of Hollywood

I've buy Hollywood 4.7 for PC and Amiga...

I programm some small code... I can post some of them.

So, I didn't know that it was a Hollywood forum, I hope to lend my support and vice versa

I'm french, so don't worry if i wrote some error ;)

Ok, To start i post this, 3Dcube:


BeginDoubleBuffer
OX=320
OY=200

Repeat

For c=0 To 6.26 Step 0.01
x=Cos(c)*100
Y=Sin(c)*100
X1=Cos(c-1.56)*100
Y1=Sin(c-1.56)*100
Line(OX+x,OY+Y,OX+X1,OY+Y1,#WHITE)
Line(OX-x,OY-Y,OX+X1,OY+Y1,#WHITE)
Line(OX-x,OY-Y,OX-X1,OY-Y1,#WHITE)
Line(OX+x,OY+Y,OX-X1,OY-Y1,#WHITE)

Line(OX+x+50,OY+Y+50,OX+X1+50,OY+Y1+50,#WHITE)
Line(OX-x+50,OY-Y+50,OX+X1+50,OY+Y1+50,#WHITE)
Line(OX-x+50,OY-Y+50,OX-X1+50,OY-Y1+50,#WHITE)
Line(OX+x+50,OY+Y+50,OX-X1+50,OY-Y1+50,#WHITE)

Line(OX+x,OY+Y,OX+X+50,OY+Y+50,#WHITE)
Line(OX-x,OY-Y,OX-x+50,OY-Y+50,#WHITE)
Line(OX+x1,OY+Y1,OX+X1+50,OY+Y1+50,#WHITE)
Line(OX-x1,OY-Y1,OX-x1+50,OY-Y1+50,#WHITE)

Flip
Cls
Next

Forever


Good fun ;)

Respect
ArtBlink
 
Posts: 426
Joined: Mon Nov 01, 2010 11:37 am
Location: Albert - France

Re: I'm new

Postby Tarzin » Thu Nov 11, 2010 8:16 pm

Thanks a lot Artblink.

Examples are always good to watch.
It can help and inspirate!
Power User! :-)
A500/1Mo + 2nd floppy drive
A600/2Mo chip+2Mo Fast/Rom3.1/CF+WB3.1 + Wifi
---
WinUAE 2.x / OS 3.9 BB2 / Amikit 1.x
Amikit "Official" French Translator
http://amifrance.hw.tc
User avatar
Tarzin
 
Posts: 67
Joined: Mon Feb 15, 2010 12:46 pm
Location: Coudekerque-Branche / FRANCE

Re: I'm new

Postby ArtBlink » Fri Nov 12, 2010 8:46 pm

I have other exemple...

I post them later ;-)

But i need help for version of old amiga beat em up qame, i can post answer in few time

Respect
ArtBlink
 
Posts: 426
Joined: Mon Nov 01, 2010 11:37 am
Location: Albert - France


Return to Off topic

Who is online

Users browsing this forum: No registered users and 1 guest

cron