Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #TouhouDanmakufu[Stage]
- #ScriptVersion[3]
- #Title["How do I danmakufu?"]
- #Text["No clue."]
- function wait(w) { loop(w) { yield; } }
- let place = GetCurrentScriptDirectory ~ "/img/Placeholder.png";
- @Initialize {
- LoadTexture(place);
- StageStart;
- }
- @MainLoop {
- yield;
- }
- @Finalize {
- }
- task StageStart {
- let dir = GetCurrentScriptDirectory();
- let Script = dir ~ "Stage 1 Boss.txt";
- loop(60) {yield;} //something about one second to compile?
- Enemy01;
- StartScript(Script);
- while(!IsCloseScript(Script) && GetPlayerState() != STATE_END)
- {
- yield;
- }
- wait(240);
- CloseStgScene();
- }
- task Enemy01 {
- let Enm1 = ObjEnemy_Create(OBJ_ENEMY);
- ObjEnemy_Regist(Enm1);
- ObjEnemy_SetLife(Enm1,10);
- ObjPrim_SetTexture(Enm1, place); //This is a picture of a poorly drawn potato (Placeholder)
- ObjRender_SetScaleXYZ(Enm1, 0.5, 0.5, 1);
- ObjSprite2D_SetSourceRect(Enm1, 0, 0, 63, 116);
- ObjSprite2D_SetDestCenter(Enm1);
- ObjMove_SetDestAtSpeed(Enm1, 200, 200, 3);
- loop{
- ObjEnemy_SetIntersectionCircleToShot(Enm1, ObjMove_GetX(Enm1), ObjMove_GetY(Enm1), 10);
- yield;
- }
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement