API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Aug 25th, 2015
216
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 38.65 KB | None | 0 0
raw download clone embed print report
  1. //===== brAthena =============================================
  2. //= Pac Poring
  3. //===== By: ==================================================
  4. //= Thor
  5. //===== Versão: ==============================================
  6. //= 2.0
  7. //===== Compativél com: ======================================
  8. //= brAthena
  9. //===== Descrição: ===========================================
  10. //
  11. // = 1.2: um nome fixo errado de NPC
  12. // = 1.3: Substituição de mobs ID
  13. // = 2.0: Alterado Nome do NPC para "Jelloping" Limpeza nos script
  14. // e corrigido bugs que me informaram por e-mail!
  15. //
  16. //===== Comentários Adicionais: =================================
  17. //
  18. // Você é livre para modificá-lo como quiser! sem remover os
  19. // direitos do criador!
  20. //
  21. //================================================ ============
  22. //
  23. ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
  24. ////////////////////////////////////////////////////// Implantação ////////////////////////////////////////////////////
  25. ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
  26. //
  27. // * Em mob_db2, adicione:
  28. //
  29. // 2506,DROPS,Aprendiz,Aprendiz,3,55,0,4,3,1,10,13,0,0,1,3,3,0,12,15,10,12,1,3,23,0x83,400,1372,672,480,0,0,0,0,0,0,0,0,909,7500,1602,80,938,500,512,1100,713,1700,512,800,620,20,0,0,0,0,0,0
  30. //
  31. // * Em mob_avail, adicione:
  32. //
  33. // 2506,0,1,1,0,1201,0,0,0,0,0,0
  34. //
  35. // * Em maps_athena.conf, adicione:
  36. //
  37. // map: poring_s01
  38. // map: poring_s02
  39. // map: poring_s03
  40. //
  41. // * Em map_index.txt, adicione:
  42. //
  43. // poring_s01
  44. // poring_s02
  45. // poring_s03
  46. //
  47. // * Em fogparametertable.txt, adicione:
  48. //
  49. // poring_s02.rsw#
  50. // 0.2#
  51. // 0.8#
  52. // 0x22ffccff#
  53. // 0.5#
  54. // poring_s01.rsw#
  55. // 0.23#
  56. // 0.9#
  57. // 0xffffffff#
  58. // 0.3#
  59. // poring_s03.rsw#
  60. // 0.1#
  61. // 0.1#
  62. // 0xffAA7755#
  63. // 0.1#
  64. //
  65. // * Em mapnametable.txt, adicione:
  66. //
  67. // poring_s01.rsw#PacPoring #
  68. // poring_s02.rsw#PacPoring #
  69. // poring_s03.rsw#PacPoring #
  70. //
  71. ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
  72. ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
  73. ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
  74.  
  75.  
  76. poring_s01,21,224,4 script Jelloping#pacporing 909,{
  77. if (getgmlevel() >= .pacpopogmlevel) {
  78. mes "^BF0073[Jelloping]^000000";
  79. mes "O que você faz?";
  80. next;
  81. menu "Modo Player",-,"Resetar Ranking",L_reset;
  82. }
  83. mes "^BF0073[Jelloping]^000000";
  84. mes "O Jellopy gigantes! O Jellopy gigantes em toda parte!";
  85. next;
  86. mes "^BF0073[Jelloping]^000000";
  87. mes "Eu não sei o que eu daria para voltar para aquele lugar ... Se apenas não havia todos estes monstros ...";
  88. next;
  89. menu "Regras",L_regles,"Ranking",L_scores,"Prêmios",L_reward,"Sair",L_leave;
  90. close;
  91.  
  92. ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
  93. ///////////////////////////////////////////////////// Configuração ////////////////////////////////////////////////////
  94. ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
  95. OnInit:
  96. set $@pacporingSpeedD,100; // Base de velocidade para mover multidões (que automaticamente aumenta em 3% por nível)
  97. set .pacpopogmlevel,60; // O nível mínimo para acessar o menu GM.
  98. set $@pacpopotradeID,7539; // ID do objeto para trocar os contras de résompenses (padrão: Poring Coin: 1, ganhou em cada nível)
  99. set $@pacpopotradeNom$,"Poring Coin"; // Nome do objeto
  100. set .pacpopotradeNum,3; // Numeros de $@pacpopotradeID necessários para trocar uma recompensa
  101. set .recomp[1],0; // ID do primeiro prêmio
  102. set .recomp$[1],""; // nome do prêmio
  103. set .recomp[2],0; // ID do segundo prêmio
  104. set .recomp$[2],""; // etc...
  105. set .recomp[3],0;
  106. set .recomp$[3],"";
  107. set .recomp[4],0;
  108. set .recomp$[4],"";
  109. set .recomp[5],0;
  110. set .recomp$[5],"";
  111. set .recomp[6],0;
  112. set .recomp$[6],"";
  113. set .recomp[7],0;
  114. set .recomp$[7],"";
  115. set .recomp[8],0;
  116. set .recomp$[8],"";
  117. set .recomp[9],0;
  118. set .recomp$[9],"";
  119. set .recomp[10],0;
  120. set .recomp$[10],"";
  121.  
  122. end;
  123. ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
  124. ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
  125. ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
  126.  
  127. L_leave:
  128. warp "prt_fild08",158,325;
  129. end;
  130.  
  131. L_reward:
  132. mes "^BF0073[Jelloping]^000000";
  133. mes "Eu posso compartilhar alguns contras recompensas "+.pacpopotradeNum+" "+$@pacpopotradeNom$+"s, você pode ganhar em cada passagem de nível.";
  134. mes "Que recompensa você quer?";
  135. next;
  136. switch(select(.recomp$[1],.recomp$[2],.recomp$[3],.recomp$[4],.recomp$[5],.recomp$[6],.recomp$[7],.recomp$[8],.recomp$[9],.recomp$[10],Cancelar)) {
  137. case 11:
  138. mes "^BF0073[Jelloping]^000000";
  139. mes "Como quiser!";
  140. close;
  141. default:
  142. mes "^BF0073[Jelloping]^000000";
  143. if ( countitem($@pacpopotradeID) < .pacpopotradeNum ) {
  144. mes "Ah, me desculpe, mas você não tem o suficiente "+$@pacpopotradeNom$+"s. e "+.pacpopotradeNum+" pela recompensa!";
  145. close;
  146. }
  147. mes "E isto é para você!";
  148. getitem .recomp[@menu],1;
  149. delitem $@pacpopotradeID,.pacpopotradeNum;
  150. }
  151. close;
  152.  
  153. L_regles:
  154. mes "^BF0073[Jelloping]^000000";
  155. mes "O objectivo é simples: basta engolir os mais gigantes Jellopies possível, evitando os Fantasma que querem matá-lo, a única maneira de escapar deles é a engolir um dos bônus que te faz invencível.";
  156. next;
  157. mes "^BF0073[Jelloping]^000000";
  158. mes "A Cada Jellopy vale 1 pointo.";
  159. mes "Se você conseguir matar um Fantasma, você ganha 5 pontos extra.";
  160. mes "Complete um nível por nível de 20 pontos.";
  161. mes "Em cada novo nível, o número de pontos atribuídos por aumentos Jellopy até 1.";
  162. next;
  163. mes "^BF0073[Jelloping]^000000";
  164. mes "E agora, sua vez agora!";
  165. close;
  166.  
  167. L_scores:
  168. mes "^BF0073[Recordes]^000000";
  169. mes "Posição 1: "+$pacpopoNom1$+" com "+$pacpopoRecord1+" pontos.";
  170. mes "Posição 2: "+$pacpopoNom2$+" com "+$pacpopoRecord2+" pontos.";
  171. mes "Posição 3: "+$pacpopoNom3$+" com "+$pacpopoRecord3+" pontos.";
  172. mes "Posição 4: "+$pacpopoNom4$+" com "+$pacpopoRecord4+" pontos.";
  173. mes "Posição 5: "+$pacpopoNom5$+" com "+$pacpopoRecord5+" pontos.";
  174. close;
  175.  
  176. L_reset:
  177. next;
  178. menu "Redefinir os últimos 4 lugares",L_reset3,"Restar tudo",-;
  179. set $pacpopoNom1$, "Pessoa";
  180. set $pacpopoRecord1,0;
  181. L_reset3:
  182. set $pacpopoNom2$, "Pessoa";
  183. set $pacpopoRecord2,0;
  184. set $pacpopoNom3$, "Pessoa";
  185. set $pacpopoRecord3,0;
  186. set $pacpopoNom4$, "Pessoa";
  187. set $pacpopoRecord4,0;
  188. set $pacpopoNom5$, "Pessoa";
  189. set $pacpopoRecord5,0;
  190. close;
  191.  
  192. OnTimer180000:
  193. if (!$@tempPacPoringEvent) {
  194. stopnpctimer;
  195. end;
  196. }
  197. if ($@PacPoringCount <= .PacPoringCount) {
  198. areaannounce $@pacporinglvl$,76,24,161,132,"Parece que você está dormindo...",bc_blue;
  199. donpcevent "Stomring#pacporingConfig::OnEnable";
  200. stopnpctimer;
  201. end;
  202. }
  203. set .PacPoringCount,$@PacPoringCount;
  204. OnCommenceTimer:
  205. initnpctimer;
  206. end;
  207.  
  208. }
  209.  
  210. prontera,155,160,4 script Stomring#pacporingConfig 909,{
  211. end;
  212.  
  213. L_meilleurScore:
  214. mapannounce $@pacporinglvl$,"Parabéns ao "+strcharinfo(0)+" que acaba de bater um recorde!",bc_all;
  215. set .@i,5;
  216. L_meilleurScoreLoop:
  217. if (getarg(0)==.@i) {
  218. set getd("$pacpopoRecord"+.@i),$@pacporingtotalscore;
  219. set getd("$pacpopoNom"+.@i+"$"),strcharinfo(0);
  220. return;
  221. }
  222. else {
  223. set getd("$pacpopoRecord"+.@i),getd("$pacpopoRecord"+(.@i-1));
  224. set getd("$pacpopoNom"+.@i+"$"),getd("$pacpopoNom"+(.@i-1)+"$");
  225. }
  226. if (.@i==1) return;
  227. set .@i,.@i-1;
  228. goto L_meilleurScoreLoop;
  229.  
  230. OnCestFini:
  231. set $@tempPacPoringEvent, 0;
  232. donpcevent "::Onbooumpacpopo";
  233. OnCestFini2:
  234. if (!isloggedin($@pacporingrid)) goto OnEnable;
  235. attachrid($@pacporingrid);
  236. set $@pacporingtotalscore,$@pacporingtotalscore+$@PacPoringCount;
  237. areaannounce $@pacporinglvl$,76,24,161,132,"Sua pontuação é de "+$@pacporingtotalscore+" pontos!",bc_blue;
  238. if ($@pacporingtotalscore>$pacpopoRecord1) callsub L_meilleurScore,1;
  239. else if ($@pacporingtotalscore>$pacpopoRecord2) callsub L_meilleurScore,2;
  240. else if ($@pacporingtotalscore>$pacpopoRecord3) callsub L_meilleurScore,3;
  241. else if ($@pacporingtotalscore>$pacpopoRecord4) callsub L_meilleurScore,4;
  242. else if ($@pacporingtotalscore>$pacpopoRecord5) callsub L_meilleurScore,5;
  243. OnEnable:
  244. donpcevent "::OnPacPoringEnable";
  245. goto OnEnableNext;
  246.  
  247. OnInit:
  248. areawarp $@pacporinglvl$,76,24,161,132,"poring_s01",18,217;
  249. setarray $@pacpopononoX[1],144,158,119,80,93,144;
  250. setarray $@pacpopononoY[1],118,77,80,77,39,39;
  251. waitingroom "PacPoring - Sala de Espera",10,"Stomring#pacporingConfig::OnWaitStart",1;
  252. donpcevent "::OnPacPoringEnable";
  253. goto OnEnableNext2;
  254.  
  255. OnEnableNextWin:
  256. set $@tempPacPoringEvent, 0;
  257. set .@tempscore,20*$@pacporinglvl;
  258. set $@pacporingtotalscore,$@pacporingtotalscore+.@tempscore;
  259. areaannounce $@pacporinglvl$,76,24,161,132,"Parabéns, você comeu o último Jellopy (+"+.@tempscore+" pontos)!",bc_blue;
  260. if (!isloggedin($@pacporingrid)) {
  261. donpcevent "Stomring#pacporingConfig::OnEnable";
  262. end;
  263. }
  264. attachrid($@pacporingrid);
  265. // recompensa inserir aqui
  266. getitem $@pacpopotradeID,1;
  267. sleep 1000;
  268. set $@pacporinglvl,$@pacporinglvl+1;
  269. set .@j,$@pacporinglvl%3;
  270. if (!.@j) set .@j,3;
  271. set $@pacporinglvl$,"poring_s0"+.@j;
  272. set $@pacporingPoints,$@pacporingPoints+1;
  273. set $@pacporingSpeed,$@pacporingSpeed-(($@pacporingSpeed*3)/100);
  274. if ($@pacporingSpeed<25) set $@pacporingSpeed,25;
  275. set $@pacporingtotalscore,$@pacporingtotalscore+$@PacPoringCount;
  276. set $@PacPoringCount, 0;
  277. areaannounce $@pacporinglvl$,76,24,161,132,"[ Nível "+$@pacporinglvl+" ]",bc_blue;
  278. sleep2 3000;
  279. if ($@pacporinglvl%3==1) set .@k$,"";
  280. if ($@pacporinglvl%3==2) set .@k$,"2";
  281. if ($@pacporinglvl%3==0) set .@k$,"3";
  282. donpcevent "#pacporingbonus1"+.@k$+"::OnEnable";
  283. donpcevent "#pacporingbonus2"+.@k$+"::OnEnable";
  284. donpcevent "#pacporingbonus3"+.@k$+"::OnEnable";
  285. donpcevent "::OnEnableNonopac";
  286. if (!isloggedin($@pacporingrid)) {
  287. donpcevent "Stomring#pacporingConfig::OnEnable";
  288. end;
  289. }
  290. attachrid($@pacporingrid);
  291. warp $@pacporinglvl$,118,119;
  292. set $@tempPacPoringEvent, 1;
  293. if ($@pacPoringTer==3) set $@pacPoringTer,0;
  294. set $@pacPoringTer,$@pacPoringTer+1;
  295. switch($@pacPoringTer) {
  296. case 1:
  297. donpcevent "::OnPacPoringEnable";
  298. break;
  299. case 2:
  300. donpcevent "::On2PacPoringEnable";
  301. break;
  302. case 3:
  303. donpcevent "::On3PacPoringEnable";
  304. break;
  305.  
  306. }
  307. end;
  308.  
  309. OnRunAway:
  310. donpcevent "::OnEnableNonopac";
  311. end;
  312.  
  313. OnEnableNext:
  314. sleep 5000;
  315. OnEnableNextWin2:
  316. if (isloggedin($@pacporingrid)) {
  317. attachrid($@pacporingrid);
  318. atcommand "@speed 150";
  319. undisguise;
  320. if (!hp) atcommand "@alive";
  321. }
  322. OnEnableNext2:
  323. donpcevent "::OnEnableNonopac";
  324. set $@PacPoringEvent, 0;
  325. set $@tempPacPoringEvent, 0;
  326. set $@PacPoringCount, 0;
  327. set $@pacporingtotalscore,0;
  328. set $@pacporinglvl,1;
  329. set $@pacporinglvl$,"poring_s01";
  330. set $@pacporingPoints,1;
  331. set $@pacporingSpeed,$@pacporingSpeedD;
  332. donpcevent "#pacporingbonus0::OnBonusOver";
  333. areawarp $@pacporinglvl$,76,24,161,132,"poring_s01",18,217;
  334. initnpctimer;
  335. end;
  336.  
  337. OnTimer10000:
  338. initnpctimer;
  339. if (getwaitingroomstate(0) && !$@PacPoringEvent) goto L_warp;
  340. end;
  341.  
  342. OnWaitStart:
  343. if ($@PacPoringEvent) end;
  344. L_warp:
  345. set $@pacPoringTer,1;
  346. donpcevent "::OnEnablePacBonus";
  347. donpcevent "::OnEnableNonopac";
  348. set $@PacPoringEvent, 1;
  349. set $@tempPacPoringEvent, 1;
  350. set $@PacPoringCount, 0;
  351. donpcevent "::OnPacPoringEnable";
  352. warpwaitingpc "poring_s01",118,119,1;
  353. set $@pacporingrid,$@warpwaitingpc[0];
  354. attachrid($@warpwaitingpc[0]);
  355. set $@pacporingName$,rid2name($@warpwaitingpc[0]);
  356. misceffect 52;
  357. disguise 1002;
  358. atcommand "@speed 90";
  359. doevent "Jelloping#pacporing::OnCommenceTimer";
  360. end;
  361.  
  362. }
  363.  
  364. poring_s01,144,118,1 script Fantasma::pacporing1 2506,1,1,{
  365. end;
  366.  
  367. OnTouch:
  368. if (!$@tempPacPoringEvent) {
  369. stopnpctimer;
  370. end;
  371. }
  372. if ($@pacpopoinvincible) {
  373. emotion 21,1;
  374. misceffect 20;
  375. disablenpc strnpcinfo(3);
  376. set $@pacporingtotalscore,$@pacporingtotalscore+5;
  377. stopnpctimer;
  378. sleep 30000;
  379. enablenpc strnpcinfo(3);
  380. movenpc strnpcinfo(3),getd(".x"+strnpcinfo(3)),getd(".y"+strnpcinfo(3));
  381. npcspeed $@pacporingSpeed;
  382. initnpctimer;
  383. }
  384. else donpcevent "Stomring#pacporingConfig::OnCestFini";
  385. end;
  386.  
  387. OnInit:
  388. getmapxy(getd(".m$"+strnpcinfo(3)),getd(".x"+strnpcinfo(3)),getd(".y"+strnpcinfo(3)),1);
  389. end;
  390.  
  391. OnEnableNonopac:
  392. getmapxy(.@m$,.@x,.@x,1);
  393. if ( $@pacporinglvl$ != .@m$ ) end;
  394. enablenpc strnpcinfo(3);
  395. movenpc strnpcinfo(3),getd(".x"+strnpcinfo(3)),getd(".y"+strnpcinfo(3));
  396. npcspeed $@pacporingSpeed;
  397. initnpctimer;
  398. end;
  399.  
  400. OnTimer500:
  401. if (!$@tempPacPoringEvent) {
  402. stopnpctimer;
  403. end;
  404. }
  405. if ($@pacpopoinvincible) goto L_invincible;
  406. getmapxy(.@maplocation$,.@Xlocation,.@Ylocation,0,rid2name($@pacporingrid));
  407. npcwalkto .@Xlocation,.@Ylocation;
  408. initnpctimer;
  409. end;
  410.  
  411. L_invincible:
  412. // O jogador é invencível,(que se movem aleatoriamente)
  413. getmapxy(.@maplocation$,.@Xlocation,.@Ylocation,1);
  414. set .@Xlocation2,rand(5);
  415. set .@Ylocation2,rand(5);
  416. set .@Xlocation,.@Xlocation+.@Xlocation2;
  417. set .@Ylocation,.@Ylocation+.@Ylocation2;
  418. if (checkcell(.@maplocation$,.@Xlocation,.@Ylocation,cell_walkable)) goto L_invincible;
  419. npcwalkto .@Xlocation,.@Ylocation;
  420. initnpctimer;
  421. end;
  422.  
  423. Onbooumpacpopo:
  424. misceffect 1;
  425. stopnpctimer;
  426. if (!isloggedin($@pacporingrid)) end;
  427. attachrid($@pacporingrid);
  428. getmapxy(.@m$,.@x,.@y,1);
  429. npcskilleffect 5,0,.@x,.@y;
  430. percentheal -100,0;
  431. heal -1,0;
  432. emotion 32,1;
  433. end;
  434.  
  435. }
  436.  
  437. poring_s01,158,77,1 duplicate(pacporing1) Fantasma::pacporing2 1186,1,1
  438. poring_s01,119,80,1 duplicate(pacporing1) Fantasma::pacporing3 1186,1,1
  439. poring_s01,80,77,1 duplicate(pacporing1) Fantasma::pacporing4 1186,1,1
  440. poring_s01,93,39,1 duplicate(pacporing1) Fantasma::pacporing5 1186,1,1
  441. poring_s01,144,39,1 duplicate(pacporing1) Fantasma::pacporing6 1186,1,1
  442.  
  443. poring_s02,144,118,1 duplicate(pacporing1) Fantasma::pacporing12 1186,1,1
  444. poring_s02,158,77,1 duplicate(pacporing1) Fantasma::pacporing22 1186,1,1
  445. poring_s02,119,80,1 duplicate(pacporing1) Fantasma::pacporing32 1186,1,1
  446. poring_s02,80,77,1 duplicate(pacporing1) Fantasma::pacporing42 1186,1,1
  447. poring_s02,93,39,1 duplicate(pacporing1) Fantasma::pacporing52 1186,1,1
  448. poring_s02,144,39,1 duplicate(pacporing1) Fantasma::pacporing62 1186,1,1
  449.  
  450. poring_s03,144,118,1 duplicate(pacporing1) Kasa::pacporing13 1833,1,1
  451. poring_s03,158,77,1 duplicate(pacporing1) Kasa::pacporing23 1833,1,1
  452. poring_s03,119,80,1 duplicate(pacporing1) Kasa::pacporing33 1833,1,1
  453. poring_s03,80,77,1 duplicate(pacporing1) Kasa::pacporing43 1833,1,1
  454. poring_s03,93,39,1 duplicate(pacporing1) Kasa::pacporing53 1833,1,1
  455. poring_s03,144,39,1 duplicate(pacporing1) Kasa::pacporing63 1833,1,1
  456.  
  457. poring_s01,1,1,1 script #pacporingbonus0 -1,{
  458. end;
  459.  
  460. OnBonus:
  461. if (!$@PacPoringEvent) end;
  462. initnpctimer;
  463. if ($@pacpopoinvincible) {
  464. areaannounce $@pacporinglvl$,76,24,161,132,"Bônus! Agora você está invencível por mais 10 segundos!",bc_blue;
  465. end;
  466. }
  467. areaannounce $@pacporinglvl$,76,24,161,132,"Bônus! Agora você está invencível por 10 segundos!",bc_blue;
  468. set $@pacpopoinvincible, 1;
  469. if (!isloggedin($@pacporingrid)) end;
  470. attachrid($@pacporingrid);
  471. misceffect 35;
  472. end;
  473.  
  474. OnTimer9000:
  475. areaannounce $@pacporinglvl$,76,24,161,132,"Atenção! Voltar ao normal em 1 segundo!",bc_blue;
  476. end;
  477.  
  478. OnTimer10000:
  479. if (isloggedin($@pacporingrid)) {
  480. attachrid($@pacporingrid);
  481. disguise 1002;
  482. misceffect 52;
  483. soundeffect "poring_die.wav",0;
  484. }
  485. OnBonusOver:
  486. set $@pacpopoinvincible, 0;
  487. stopnpctimer;
  488. end;
  489.  
  490. }
  491.  
  492. poring_s01,137,78,1 script #pacporingbonus1 1951,2,2,{
  493. end;
  494.  
  495. OnTouch:
  496. disguise 1582;
  497. donpcevent "#pacporingbonus0::OnBonus";
  498. disablenpc strnpcinfo(3);
  499. end;
  500.  
  501. OnEnablePacBonus:
  502. enablenpc strnpcinfo(3);
  503. end;
  504. }
  505.  
  506. poring_s01,100,78,1 duplicate(#pacporingbonus1) #pacporingbonus2 1951,2,2
  507. poring_s01,119,38,1 duplicate(#pacporingbonus1) #pacporingbonus3 1951,2,2
  508.  
  509. poring_s02,137,78,1 duplicate(#pacporingbonus1) #pacporingbonus12 1951,2,2
  510. poring_s02,100,78,1 duplicate(#pacporingbonus1) #pacporingbonus22 1951,2,2
  511. poring_s02,119,38,1 duplicate(#pacporingbonus1) #pacporingbonus32 1951,2,2
  512.  
  513. poring_s03,137,78,1 duplicate(#pacporingbonus1) #pacporingbonus13 1951,2,2
  514. poring_s03,100,78,1 duplicate(#pacporingbonus1) #pacporingbonus23 1951,2,2
  515. poring_s03,119,38,1 duplicate(#pacporingbonus1) #pacporingbonus33 1951,2,2
  516.  
  517.  
  518. poring_s01,1,1,1 script #pacporing0 -1,3,3,{
  519. end;
  520.  
  521. OnTouch:
  522. if (!$@PacPoringEvent) end;
  523. misceffect 52;
  524. soundeffect "siroma_move.wav",0;
  525. set $@PacPoringCount,$@PacPoringCount+1*$@pacporingPoints;
  526. if ($@PacPoringCount == 103*$@pacporingPoints) doevent "Stomring#pacporingConfig::OnEnableNextWin";
  527. emotion 3,1;
  528. OnPacPoringDisable:
  529. disablenpc strnpcinfo(3);
  530. end;
  531.  
  532. OnPacPoringEnable:
  533. enablenpc strnpcinfo(3);
  534. end;
  535.  
  536. }
  537.  
  538. poring_s01,104,26,1 duplicate(#pacporing0) #pacporing1 1952,2,2
  539. poring_s01,109,26,1 duplicate(#pacporing0) #pacporing2 1952,2,2
  540. poring_s01,115,26,1 duplicate(#pacporing0) #pacporing3 1952,2,2
  541. poring_s01,121,26,1 duplicate(#pacporing0) #pacporing4 1952,2,2
  542. poring_s01,127,26,1 duplicate(#pacporing0) #pacporing5 1952,2,2
  543. poring_s01,133,26,1 duplicate(#pacporing0) #pacporing6 1952,2,2
  544. poring_s01,104,51,1 duplicate(#pacporing0) #pacporing7 1952,2,2
  545. poring_s01,109,51,1 duplicate(#pacporing0) #pacporing8 1952,2,2
  546. poring_s01,115,51,1 duplicate(#pacporing0) #pacporing9 1952,2,2
  547. poring_s01,121,51,1 duplicate(#pacporing0) #pacporing10 1952,2,2
  548. poring_s01,127,51,1 duplicate(#pacporing0) #pacporing11 1952,2,2
  549. poring_s01,133,51,1 duplicate(#pacporing0) #pacporing12 1952,2,2
  550. poring_s01,104,45,1 duplicate(#pacporing0) #pacporing13 1952,2,2
  551. poring_s01,104,39,1 duplicate(#pacporing0) #pacporing14 1952,2,2
  552. poring_s01,104,33,1 duplicate(#pacporing0) #pacporing15 1952,2,2
  553. poring_s01,133,45,1 duplicate(#pacporing0) #pacporing16 1952,2,2
  554. poring_s01,133,39,1 duplicate(#pacporing0) #pacporing17 1952,2,2
  555. poring_s01,133,33,1 duplicate(#pacporing0) #pacporing18 1952,2,2
  556. poring_s01,104,106,1 duplicate(#pacporing0) #pacporing19 1952,2,2
  557. poring_s01,109,106,1 duplicate(#pacporing0) #pacporing20 1952,2,2
  558. poring_s01,115,106,1 duplicate(#pacporing0) #pacporing21 1952,2,2
  559. poring_s01,121,106,1 duplicate(#pacporing0) #pacporing22 1952,2,2
  560. poring_s01,127,106,1 duplicate(#pacporing0) #pacporing23 1952,2,2
  561. poring_s01,133,106,1 duplicate(#pacporing0) #pacporing24 1952,2,2
  562. poring_s01,104,131,1 duplicate(#pacporing0) #pacporing25 1952,2,2
  563. poring_s01,109,131,1 duplicate(#pacporing0) #pacporing26 1952,2,2
  564. poring_s01,115,131,1 duplicate(#pacporing0) #pacporing27 1952,2,2
  565. poring_s01,121,131,1 duplicate(#pacporing0) #pacporing28 1952,2,2
  566. poring_s01,127,131,1 duplicate(#pacporing0) #pacporing29 1952,2,2
  567. poring_s01,133,131,1 duplicate(#pacporing0) #pacporing30 1952,2,2
  568. poring_s01,104,125,1 duplicate(#pacporing0) #pacporing31 1952,2,2
  569. poring_s01,104,119,1 duplicate(#pacporing0) #pacporing32 1952,2,2
  570. poring_s01,104,113,1 duplicate(#pacporing0) #pacporing33 1952,2,2
  571. poring_s01,133,125,1 duplicate(#pacporing0) #pacporing34 1952,2,2
  572. poring_s01,133,119,1 duplicate(#pacporing0) #pacporing35 1952,2,2
  573. poring_s01,133,113,1 duplicate(#pacporing0) #pacporing36 1952,2,2
  574. poring_s01,84,62,1 duplicate(#pacporing0) #pacporing37 1952,2,2
  575. poring_s01,91,62,1 duplicate(#pacporing0) #pacporing38 1952,2,2
  576. poring_s01,97,62,1 duplicate(#pacporing0) #pacporing39 1952,2,2
  577. poring_s01,104,62,1 duplicate(#pacporing0) #pacporing40 1952,2,2
  578. poring_s01,111,62,1 duplicate(#pacporing0) #pacporing41 1952,2,2
  579. poring_s01,118,62,1 duplicate(#pacporing0) #pacporing42 1952,2,2
  580. poring_s01,130,62,1 duplicate(#pacporing0) #pacporing43 1952,2,2
  581. poring_s01,136,62,1 duplicate(#pacporing0) #pacporing44 1952,2,2
  582. poring_s01,142,62,1 duplicate(#pacporing0) #pacporing45 1952,2,2
  583. poring_s01,148,62,1 duplicate(#pacporing0) #pacporing46 1952,2,2
  584. poring_s01,153,62,1 duplicate(#pacporing0) #pacporing47 1952,2,2
  585. poring_s01,119,95,1 duplicate(#pacporing0) #pacporing48 1952,2,2
  586. poring_s01,125,95,1 duplicate(#pacporing0) #pacporing49 1952,2,2
  587. poring_s01,132,95,1 duplicate(#pacporing0) #pacporing50 1952,2,2
  588. poring_s01,139,95,1 duplicate(#pacporing0) #pacporing51 1952,2,2
  589. poring_s01,146,95,1 duplicate(#pacporing0) #pacporing52 1952,2,2
  590. poring_s01,153,95,1 duplicate(#pacporing0) #pacporing53 1952,2,2
  591. poring_s01,84,95,1 duplicate(#pacporing0) #pacporing54 1952,2,2
  592. poring_s01,90,95,1 duplicate(#pacporing0) #pacporing55 1952,2,2
  593. poring_s01,96,95,1 duplicate(#pacporing0) #pacporing56 1952,2,2
  594. poring_s01,102,95,1 duplicate(#pacporing0) #pacporing57 1952,2,2
  595. poring_s01,107,95,1 duplicate(#pacporing0) #pacporing58 1952,2,2
  596. poring_s01,118,68,1 duplicate(#pacporing0) #pacporing59 1952,2,2
  597. poring_s01,118,74,1 duplicate(#pacporing0) #pacporing60 1952,2,2
  598. poring_s01,119,83,1 duplicate(#pacporing0) #pacporing61 1952,2,2
  599. poring_s01,119,89,1 duplicate(#pacporing0) #pacporing62 1952,2,2
  600. poring_s01,153,68,1 duplicate(#pacporing0) #pacporing63 1952,2,2
  601. poring_s01,153,74,1 duplicate(#pacporing0) #pacporing64 1952,2,2
  602. poring_s01,153,83,1 duplicate(#pacporing0) #pacporing65 1952,2,2
  603. poring_s01,153,89,1 duplicate(#pacporing0) #pacporing66 1952,2,2
  604. poring_s01,84,68,1 duplicate(#pacporing0) #pacporing67 1952,2,2
  605. poring_s01,84,74,1 duplicate(#pacporing0) #pacporing68 1952,2,2
  606. poring_s01,84,83,1 duplicate(#pacporing0) #pacporing69 1952,2,2
  607. poring_s01,84,89,1 duplicate(#pacporing0) #pacporing70 1952,2,2
  608. poring_s01,143,56,1 duplicate(#pacporing0) #pacporing71 1952,2,2
  609. poring_s01,143,51,1 duplicate(#pacporing0) #pacporing72 1952,2,2
  610. poring_s01,143,46,1 duplicate(#pacporing0) #pacporing73 1952,2,2
  611. poring_s01,118,46,1 duplicate(#pacporing0) #pacporing74 1952,2,2
  612. poring_s01,98,39,1 duplicate(#pacporing0) #pacporing75 1952,2,2
  613. poring_s01,93,46,1 duplicate(#pacporing0) #pacporing76 1952,2,2
  614. poring_s01,93,51,1 duplicate(#pacporing0) #pacporing77 1952,2,2
  615. poring_s01,93,56,1 duplicate(#pacporing0) #pacporing78 1952,2,2
  616. poring_s01,95,73,1 duplicate(#pacporing0) #pacporing79 1952,2,2
  617. poring_s01,101,73,1 duplicate(#pacporing0) #pacporing80 1952,2,2
  618. poring_s01,106,73,1 duplicate(#pacporing0) #pacporing81 1952,2,2
  619. poring_s01,106,78,1 duplicate(#pacporing0) #pacporing82 1952,2,2
  620. poring_s01,106,84,1 duplicate(#pacporing0) #pacporing83 1952,2,2
  621. poring_s01,95,78,1 duplicate(#pacporing0) #pacporing84 1952,2,2
  622. poring_s01,95,84,1 duplicate(#pacporing0) #pacporing85 1952,2,2
  623. poring_s01,101,84,1 duplicate(#pacporing0) #pacporing86 1952,2,2
  624. poring_s01,131,73,1 duplicate(#pacporing0) #pacporing87 1952,2,2
  625. poring_s01,137,73,1 duplicate(#pacporing0) #pacporing88 1952,2,2
  626. poring_s01,142,73,1 duplicate(#pacporing0) #pacporing89 1952,2,2
  627. poring_s01,142,78,1 duplicate(#pacporing0) #pacporing90 1952,2,2
  628. poring_s01,142,84,1 duplicate(#pacporing0) #pacporing91 1952,2,2
  629. poring_s01,131,78,1 duplicate(#pacporing0) #pacporing92 1952,2,2
  630. poring_s01,131,84,1 duplicate(#pacporing0) #pacporing93 1952,2,2
  631. poring_s01,137,84,1 duplicate(#pacporing0) #pacporing94 1952,2,2
  632. poring_s01,138,39,1 duplicate(#pacporing0) #pacporing95 1952,2,2
  633. poring_s01,94,101,1 duplicate(#pacporing0) #pacporing96 1952,2,2
  634. poring_s01,94,106,1 duplicate(#pacporing0) #pacporing97 1952,2,2
  635. poring_s01,94,111,1 duplicate(#pacporing0) #pacporing98 1952,2,2
  636. poring_s01,98,118,1 duplicate(#pacporing0) #pacporing99 1952,2,2
  637. poring_s01,139,118,1 duplicate(#pacporing0) #pacporing100 1952,2,2
  638. poring_s01,143,101,1 duplicate(#pacporing0) #pacporing101 1952,2,2
  639. poring_s01,143,105,1 duplicate(#pacporing0) #pacporing102 1952,2,2
  640. poring_s01,143,111,1 duplicate(#pacporing0) #pacporing103 1952,2,2
  641.  
  642. poring_s02,104,26,1 duplicate(#pacporing0) #2pacporing1 1954,2,2
  643. poring_s02,109,26,1 duplicate(#pacporing0) #2pacporing2 1954,2,2
  644. poring_s02,115,26,1 duplicate(#pacporing0) #2pacporing3 1954,2,2
  645. poring_s02,121,26,1 duplicate(#pacporing0) #2pacporing4 1954,2,2
  646. poring_s02,127,26,1 duplicate(#pacporing0) #2pacporing5 1954,2,2
  647. poring_s02,133,26,1 duplicate(#pacporing0) #2pacporing6 1954,2,2
  648. poring_s02,104,51,1 duplicate(#pacporing0) #2pacporing7 1954,2,2
  649. poring_s02,109,51,1 duplicate(#pacporing0) #2pacporing8 1954,2,2
  650. poring_s02,115,51,1 duplicate(#pacporing0) #2pacporing9 1954,2,2
  651. poring_s02,121,51,1 duplicate(#pacporing0) #2pacporing10 1954,2,2
  652. poring_s02,127,51,1 duplicate(#pacporing0) #2pacporing11 1954,2,2
  653. poring_s02,133,51,1 duplicate(#pacporing0) #2pacporing12 1954,2,2
  654. poring_s02,104,45,1 duplicate(#pacporing0) #2pacporing13 1954,2,2
  655. poring_s02,104,39,1 duplicate(#pacporing0) #2pacporing14 1954,2,2
  656. poring_s02,104,33,1 duplicate(#pacporing0) #2pacporing15 1954,2,2
  657. poring_s02,133,45,1 duplicate(#pacporing0) #2pacporing16 1954,2,2
  658. poring_s02,133,39,1 duplicate(#pacporing0) #2pacporing17 1954,2,2
  659. poring_s02,133,33,1 duplicate(#pacporing0) #2pacporing18 1954,2,2
  660. poring_s02,104,106,1 duplicate(#pacporing0) #2pacporing19 1954,2,2
  661. poring_s02,109,106,1 duplicate(#pacporing0) #2pacporing20 1954,2,2
  662. poring_s02,115,106,1 duplicate(#pacporing0) #2pacporing21 1954,2,2
  663. poring_s02,121,106,1 duplicate(#pacporing0) #2pacporing22 1954,2,2
  664. poring_s02,127,106,1 duplicate(#pacporing0) #2pacporing23 1954,2,2
  665. poring_s02,133,106,1 duplicate(#pacporing0) #2pacporing24 1954,2,2
  666. poring_s02,104,131,1 duplicate(#pacporing0) #2pacporing25 1954,2,2
  667. poring_s02,109,131,1 duplicate(#pacporing0) #2pacporing26 1954,2,2
  668. poring_s02,115,131,1 duplicate(#pacporing0) #2pacporing27 1954,2,2
  669. poring_s02,121,131,1 duplicate(#pacporing0) #2pacporing28 1954,2,2
  670. poring_s02,127,131,1 duplicate(#pacporing0) #2pacporing29 1954,2,2
  671. poring_s02,133,131,1 duplicate(#pacporing0) #2pacporing30 1954,2,2
  672. poring_s02,104,125,1 duplicate(#pacporing0) #2pacporing31 1954,2,2
  673. poring_s02,104,119,1 duplicate(#pacporing0) #2pacporing32 1954,2,2
  674. poring_s02,104,113,1 duplicate(#pacporing0) #2pacporing33 1954,2,2
  675. poring_s02,133,125,1 duplicate(#pacporing0) #2pacporing34 1954,2,2
  676. poring_s02,133,119,1 duplicate(#pacporing0) #2pacporing35 1954,2,2
  677. poring_s02,133,113,1 duplicate(#pacporing0) #2pacporing36 1954,2,2
  678. poring_s02,84,62,1 duplicate(#pacporing0) #2pacporing37 1954,2,2
  679. poring_s02,91,62,1 duplicate(#pacporing0) #2pacporing38 1954,2,2
  680. poring_s02,97,62,1 duplicate(#pacporing0) #2pacporing39 1954,2,2
  681. poring_s02,104,62,1 duplicate(#pacporing0) #2pacporing40 1954,2,2
  682. poring_s02,111,62,1 duplicate(#pacporing0) #2pacporing41 1954,2,2
  683. poring_s02,118,62,1 duplicate(#pacporing0) #2pacporing42 1954,2,2
  684. poring_s02,130,62,1 duplicate(#pacporing0) #2pacporing43 1954,2,2
  685. poring_s02,136,62,1 duplicate(#pacporing0) #2pacporing44 1954,2,2
  686. poring_s02,142,62,1 duplicate(#pacporing0) #2pacporing45 1954,2,2
  687. poring_s02,148,62,1 duplicate(#pacporing0) #2pacporing46 1954,2,2
  688. poring_s02,153,62,1 duplicate(#pacporing0) #2pacporing47 1954,2,2
  689. poring_s02,119,95,1 duplicate(#pacporing0) #2pacporing48 1954,2,2
  690. poring_s02,125,95,1 duplicate(#pacporing0) #2pacporing49 1954,2,2
  691. poring_s02,132,95,1 duplicate(#pacporing0) #2pacporing50 1954,2,2
  692. poring_s02,139,95,1 duplicate(#pacporing0) #2pacporing51 1954,2,2
  693. poring_s02,146,95,1 duplicate(#pacporing0) #2pacporing52 1954,2,2
  694. poring_s02,153,95,1 duplicate(#pacporing0) #2pacporing53 1954,2,2
  695. poring_s02,84,95,1 duplicate(#pacporing0) #2pacporing54 1954,2,2
  696. poring_s02,90,95,1 duplicate(#pacporing0) #2pacporing55 1954,2,2
  697. poring_s02,96,95,1 duplicate(#pacporing0) #2pacporing56 1954,2,2
  698. poring_s02,102,95,1 duplicate(#pacporing0) #2pacporing57 1954,2,2
  699. poring_s02,107,95,1 duplicate(#pacporing0) #2pacporing58 1954,2,2
  700. poring_s02,118,68,1 duplicate(#pacporing0) #2pacporing59 1954,2,2
  701. poring_s02,118,74,1 duplicate(#pacporing0) #2pacporing60 1954,2,2
  702. poring_s02,119,83,1 duplicate(#pacporing0) #2pacporing61 1954,2,2
  703. poring_s02,119,89,1 duplicate(#pacporing0) #2pacporing62 1954,2,2
  704. poring_s02,153,68,1 duplicate(#pacporing0) #2pacporing63 1954,2,2
  705. poring_s02,153,74,1 duplicate(#pacporing0) #2pacporing64 1954,2,2
  706. poring_s02,153,83,1 duplicate(#pacporing0) #2pacporing65 1954,2,2
  707. poring_s02,153,89,1 duplicate(#pacporing0) #2pacporing66 1954,2,2
  708. poring_s02,84,68,1 duplicate(#pacporing0) #2pacporing67 1954,2,2
  709. poring_s02,84,74,1 duplicate(#pacporing0) #2pacporing68 1954,2,2
  710. poring_s02,84,83,1 duplicate(#pacporing0) #2pacporing69 1954,2,2
  711. poring_s02,84,89,1 duplicate(#pacporing0) #2pacporing70 1954,2,2
  712. poring_s02,143,56,1 duplicate(#pacporing0) #2pacporing71 1954,2,2
  713. poring_s02,143,51,1 duplicate(#pacporing0) #2pacporing72 1954,2,2
  714. poring_s02,143,46,1 duplicate(#pacporing0) #2pacporing73 1954,2,2
  715. poring_s02,118,46,1 duplicate(#pacporing0) #2pacporing74 1954,2,2
  716. poring_s02,98,39,1 duplicate(#pacporing0) #2pacporing75 1954,2,2
  717. poring_s02,93,46,1 duplicate(#pacporing0) #2pacporing76 1954,2,2
  718. poring_s02,93,51,1 duplicate(#pacporing0) #2pacporing77 1954,2,2
  719. poring_s02,93,56,1 duplicate(#pacporing0) #2pacporing78 1954,2,2
  720. poring_s02,95,73,1 duplicate(#pacporing0) #2pacporing79 1954,2,2
  721. poring_s02,101,73,1 duplicate(#pacporing0) #2pacporing80 1954,2,2
  722. poring_s02,106,73,1 duplicate(#pacporing0) #2pacporing81 1954,2,2
  723. poring_s02,106,78,1 duplicate(#pacporing0) #2pacporing82 1954,2,2
  724. poring_s02,106,84,1 duplicate(#pacporing0) #2pacporing83 1954,2,2
  725. poring_s02,95,78,1 duplicate(#pacporing0) #2pacporing84 1954,2,2
  726. poring_s02,95,84,1 duplicate(#pacporing0) #2pacporing85 1954,2,2
  727. poring_s02,101,84,1 duplicate(#pacporing0) #2pacporing86 1954,2,2
  728. poring_s02,131,73,1 duplicate(#pacporing0) #2pacporing87 1954,2,2
  729. poring_s02,137,73,1 duplicate(#pacporing0) #2pacporing88 1954,2,2
  730. poring_s02,142,73,1 duplicate(#pacporing0) #2pacporing89 1954,2,2
  731. poring_s02,142,78,1 duplicate(#pacporing0) #2pacporing90 1954,2,2
  732. poring_s02,142,84,1 duplicate(#pacporing0) #2pacporing91 1954,2,2
  733. poring_s02,131,78,1 duplicate(#pacporing0) #2pacporing92 1954,2,2
  734. poring_s02,131,84,1 duplicate(#pacporing0) #2pacporing93 1954,2,2
  735. poring_s02,137,84,1 duplicate(#pacporing0) #2pacporing94 1954,2,2
  736. poring_s02,138,39,1 duplicate(#pacporing0) #2pacporing95 1954,2,2
  737. poring_s02,94,101,1 duplicate(#pacporing0) #2pacporing96 1954,2,2
  738. poring_s02,94,106,1 duplicate(#pacporing0) #2pacporing97 1954,2,2
  739. poring_s02,94,111,1 duplicate(#pacporing0) #2pacporing98 1954,2,2
  740. poring_s02,98,118,1 duplicate(#pacporing0) #2pacporing99 1954,2,2
  741. poring_s02,139,118,1 duplicate(#pacporing0) #2pacporing100 1954,2,2
  742. poring_s02,143,101,1 duplicate(#pacporing0) #2pacporing101 1954,2,2
  743. poring_s02,143,105,1 duplicate(#pacporing0) #2pacporing102 1954,2,2
  744. poring_s02,143,111,1 duplicate(#pacporing0) #2pacporing103 1954,2,2
  745.  
  746. poring_s03,104,26,1 duplicate(#pacporing0) #3pacporing1 1953,2,2
  747. poring_s03,109,26,1 duplicate(#pacporing0) #3pacporing2 1953,2,2
  748. poring_s03,115,26,1 duplicate(#pacporing0) #3pacporing3 1953,2,2
  749. poring_s03,121,26,1 duplicate(#pacporing0) #3pacporing4 1953,2,2
  750. poring_s03,127,26,1 duplicate(#pacporing0) #3pacporing5 1953,2,2
  751. poring_s03,133,26,1 duplicate(#pacporing0) #3pacporing6 1953,2,2
  752. poring_s03,104,51,1 duplicate(#pacporing0) #3pacporing7 1953,2,2
  753. poring_s03,109,51,1 duplicate(#pacporing0) #3pacporing8 1953,2,2
  754. poring_s03,115,51,1 duplicate(#pacporing0) #3pacporing9 1953,2,2
  755. poring_s03,121,51,1 duplicate(#pacporing0) #3pacporing10 1953,2,2
  756. poring_s03,127,51,1 duplicate(#pacporing0) #3pacporing11 1953,2,2
  757. poring_s03,133,51,1 duplicate(#pacporing0) #3pacporing12 1953,2,2
  758. poring_s03,104,45,1 duplicate(#pacporing0) #3pacporing13 1953,2,2
  759. poring_s03,104,39,1 duplicate(#pacporing0) #3pacporing14 1953,2,2
  760. poring_s03,104,33,1 duplicate(#pacporing0) #3pacporing15 1953,2,2
  761. poring_s03,133,45,1 duplicate(#pacporing0) #3pacporing16 1953,2,2
  762. poring_s03,133,39,1 duplicate(#pacporing0) #3pacporing17 1953,2,2
  763. poring_s03,133,33,1 duplicate(#pacporing0) #3pacporing18 1953,2,2
  764. poring_s03,104,106,1 duplicate(#pacporing0) #3pacporing19 1953,2,2
  765. poring_s03,109,106,1 duplicate(#pacporing0) #3pacporing20 1953,2,2
  766. poring_s03,115,106,1 duplicate(#pacporing0) #3pacporing21 1953,2,2
  767. poring_s03,121,106,1 duplicate(#pacporing0) #3pacporing22 1953,2,2
  768. poring_s03,127,106,1 duplicate(#pacporing0) #3pacporing23 1953,2,2
  769. poring_s03,133,106,1 duplicate(#pacporing0) #3pacporing24 1953,2,2
  770. poring_s03,104,131,1 duplicate(#pacporing0) #3pacporing25 1953,2,2
  771. poring_s03,109,131,1 duplicate(#pacporing0) #3pacporing26 1953,2,2
  772. poring_s03,115,131,1 duplicate(#pacporing0) #3pacporing27 1953,2,2
  773. poring_s03,121,131,1 duplicate(#pacporing0) #3pacporing28 1953,2,2
  774. poring_s03,127,131,1 duplicate(#pacporing0) #3pacporing29 1953,2,2
  775. poring_s03,133,131,1 duplicate(#pacporing0) #3pacporing30 1953,2,2
  776. poring_s03,104,125,1 duplicate(#pacporing0) #3pacporing31 1953,2,2
  777. poring_s03,104,119,1 duplicate(#pacporing0) #3pacporing32 1953,2,2
  778. poring_s03,104,113,1 duplicate(#pacporing0) #3pacporing33 1953,2,2
  779. poring_s03,133,125,1 duplicate(#pacporing0) #3pacporing34 1953,2,2
  780. poring_s03,133,119,1 duplicate(#pacporing0) #3pacporing35 1953,2,2
  781. poring_s03,133,113,1 duplicate(#pacporing0) #3pacporing36 1953,2,2
  782. poring_s03,84,62,1 duplicate(#pacporing0) #3pacporing37 1953,2,2
  783. poring_s03,91,62,1 duplicate(#pacporing0) #3pacporing38 1953,2,2
  784. poring_s03,97,62,1 duplicate(#pacporing0) #3pacporing39 1953,2,2
  785. poring_s03,104,62,1 duplicate(#pacporing0) #3pacporing40 1953,2,2
  786. poring_s03,111,62,1 duplicate(#pacporing0) #3pacporing41 1953,2,2
  787. poring_s03,118,62,1 duplicate(#pacporing0) #3pacporing42 1953,2,2
  788. poring_s03,130,62,1 duplicate(#pacporing0) #3pacporing43 1953,2,2
  789. poring_s03,136,62,1 duplicate(#pacporing0) #3pacporing44 1953,2,2
  790. poring_s03,142,62,1 duplicate(#pacporing0) #3pacporing45 1953,2,2
  791. poring_s03,148,62,1 duplicate(#pacporing0) #3pacporing46 1953,2,2
  792. poring_s03,153,62,1 duplicate(#pacporing0) #3pacporing47 1953,2,2
  793. poring_s03,119,95,1 duplicate(#pacporing0) #3pacporing48 1953,2,2
  794. poring_s03,125,95,1 duplicate(#pacporing0) #3pacporing49 1953,2,2
  795. poring_s03,132,95,1 duplicate(#pacporing0) #3pacporing50 1953,2,2
  796. poring_s03,139,95,1 duplicate(#pacporing0) #3pacporing51 1953,2,2
  797. poring_s03,146,95,1 duplicate(#pacporing0) #3pacporing52 1953,2,2
  798. poring_s03,153,95,1 duplicate(#pacporing0) #3pacporing53 1953,2,2
  799. poring_s03,84,95,1 duplicate(#pacporing0) #3pacporing54 1953,2,2
  800. poring_s03,90,95,1 duplicate(#pacporing0) #3pacporing55 1953,2,2
  801. poring_s03,96,95,1 duplicate(#pacporing0) #3pacporing56 1953,2,2
  802. poring_s03,102,95,1 duplicate(#pacporing0) #3pacporing57 1953,2,2
  803. poring_s03,107,95,1 duplicate(#pacporing0) #3pacporing58 1953,2,2
  804. poring_s03,118,68,1 duplicate(#pacporing0) #3pacporing59 1953,2,2
  805. poring_s03,118,74,1 duplicate(#pacporing0) #3pacporing60 1953,2,2
  806. poring_s03,119,83,1 duplicate(#pacporing0) #3pacporing61 1953,2,2
  807. poring_s03,119,89,1 duplicate(#pacporing0) #3pacporing62 1953,2,2
  808. poring_s03,153,68,1 duplicate(#pacporing0) #3pacporing63 1953,2,2
  809. poring_s03,153,74,1 duplicate(#pacporing0) #3pacporing64 1953,2,2
  810. poring_s03,153,83,1 duplicate(#pacporing0) #3pacporing65 1953,2,2
  811. poring_s03,153,89,1 duplicate(#pacporing0) #3pacporing66 1953,2,2
  812. poring_s03,84,68,1 duplicate(#pacporing0) #3pacporing67 1953,2,2
  813. poring_s03,84,74,1 duplicate(#pacporing0) #3pacporing68 1953,2,2
  814. poring_s03,84,83,1 duplicate(#pacporing0) #3pacporing69 1953,2,2
  815. poring_s03,84,89,1 duplicate(#pacporing0) #3pacporing70 1953,2,2
  816. poring_s03,143,56,1 duplicate(#pacporing0) #3pacporing71 1953,2,2
  817. poring_s03,143,51,1 duplicate(#pacporing0) #3pacporing72 1953,2,2
  818. poring_s03,143,46,1 duplicate(#pacporing0) #3pacporing73 1953,2,2
  819. poring_s03,118,46,1 duplicate(#pacporing0) #3pacporing74 1953,2,2
  820. poring_s03,98,39,1 duplicate(#pacporing0) #3pacporing75 1953,2,2
  821. poring_s03,93,46,1 duplicate(#pacporing0) #3pacporing76 1953,2,2
  822. poring_s03,93,51,1 duplicate(#pacporing0) #3pacporing77 1953,2,2
  823. poring_s03,93,56,1 duplicate(#pacporing0) #3pacporing78 1953,2,2
  824. poring_s03,95,73,1 duplicate(#pacporing0) #3pacporing79 1953,2,2
  825. poring_s03,101,73,1 duplicate(#pacporing0) #3pacporing80 1953,2,2
  826. poring_s03,106,73,1 duplicate(#pacporing0) #3pacporing81 1953,2,2
  827. poring_s03,106,78,1 duplicate(#pacporing0) #3pacporing82 1953,2,2
  828. poring_s03,106,84,1 duplicate(#pacporing0) #3pacporing83 1953,2,2
  829. poring_s03,95,78,1 duplicate(#pacporing0) #3pacporing84 1953,2,2
  830. poring_s03,95,84,1 duplicate(#pacporing0) #3pacporing85 1953,2,2
  831. poring_s03,101,84,1 duplicate(#pacporing0) #3pacporing86 1953,2,2
  832. poring_s03,131,73,1 duplicate(#pacporing0) #3pacporing87 1953,2,2
  833. poring_s03,137,73,1 duplicate(#pacporing0) #3pacporing88 1953,2,2
  834. poring_s03,142,73,1 duplicate(#pacporing0) #3pacporing89 1953,2,2
  835. poring_s03,142,78,1 duplicate(#pacporing0) #3pacporing90 1953,2,2
  836. poring_s03,142,84,1 duplicate(#pacporing0) #3pacporing91 1953,2,2
  837. poring_s03,131,78,1 duplicate(#pacporing0) #3pacporing92 1953,2,2
  838. poring_s03,131,84,1 duplicate(#pacporing0) #3pacporing93 1953,2,2
  839. poring_s03,137,84,1 duplicate(#pacporing0) #3pacporing94 1953,2,2
  840. poring_s03,138,39,1 duplicate(#pacporing0) #3pacporing95 1953,2,2
  841. poring_s03,94,101,1 duplicate(#pacporing0) #3pacporing96 1953,2,2
  842. poring_s03,94,106,1 duplicate(#pacporing0) #3pacporing97 1953,2,2
  843. poring_s03,94,111,1 duplicate(#pacporing0) #3pacporing98 1953,2,2
  844. poring_s03,98,118,1 duplicate(#pacporing0) #3pacporing99 1953,2,2
  845. poring_s03,139,118,1 duplicate(#pacporing0) #3pacporing100 1953,2,2
  846. poring_s03,143,101,1 duplicate(#pacporing0) #3pacporing101 1953,2,2
  847. poring_s03,143,105,1 duplicate(#pacporing0) #3pacporing102 1953,2,2
  848. poring_s03,143,111,1 duplicate(#pacporing0) #3pacporing103 1953,2,2
  849.  
  850. poring_s01 mapflag nopenalty
  851. poring_s01 mapflag nowarpto
  852. poring_s01 mapflag noteleport
  853. poring_s01 mapflag nosave
  854. poring_s01 mapflag pvp off
  855. poring_s01 mapflag noreturn
  856. poring_s01 mapflag nopenalty
  857. poring_s01 mapflag noskill
  858. poring_s01 mapflag nobranch
  859. poring_s01 mapflag noicewall
  860. poring_s01 mapflag leaves
  861.  
  862. poring_s02 mapflag nopenalty
  863. poring_s02 mapflag nowarpto
  864. poring_s02 mapflag noteleport
  865. poring_s02 mapflag nosave
  866. poring_s02 mapflag pvp off
  867. poring_s02 mapflag noreturn
  868. poring_s02 mapflag nopenalty
  869. poring_s02 mapflag noskill
  870. poring_s02 mapflag nobranch
  871. poring_s02 mapflag noicewall
  872. poring_s02 mapflag clouds
  873.  
  874. poring_s03 mapflag nopenalty
  875. poring_s03 mapflag nowarpto
  876. poring_s03 mapflag noteleport
  877. poring_s03 mapflag nosave
  878. poring_s03 mapflag pvp off
  879. poring_s03 mapflag noreturn
  880. poring_s03 mapflag nopenalty
  881. poring_s03 mapflag noskill
  882. poring_s03 mapflag nobranch
  883. poring_s03 mapflag noicewall
  884. poring_s03 mapflag fog
  885.  
  886.  
  887. prt_fild08,158,325,1 script Boing#pacporing 909,{
  888. mes "^BF0073[Boing]^000000";
  889. mes "Jellopies de gigantes! Cheio de Jellopies gigantes! Eu achei o paraíso dos Porings!";
  890. next;
  891. mes "^BF0073[Boing]^000000";
  892. mes "Mas há também monstros ... Monstros em toda parte! Iniciante, com grandes dentes afiados todos! Mesmo fantasmas!";
  893. next;
  894. mes "^BF0073[Boing]^000000";
  895. mes "Ah ... Se apenas um grande aventureiro como você pode ajudar-nos...";
  896. next;
  897. menu "Ficar aqui",L_rester,"Ir para PacPoring",-;
  898. warp "poring_s01",18,217;
  899. end;
  900.  
  901. L_rester:
  902. mes "^BF0073[Boing]^000000";
  903. mes "Meu jellopies... *snif*";
  904. close;
  905.  
  906. OnTimer20000:
  907. getmapxy(.@m$,.@x,.@y,1);
  908. set .@x,.@x+rand(0,6)-3;
  909. set .@y,.@y+rand(0,6)-3;
  910. if (!checkcell(.@m$,.@x,.@y,cell_chkpass)) goto OnTimer20000;
  911. npcwalkto .@x,.@y;
  912. if (!rand(15)) npctalk "Boing! Boing!";
  913. OnInit:
  914. initnpctimer;
  915. end;
  916.  
  917. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!