Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #TouhouDanmakufu[Single]
- #ScriptVersion[3]
- #Title["Test"]
- #Text["Just another improved 1"]
- let bossObj;
- let bossX = 0;
- let bossY = 0;
- let imgBoss = GetCurrentScriptDirectory ~ "Shikiekiki.png";
- #include "script/default_system/Default_ShotConst.txt"
- @Initialize {
- // define a boss in bossObj and register as
- bossObj = ObjEnemy_Create(OBJ_ENEMY_BOSS);
- ObjEnemy_Regist (bossObj);
- // texture the boss, set centre as true centre.
- ObjPrim_SetTexture(bossObj,imgBoss);
- ObjSprite2D_SetSourceRect(bossObj,0,0,70,100);
- ObjSprite2D_SetDestCenter(bossObj);
- // move boss to desired x y location at desired speed
- ObjMove_SetDestAtSpeed(bossObj,192,120,3);
- mainTask; //run mainTask
- }
- @Event {
- // setting the boss timer and life
- alternative(GetEventType())
- case(EV_REQUEST_LIFE) {
- SetScriptResult(2000);
- }
- case(EV_REQUEST_TIMER) {
- SetScriptResult(70);
- }
- }
- @MainLoop {
- bossX=ObjMove_GetX(bossObj);
- bossY=ObjMove_GetY(bossObj);
- yield;
- }
- @Finalize {
- }
- //your best friend, forever
- function wait(w) { loop(w) { yield; } }
- task mainTask {
- fire;
- }
- task fire {
- loop{
- CreateShotA1(bossX,bossY,9,90,14,0);
- wait(60);
- }
- }
Add Comment
Please, Sign In to add comment