Guest User

Untitled

a guest
Feb 10th, 2011
114
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.76 KB | None | 0 0
  1. #TouhouDanmakufu
  2. #Title[Testing]
  3. #Text[]
  4. #Player[FREE]
  5. #ScriptVersion[2]
  6.  
  7. script_enemy_main {
  8.  
  9. let CSD = GetCurrentScriptDirectory;
  10. let imgBoss = CSD ~ "\img\Jack.png";
  11. let cut = CSD ~ "\img\JackCutIn.png";
  12. let dir = 0;
  13. let dir2 = 0;
  14.  
  15. @Initialize{
  16. SetLife(3000);
  17. SetTimer(60);
  18. SetScore(1000000);
  19. SetMovePosition01(GetCenterX,GetCenterY,5);
  20. LoadGraphic(imgBoss);
  21. LoadGraphic(cut);
  22.  
  23. CutIn(YOUMU,"Irrevelad ''Oculto en Misterio''",cut,0,0,576,692);
  24.  
  25. mainTask;
  26. }
  27.  
  28. @MainLoop{
  29. SetCollisionA(GetX,GetY,32);
  30. SetCollisionB(GetX,GetY,16);
  31. yield;
  32. }
  33.  
  34. @DrawLoop{
  35. SetTexture(imgBoss);
  36. SetRenderState(ALPHA);
  37. SetAlpha(255);
  38. SetGraphicRect(0,0,80,110);
  39. SetGraphicScale(1,1);
  40. SetGraphicAngle(0,0,0);
  41. DrawGraphic(GetX,GetY);
  42. DrawText("Jack",103,30,12,255);
  43. }
  44.  
  45. @BackGround{
  46.  
  47.  
  48. }
  49.  
  50. @Finalize{
  51.  
  52. DeleteGraphic(imgBoss);
  53. }
  54.  
  55.  
  56. // main task, activates stuff.
  57. task mainTask{
  58. yield;
  59. fire;
  60. spawn;
  61. }
  62.  
  63. sub spawn{
  64.  
  65. CreateEnemyFromScript("starFam",GetEnemyX,GetEnemyY,0,0,0);
  66. }
  67.  
  68.  
  69. task fire{
  70.  
  71.  
  72. wait(50);
  73. Concentration01(50);
  74.  
  75. loop{
  76.  
  77. CreateShot01(GetEnemyX,GetEnemyY,1,dir,RED01,0);
  78. dir += 10;
  79. CreateShot01(GetEnemyX,GetEnemyY,1,dir2,GREEN01,0);
  80. dir2 += -10;
  81. CreateShot01(GetEnemyX,GetEnemyY,1,dir,ORANGE01,0);
  82. dir += 11;
  83. CreateShot01(GetEnemyX,GetEnemyY,1,dir2,YELLOW01,0);
  84. dir2 += -11;
  85. CreateShot01(GetEnemyX,GetEnemyY,1,dir,PURPLE01,0);
  86. dir += 12;
  87. CreateShot01(GetEnemyX,GetEnemyY,1,dir2,AQUA01,0);
  88. dir2 += -12;
  89. CreateShot01(GetEnemyX,GetEnemyY,1,dir,WHITE01,0);
  90. dir += 13;
  91. CreateShot01(GetEnemyX,GetEnemyY,1,dir2,BLUE01,0);
  92. dir2 += -13;
  93. CreateShot01(GetEnemyX,GetEnemyY,1,dir,PURPLE01,0);
  94. dir += 14;
  95. CreateShot01(GetEnemyX,GetEnemyY,1,dir2,AQUA01,0);
  96. dir2 += -14;
  97. CreateShot01(GetEnemyX,GetEnemyY,1,dir,WHITE01,0);
  98. dir += 15;
  99. CreateShot01(GetEnemyX,GetEnemyY,1,dir2,BLUE01,0);
  100. dir2 += -15;
  101. wait(1);
  102. yield;
  103.  
  104. }
  105. }
  106.  
  107.  
  108. // wait function
  109. function wait(w){
  110. loop(w){yield;}
  111. }
  112.  
  113.  
  114. }
  115.  
  116. //Familiar
  117. script_enemy_starFam {
  118.  
  119. let CSD = GetCurrentScriptDirectory;
  120. let imgFam = CSD ~ "img\JackHelper.png";
  121.  
  122.  
  123. @Initialize{
  124. SetLife(5000);
  125. LoadGraphic(imgFam);
  126. }
  127.  
  128. @MainLoop{
  129. SetCollisionA(Getx,GetY,16);
  130. SetCollisionB(GetX,GetY,16);
  131. yield;
  132. {
  133.  
  134. @DrawLoop{
  135. SetTexture(imgFam);
  136. SetRenderState(ALPHA);
  137. SetAlpha(255);
  138. SetGraphicScale(1,1);
  139. SetGraphicAngle(0,0,0);
  140. SetGraphicRect(0,0,32,32);
  141. DrawGraphic(GetX,GetY);
  142. }
  143.  
  144. @Finalize{
  145. DeleteGraphic(imgFam);
  146.  
  147. }
  148.  
  149. task MainTask{
  150. yield;
  151. movement;
  152.  
  153. }
  154.  
  155.  
  156. task movement{
  157. loop{
  158. SetMovePosition03(GetEnemyX+r*cos(dir),GetEnemyY+r*sin(dir),20,10);
  159. dir++;
  160. yield;
  161. }
  162. }
  163.  
  164. }
Advertisement
Add Comment
Please, Sign In to add comment