diff options
Diffstat (limited to 'font_fade.bmx')
| -rw-r--r-- | font_fade.bmx | 18 |
1 files changed, 10 insertions, 8 deletions
diff --git a/font_fade.bmx b/font_fade.bmx index 62f5e82..0c9cd1b 100644 --- a/font_fade.bmx +++ b/font_fade.bmx @@ -3,12 +3,14 @@ ' ' $Id$ ' -Type FontFade +Import noddybox.bitmapfont + +Type TFontFade Field list:TList - Field font:BitmapFont + Field font:TBitmapFont - Function Create:FontFade(f:BitmapFont) - Local ff:FontFade=New FontFade + Function Create:TFontFade(f:TBitmapFont) + Local ff:TFontFade=New TFontFade ff.list=New TList ff.font=f @@ -16,7 +18,7 @@ Type FontFade Return ff End Function - Method Add(s:String, x:Float, y:Float, col:Int, a:Float, ai:Float, dx:Float, dy:Float) + Method Add(s:String, x:Float, y:Float, col:Int, a:Float=1.0, ai:Float=0.02, dx:Float=0.0, dy:Float=0.0) Local f:FontFadeEnt=New FontFadeEnt f.s=s @@ -34,7 +36,7 @@ Type FontFade list.AddLast(f) End Method - Method Centre(s:String, y:Float, col:Int, a:Float, ai:Float, dy:Float) + Method Centre(s:String, y:Float, col:Int, a:Float=1.0, ai:Float=0.02, dy:Float=0.0) Local f:FontFadeEnt=New FontFadeEnt f.s=s @@ -74,9 +76,9 @@ Type FontFade SetAlpha(f.a) If f.centre - font.CentreColoured(f.s,f.y,f.r,f.g,f.b) + font.Centre(f.s,f.y,f.r,f.g,f.b) Else - font.DrawColoured(f.s,f.x,f.y,f.r,f.g,f.b) + font.Draw(f.s,f.x,f.y,f.r,f.g,f.b) EndIf f.a:+f.ai |