Advertisement
Guest User

healthcircle2

a guest
May 29th, 2013
86
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
C++ 1.12 KB | None | 0 0
  1.     task Circlehealth(Maxhealth,Vertexes){
  2.     let circlehp = Obj_Create(OBJ_EFFECT);
  3.    
  4.     let healthbarpic = GetCurrentScriptDirectory~"lifebar.png";
  5.     LoadGraphic(healthbarpic);
  6.  
  7.     ObjEffect_SetRenderState(circlehp,ALPHA);
  8.     ObjEffect_SetTexture(circlehp,healthbarpic);
  9.     ObjEffect_SetLayer(circlehp,2);
  10.     ObjEffect_SetScale(circlehp,1,1);
  11.  
  12.     ObjEffect_SetPrimitiveType(circlehp,PRIMITIVE_TRIANGLESTRIP);
  13.     ObjEffect_CreateVertex( circlehp,(Vertexes-1)*2+2 );
  14.    
  15.     ascent(r in 0..Vertexes){
  16.  
  17.     ObjEffect_SetVertexXY(circlehp,r*2,50*cos(r*360/(Vertexes-1) ),50*sin(r*360/(Vertexes-1) ) );
  18.     ObjEffect_SetVertexXY(circlehp,r*2+1,57*cos(r*360/(Vertexes-1) ),57*sin(r*360/(Vertexes-1) ) );
  19.  
  20.     }
  21.  
  22.     while(!Obj_BeDeleted(circlehp)){
  23.    
  24.     Obj_SetPosition(circlehp,GetX,GetY);
  25.    
  26.     ascent(c in 0..Vertexes){
  27.    
  28.     if(GetLife>=( c*(Maxhealth/(Vertexes-1)) )){
  29.     ObjEffect_SetVertexUV(circlehp,c*2,1,1);
  30.     ObjEffect_SetVertexUV(circlehp,c*2+1,6,1);
  31.     }
  32.    
  33.     if(GetLife<( c*(Maxhealth/(Vertexes-1)) )){
  34.     ObjEffect_SetVertexUV(circlehp,c*2,7,1);
  35.     ObjEffect_SetVertexUV(circlehp,c*2+1,12,1);
  36.     }
  37.  
  38.    
  39.     }
  40.  
  41.     yield;
  42.     }
  43.     }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement