diff options
Diffstat (limited to 'types.bmx')
| -rw-r--r-- | types.bmx | 21 |
1 files changed, 14 insertions, 7 deletions
@@ -67,9 +67,12 @@ Type TMass EndIf End Method - Method MoveAndDraw() + Method Move() x:+v.x y:+v.y + End Method + + Method Draw() SetColor(255,255,255) DrawImage(img,x,y,swallow) swallow=0 @@ -131,30 +134,34 @@ Type TPoint v.Add(d) - If d.Length()>MASSSIZE - d.SetLength(MASSSIZE) + If d.Length()>MASSRAD + d.SetLength(MASSRAD) EndIf EndIf Return dead End Method - Method MoveAndDraw() + Method Move() If (Not dead) And (Not lost) lx=x ly=y x:+v.x y:+v.y - SetColor(r,g,b) - DrawImage(img,x,y,0) - If x<0 Or y<0 Or x>GraphicsWidth() Or y>GraphicsHeight() lost=True TParticleMachine.AddLost(Self) EndIf EndIf End Method + + Method Draw() + If (Not dead) And (Not lost) + SetColor(r,g,b) + DrawImage(img,x,y,0) + EndIf + End Method End Type |