Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- task Shape(x,y,n,r,s){
- let rad = r;
- let id;
- let len = 2*rad*sin(180/n);
- let angle = ang;
- let spin = s;
- ascent (i in 0..n){
- arr = arr ~ [CreateStraightLaserA1(x+rad*cos(angle+i*360/n),y+rad*sin(angle+i*360/n),angle+i*360/n+90+180/n,len,10,120,DS_BEAM_BLUE,0)];}
- loop
- {
- ascent(i in 0..length(arr))
- {
- ObjMove_SetPosition(arr[i],ObjMove_GetX(arr[i])+rad*cos(angle+i*360/n),ObjMove_GetY(arr[i])+rad*sin(angle+i*360/n));
- ObjStLaser_SetAngle(arr[i],angle+i*360/n
- }
- angle += spin;
- yield;
- }
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement