class My_window_scene #Scene Class
def update #Update sprites in scene
pbUpdateSpriteHash [MENTION=24071]Sprite[/MENTION]s)
end
def pbstartscene(maintext,imgpath)
[MENTION=24071]Sprite[/MENTION]s={}
@viewport=Viewport.new(0,0,Graphics.width,Graphics.height)
@viewport.z=99999
[MENTION=24071]Sprite[/MENTION]s["background"]=IconSprite.new(0,0,@viewport)
[MENTION=24071]Sprite[/MENTION]s["background"].setBitmap(imgpath)
[MENTION=24071]Sprite[/MENTION]s["background"].x=(Graphics.width [MENTION=24071]Sprite[/MENTION]s["background"].bitmap.width)/2
[MENTION=24071]Sprite[/MENTION]s["background"].y=(Graphics.height [MENTION=24071]Sprite[/MENTION]s["background"].bitmap.height)/2
[MENTION=24071]Sprite[/MENTION]s["overlay"]=BitmapSprite.new(Graphics.width,Graphics.height,@viewport)
pbSetSystemFont [MENTION=24071]Sprite[/MENTION]s["overlay"].bitmap)
pbDrawText(maintext)
end
def pbDrawText(maintext)
overlay [MENTION=24071]Sprite[/MENTION]s["overlay"].bitmap
overlay.clear
marginLeft=112
marginRight=96
baseColor=Color.new(72,72,72)
shadowColor=Color.new(160,160,160)
drawTextEx(overlay,marginLeft,96,Graphics.width-marginLeft-marginRight,8,maintext,baseColor,shadowColor)
end
def pbMain
loop do
Graphics.update
Input.update
self.update
if Input.trigger?(Input::B)
break
end
end
end
def pbEndScene
pbFadeOutAndHide [MENTION=24071]Sprite[/MENTION]s) {update}
pbDisposeSpriteHash [MENTION=24071]Sprite[/MENTION]s)
@viewport.dispose
end
end
class My_window
def initialize(scene)
@scene=scene
end
def pbStartScreen(maintext,imgpath)
@scene.pbStartScene(maintext,imgpath)
@scene.pbMain
@scene.pbEndScene
end
end
def pbmy_window (maintext,imgpath="")
imgpath= "Graphics/Pictures/mailAIRMAIL" if imgpath==""
scene=my_window_scene.new
screen=my_window.new(scene)
screen.pbStartScreen(maintext,imgpath)
end