Guest User

Game.

a guest
Dec 2nd, 2011
99
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.25 KB | None | 0 0
  1. #TouhouDanmakufu
  2. #Title[Ice Sign "Icicle Fall"]
  3. #Player[FREE]
  4. #ScriptVersion[2]
  5.  
  6. script_enemy_main{
  7.  
  8. let phase=1;
  9.  
  10. let angle1=95;
  11.  
  12. let time=0;
  13.  
  14. let miny=GetClipMinY;
  15. let cx=GetCenterX;
  16.  
  17. @Initialize{
  18.  
  19.  
  20. CutIn(YOUMU,"Ice Sign "\""Icicle Fall"\",0,0,0,256,512);
  21. SetScore(500000);
  22. SetLife(1000);
  23. SetTimer(80);
  24. SetGraphicRect(0,0,64,64);
  25. SetInvincibility(60);
  26. SetDamageRate(10,10);
  27. SetEnemyMarker(true);
  28. MagicCircle(true);
  29. SetColor(128,128,255);
  30. Concentration01(60);
  31. SetColor(255,255,255);
  32. SetEffectForZeroLife(60,100,1);
  33. SetMovePosition02(cx,miny+100,50);
  34. }
  35.  
  36. @MainLoop{
  37.  
  38. SetCollisionA(GetX,GetY,32);
  39. SetCollisionB(GetX,GetY,16);
  40. SetShotAutoDeleteClip(256,256,256,256);
  41.  
  42. if(phase>=1){
  43. if(time%28==0 && time>=50){
  44. let shot1=0;
  45. let speed=6.5;
  46. loop(4){
  47. CreateShotA(shot1,GetX,GetY,0);
  48. SetShotDataA(shot1,0,speed,90+angle1,0,-0.07,0,BLUE22);
  49. SetShotDataA(shot1,50,1.5,angle1,0,0,0,87);
  50. FireShot(shot1);
  51. speed-=1;
  52. }
  53. speed=6.5;
  54. loop(4){
  55. CreateShotA(shot1,GetX,GetY,0);
  56. SetShotDataA(shot1,0,speed,90-angle1,0,-0.07,0,87);
  57. SetShotDataA(shot1,50,1.5,180-angle1,0,0,0,87);
  58. FireShot(shot1);
  59. speed-=1;
  60. }
  61. angle1-=5;
  62. if(angle1<50){ angle1=95; }
  63. }
  64. }
  65. }
  66.  
  67. @BackGround{
  68. }
  69.  
  70. @DrawLoop{
  71. }
  72.  
  73. @Finalize{
  74. }
  75.  
  76. }
  77.  
Advertisement
Add Comment
Please, Sign In to add comment