UnderwareDESIGN

PlayBASIC => Resources => Source Codes => Topic started by: kevin on August 11, 2004, 02:23:16 PM

Title: Alpha Shapes
Post by: kevin on August 11, 2004, 02:23:16 PM
This picture shows that shapes now support draw modes also.  While alpha will always be a slow process when drawing directly to video memory, the speed of Filled shapes has doubled.  

Anyway here's the code for this simple effect


[pbcode]
   CreateConvexShape 1,100,5
   CreateConvexShape 2,80,5
   MergeShape 2,1

Do
 Cls 255

 InkMode 1
 BoxC 100,100,200,200,1,$ff00ff

 InkMode 32+1   
 DrawShape 1,MouseX(),MouseY(),2

 RotateShape 1,angle#,1
 angle#=WrapAngle(angle#,1)
 
 Sync  
Loop

[/pbcode]

 Written in PlayBASiC (BETA) 220 (Prior the original release)