Advertisement
Guest User

First danmakufu script - explosion effects.

a guest
Jul 28th, 2015
44
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.28 KB | None | 0 0
  1. #TouhouDanmakufu[Plural]
  2. #ScriptVersion[3]
  3. #Title ["Remilia Scarlet's Challenge [Normal]"]
  4. #Text ["The vampire of darkness awaits you..."]
  5. #BGM ["./bgm/EoSD Remilias Theme- Septette for the Dead Princess (Re-Extended).mp3"]
  6. #Background ["./Background.txt"]
  7. #include "script/default_system/Default_ShotConst.txt"
  8.  
  9. let CSD = GetCurrentScriptDirectory;
  10.  
  11. @Initialize
  12. {
  13. TPlural;
  14. SetPlayerLife(6);
  15. }
  16.  
  17. @Event
  18. {
  19. yield;
  20. }
  21.  
  22. @MainLoop
  23. {
  24. yield;
  25. }
  26.  
  27. task TPlural
  28. {
  29. wait(20);
  30. let obj=ObjEnemyBossScene_Create();
  31.  
  32. ObjEnemyBossScene_Add(obj,0,CSD~"RemiNon1 [Normal].txt");
  33. ObjEnemyBossScene_Add(obj,0,CSD~"RemiSpell1 [Normal].txt");
  34. ObjEnemyBossScene_Add(obj,1,CSD~"RemiNon2 [Normal].txt");
  35. ObjEnemyBossScene_Add(obj,1,CSD~"RemiSpell2 [Normal].txt");
  36. ObjEnemyBossScene_Add(obj,2,CSD~"RemiNon3 [Normal].txt");
  37. ObjEnemyBossScene_Add(obj,2,CSD~"RemiSpell3 [Normal].txt");
  38. ObjEnemyBossScene_Add(obj,3,CSD~"RemiNon4 [Normal].txt");
  39. ObjEnemyBossScene_Add(obj,3,CSD~"RemiSpell4 [Normal].txt");
  40. ObjEnemyBossScene_Add(obj,4,CSD~"RemiSpell5 [Normal].txt");
  41.  
  42. ObjEnemyBossScene_LoadInThread(obj);
  43. ObjEnemyBossScene_Regist(obj);
  44. while(GetCommonData("EndScript",false)==false)
  45. {
  46. yield;
  47. }
  48. CloseScript(GetOwnScriptID());
  49. }
  50.  
  51. function wait(n)
  52. {
  53. loop(n){yield;}
  54. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement