www.pudn.com > Jaina.rar > Script.lua
function Load() end; GlobalFlag = 0 LastTime = 0 function Update() if GetTime()-LastTime >= 5000 then LastTime = GetTime() GlobalFlag = GlobalFlag+1 end if GlobalFlag == 0 then DrawSingleLine(400, 220, 0xFFFFFFFF, 1, "Jaina's Crusade") DrawSingleLine(400, 250, 0xFFFFFFFF, 1, "Game Design") DrawSingleLine(400, 310, 0xFFFFFFFF, 1, "ASE Entertainment Studio") end if GlobalFlag == 1 then Render(2001, 50, 0, 423, 600, 0, 0, 422, 678) DrawSingleLine(580, 250, 0xFFFFFFFF, 1, "Producer") DrawSingleLine(580, 310, 0xFFFFFFFF, 1, "Liyuanxi") end if GlobalFlag == 2 then Render(2003, 300, 0) DrawSingleLine(160, 250, 0xFFFFFFFF, 1, "Programming") DrawSingleLine(160, 310, 0xFFFFFFFF, 1, "Liyuanxi") end if GlobalFlag == 3 then Render(2002, 50, 50) DrawSingleLine(640, 370, 0xFFFFFFFF, 0, "Contact") DrawSingleLine(570, 430, 0xFFFFFFFF, 0, "QQ: 32203256") DrawSingleLine(490, 460, 0xFFFFFFFF, 0, "QQ Group: 31820530") DrawSingleLine(405, 490, 0xFFFFFFFF, 0, "E-mail: leayonce@163.com") end if GlobalFlag == 4 then Render(2005, 360, 0) DrawSingleLine(200, 250, 0xFFFFFFFF, 1, "Testing") DrawSingleLine(200, 310, 0xFFFFFFFF, 1, "DongZheng") end if GlobalFlag == 5 then Render(2004, 150, 380) DrawSingleLine(400, 30, 0xFFFFFFFF, 1, "ASEngine") DrawSingleLine(500, 350, 0xFFFFFFFF, 0, "Key features") DrawSingleLine(500, 410, 0xFFFFFFFF, 0, "1, Simple") DrawSingleLine(500, 440, 0xFFFFFFFF, 0, "2, Flexible") DrawSingleLine(500, 470, 0xFFFFFFFF, 0, "3, Powerful") DrawText(80, 80, 0xFFFFFFFF, "ASEngine is an easy to use, flexible to expandand powerful 2D game engine. It is a low-levelgame engine for all who want to develop high quality 2D games rapidly and easily.") DrawSingleLine(80, 230, 0xFFFFFFFF, 0, "ASEngine runs on Microsoft Windows 2000, NT,") DrawSingleLine(80, 260, 0xFFFFFFFF, 0, "ME, XP. and requires DirectX 9.0. It can be") DrawSingleLine(80, 290, 0xFFFFFFFF, 0, "used with Visual C++.") end if GlobalFlag == 6 then Render(2006, 400, 30) DrawSingleLine(200, 100, 0xFFFFFFFF, 1, "AS3D") DrawSingleLine(30, 160, 0xFFFFFFFF, 0, "Base on ASEngine, a 3D") DrawSingleLine(30, 190, 0xFFFFFFFF, 0, "game engine which is") DrawSingleLine(30, 220, 0xFFFFFFFF, 0, "in process.") end if GlobalFlag == 7 then Render(2000, 0, 0, 800, 600, 0, 0, 512, 512) DrawSingleLine(30, 10, 0xFF000000, 0, "Models & Textures") DrawSingleLine(30, 70, 0xFF000000, 0, "From:") DrawSingleLine(30, 100, 0xFF000000, 0, "World of Warcraft") DrawSingleLine(30, 130, 0xFF000000, 0, "Internet") DrawSingleLine(400, 500, 0xFFFFFFFF, 1, "World of Warcraft is a Registered trademark of") DrawSingleLine(400, 530, 0xFFFFFFFF, 1, "Blizzard Entertainment, Models and textures ") DrawSingleLine(400, 560, 0xFFFFFFFF, 1, "copyright is Blizzard, All rights reserved") end if GlobalFlag == 8 then Render(2007, 353, 50) DrawSingleLine(400, 300, 0xFFFFFFFF, 1, "Special Thanks To") DrawSingleLine(400, 360, 0xFFFFFFFF, 1, "UfoZ & Darjk(World of Warcraft Model Viewer)") DrawSingleLine(400, 390, 0xFFFFFFFF, 1, "Linghuye(MyWarCraftStudio)") end if GlobalFlag == 9 then DrawSingleLine(400, 220, 0xFFFFFFFF, 1, "The End") DrawSingleLine(400, 280, 0xFFFFFFFF, 1, "Thank you for reading this credits!") end end function Destroy() end