Thank you program for Steve

[SMcNeill]

Code: (Select All)

flamehw = _LoadImage("fire.png", 33)
f = _LoadFont("OLDENGL.TTF", 180)

Screen _NewImage(1024, 720, 32)
_Font f
_DisplayOrder _Hardware , _Software
Color 0
_DontBlend
Cls
Do
    x = Rnd * 100: y = Rnd * 100 + 175
    _PutImage (x - 50, y - 50), flamehw
    _PrintString (512 - _PrintWidth("My") / 2, 150), "My"
    _PrintString (512 - _PrintWidth("Pleasure!") / 2, 350), "Pleasure!"
    _Display
    _Limit 15
Loop Until _KeyHit
Sleep
System