Advertisement
Guest User

Untitled

a guest
Sep 30th, 2016
284
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. Class Bullet
  2.     Field image:Image
  3.     Field x:Float
  4.     Field y:Float
  5.     Field vx:Float
  6.     Field vy:Float
  7.     Field angle:Float
  8.    
  9.     Method New(x:Float,y:Float,image:Image)
  10.         this.image = image
  11.     End
  12.    
  13.     Method CalculateVector:Void(angle:Float, speed:float)
  14.         self.angle = angle
  15.         vx = Cos(angle) * speed
  16.         vy = Sin(angle) * speed
  17.     End
  18.    
  19.     Method Update:Void(delta:Float)
  20.         x += (vx * delta)
  21.         y += (vy * delta)
  22.     End
  23.    
  24.     Method Render:Void()
  25.         PushMatrix()
  26.         Rotate(angle)
  27.         DrawImage(image,x,y)
  28.         PopMatrix()
  29.     End
  30. End
  31.  
  32. Class Player
  33.     Field bullets:= New List<Bellet>
  34.     Field x:float
  35.     Field y:float
  36.     Field bulletImage:Image
  37.  
  38.     Method FireInDirection:Void(angle:Float)
  39.         Local bullet := new Bullet(x,y,bulletImage)
  40.        
  41.         bullets.AddLast(bullet)
  42.     End
  43.    
  44.     Method Update:Void(delta:Float)
  45.         For Local bullet := eachin bullets
  46.             bullet.Update(delta)
  47.         Next
  48.     End
  49.    
  50.     Method Render:void()
  51.         For Local bullet := eachin bullets
  52.             bullet.Render()
  53.         Next   
  54.     End
  55. End
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement