diff options
Diffstat (limited to 'global.bmx')
-rw-r--r-- | global.bmx | 16 |
1 files changed, 16 insertions, 0 deletions
@@ -196,6 +196,7 @@ Type Scroller Global msg:String Global msgp:Int Global msgx:Int + Global txth:Int Function Init() Rem @@ -214,10 +215,25 @@ Type Scroller msgx=0 msgp=0 + + txth=GFX.font.MaxHeight() End Function Function Draw(y:Int) GFX.font.Draw(msg[..70],msgx,y) + + Rem + SetColor(0,0,0) + Local a:Double=1 + For Local f:Int=0 To 10 + SetAlpha(a) + a:-0.09 + DrawLine(f,y,f,y+txth) + DrawLine(799-f,y,799-f,y+txth) + Next + SetColor(255,255,255) + SetAlpha(1) + EndRem msgx:-2 If msgx<-GFX.font.TextWidth(msg[0..1]) |