Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #TouhouDanmakufu
- #Title[Stage 2 - Easy]
- #Text[Phantasmagoria of Temporal Loop]
- #Player[FREE]
- #ScriptVersion[2]
- script_stage_main{
- let floor = GetCurrentScriptDirectory ~ "\sprite\floor.png";
- let water1 = GetCurrentScriptDirectory ~ "\sprite\water.png";
- let green = GetCurrentScriptDirectory ~ "\sprite\green.png";
- let green2 = GetCurrentScriptDirectory ~ "\sprite\green2.png";
- let banner = GetCurrentScriptDirectory ~ "\sprite\banner.png";
- let Y = 0;
- let Y2 = -60;
- let X = 0;
- let X3 = 0;
- let Y3 = 0;
- let alphalevel = 255;
- @Initialize{
- LoadGraphic(banner); //banner
- LoadGraphic(floor); //ocean floor
- LoadGraphic(water1); //water
- LoadGraphic(green); //foliage 1
- LoadGraphic(green2);//foliage 2
- stage;
- }
- @BackGround{
- SetFog (90, 180, 0, 128, 0); //the numbers need tweaking
- alphalevel-=1;
- if(Y2>-45){
- Y2=-45;
- }
- Y+=0.5;
- X-=0.5;
- X3+=0.1;
- Y3-=0.1;
- Y2+=0.1;
- SetViewFrom(120, 90, -60);
- WriteZBuffer(true);
- UseZBuffer(true);
- SetTexture(floor);
- SetAlpha(156);
- SetGraphicRect(0,0,50*256,50*256);
- DrawGraphic3D(X,X,0);
- SetTexture(water1);
- SetAlpha(128);
- SetGraphicRect(0,0,50*256,50*256);
- DrawGraphic3D(Y,X,0);
- SetTexture(water1);
- SetAlpha(128);
- SetGraphicRect(0,0,50*256,50*256);
- DrawGraphic3D(Y,Y,0);
- SetTexture(green);
- SetAlpha(255);
- SetGraphicRect(0,0,25*256,25*256);
- SetGraphicScale(0.5,0.5);
- DrawGraphic3D(-Y3,X3,0);
- SetTexture(green2);
- SetAlpha(255);
- SetGraphicRect(0,0,25*256,25*256);
- SetGraphicScale(0.5,0.5);
- DrawGraphic3D(X3,-Y3,0);
- SetTexture(banner);
- SetGraphicScale(1,1);
- SetAlpha(alphalevel);
- SetGraphicRect(0,0,359,117);
- DrawGraphic(GetCenterX,GetCenterY-100);
- }
- task stage{
- Wait(255);
- DeleteGraphic(banner);
- Wait(120);
- CreateEnemyFromFile(GetCurrentScriptDirectory ~ "enemy\1.txt", GetClipMinX, 0, 0, 0, 0);
- WaitForZeroEnemy;
- CreateEnemyFromFile(GetCurrentScriptDirectory ~ "enemy\1.txt", GetClipMinX, 0, 0, 0, 0);
- WaitForZeroEnemy;
- CreateEnemyFromFile(GetCurrentScriptDirectory ~ "enemy\1.txt", GetClipMinX, 0, 0, 0, 0);
- WaitForZeroEnemy;
- CreateEnemyFromFile(GetCurrentScriptDirectory ~ "enemy\1.txt", GetClipMinX, 0, 0, 0, 0);
- WaitForZeroEnemy;
- CreateEnemyFromFile(GetCurrentScriptDirectory ~ "enemy\1.txt", GetClipMinX, 0, 0, 0, 0);
- WaitForZeroEnemy;
- CreateEnemyFromFile(GetCurrentScriptDirectory ~ "enemy\1.txt", GetClipMinX, 0, 0, 0, 0);
- WaitForZeroEnemy;
- WaitForZeroBullet;
- Wait(240);
- Clear;
- }
- @MainLoop{
- yield;
- }
- @Finalize{
- }
- function WaitForZeroEnemy{
- while(GetEnemyNum != 0){yield;}
- }
- function WaitForZeroBullet{
- while(GetEnemyShotCount != 0){yield;}
- }
- function Wait(let frames){
- loop(frames){yield;}
- }
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement