-
Posts
75 -
Joined
-
Last visited
Content Type
Profiles
Forums
Downloads
Jobs Available
Server Database
Third-Party Services
Top Guides
Store
Crowdfunding
Posts posted by sprdosat
-
-
Hi guys, These errors appeared when I updated rAthena. I am using the current rAthena.
///////////////////////////////////////////////////////////////////////// //---------------------------------------------------------------------// // MINING (EXPLOSION TYPE) // // AUTHOR: LIL TROLL//COLDFIRE // //---------------------------------------------------------------------// // RATHENA SCRIPT // //---------------------------------------------------------------------// // Version 1 // //---------------------------------------------------------------------// // Credits to: // // - Sir Emistry(For teaching me OnTouch) // // - Lesbie for requesting the script. // // FEATURES: // // - Set the configuration, run the script. // // - Player set the explosion and run for it! // // - Wait till the explosion off then grab the items. // // - NPC AutoHides after set of explosions. // // - Then add duplicates. // //---------------------------------------------------------------------// ///////////////////////////////////////////////////////////////////////// mina,192,64,0 script Usar Explosivos 4_crack,3,3,{ function Scatter_Debris; if(@ExplodedInFace == 2 ) end; for (.@i = 0; .@i < getarraysize(.Equips); .@i++){ if (!isequipped(.Equips[.@i])){ message strcharinfo(0), "Eu preciso equipar '"+ getitemname(.Equips[.@i]) +"' para minerar!"; .@Unequipped++; } } if (.@Unequipped){ message strcharinfo(0), .@Unequipped +" de "+ getarraysize(.Equips) +" o equipamento não foi usado."; end; } for (.@i = 0; .@i < getarraysize(.Explosives); .@i++){ if (countitem(.Explosives[.@i]) < .Amount[.@i]){ message strcharinfo(0), "I need to bring "+ .Amount[.@i] +" "+ getitemname(.Explosives[.@i]) +" explosives to mine!"; .@Gearless++; } } if (.@gearless){ if (getarraysize(.Explosives) > 1) .@Dialogue$ = "ferramentas foram"; else .@Dialogue$ = "ferramenta foi"; message strcharinfo(0), .@Gearless +" of "+ getarraysize(.Explosives) +" "+ .@Dialogue$ +" não trouxe."; end; } for (.@i = 0; .@i < getarraysize(.SFXS); .@i++) specialeffect .SFXS[.@i]; for (.@i = 0; .@i < getarraysize(.SFXS); .@i++) specialeffect2 .SFXS[.@i]; specialeffect2 950; progressbar "green",.Progress; specialeffect2 950; set @ExplodedInFace,2; for (.@i = 0; .@i < getarraysize(.Explosives); .@i++) { delitem .Explosives[.@i],.Amount[.@i]; } announce "Explosivos foram colocados, corra para bem longe da mina!! ...",bc_self; sleep2 1000; announce "5..",bc_self; sleep2 1000; announce "4..",bc_self; sleep2 1000; announce "3..",bc_self; sleep2 1000; announce "2..",bc_self; sleep2 1000; announce "1..",bc_self; set @ExplodedInFace,1; sleep2 1000; announce "Explosões Acontecendo!",bc_self; if(checkidle(strcharinfo(0))>=.Delay) { unitskilluseid getcharid(3),"NPC_SELFDESTRUCTION",1; announce "Você morreu na explosão!",bc_self; } Scatter_Debris; sleep2 1000; Scatter_Debris; sleep2 1000; Scatter_Debris; sleep2 1000; Scatter_Debris; sleep2 1000; Scatter_Debris; set @ExplodedInFace,0; announce "As explosões acabaram!",bc_self; hideonnpc strnpcinfo(0); set .@Random,rand(1,100); if(.@Random < .Chance) { for(set .@i,0; .@i<getarraysize(.Rewards); set .@i,.@i+1){ getmapxy(.@m$,.@x,.@y,1); set .@Rewards,.Rewards[rand(getarraysize(.Rewards))]; set .@Amount,.Amount[rand(getarraysize(.Amount))]; makeitem .@Rewards,.@Amount,.@m$,.@x+rand(-.ScatArea,.ScatArea),.@y+rand(-.ScatArea,.ScatArea); sleep2 .Hidetime*60000; hideoffnpc strnpcinfo(0); end; } } else { set @ExplodedInFace,0; sleep2 .Hidetime*60000; hideoffnpc strnpcinfo(0); end; } set @ExplodedInFace,0; function Scatter_Debris { getmapxy(.@m$,.@x,.@y,1); // DONT CHANGE THIS ONE. for (.@i = 0; .@i < getarraysize(.SFX); .@i++) specialeffect .SFX[.@i]; set .@Debris,$Debris[rand(getarraysize($Debris))]; set .@Scatter,$Scatter[rand(getarraysize($Scatter))]; makeitem .@Debris,.@Scatter,.@m$,.@x+rand(-.ScatArea,.ScatArea),.@y+rand(-.ScatArea,.ScatArea); return; } OnTouch: if(@ExplodedInFace==1){ specialeffect2 EF_SUI_EXPLOSION; unitskilluseid getcharid(3),"NPC_SELFDESTRUCTION",1; announce "Você morreu na explosão!",bc_self; set @ExplodedInFace,0; } end; OnInit: set .Chance,25; // MINING REWARD CHANCE IN %. setarray .Equips[0],5009,30472,30474; // CHANGE THIS TO MINING EQUIPMENTS. setarray .Explosives[0],30616,30617,30618; // CHANGE THIS TO MINING EXPLOSIVES(CREATE YOUR OWN ITEM ID FOR EXPLOSIVE). setarray .Amount[0],1,1,1; // EXPLOSIVES AMOUNT. setarray .Rewards[0],30098,7049,30634; // MINING REWARDS. setarray .RewAmou[0],1,2,3; // REWARDS AMOUNT. set .Progress,5; // TIME TO SET THE EXPLOSIVE ON MINE. set .HideTime,1; // MINE HIDES AFTER IT EXPLODE, APPEAR AGAIN TIME. IN MINUTES. setarray .Debris[0],7049,757,756,6077,1010,1011,984,985; // DEBRIS, STONES,ELUNIUM,ORIDECON,REFINE MATERIALS && ETC.. setarray .Scatter[0],1,2,3; // DEBRIS AMOUNT. setarray .ScatArea[0],1,2,3; // SCATTER AREA. setarray .SFXS[0],225,805,60; // MINING CAST setarray .SFX[0],44,100,4,18,53,65,960,965,967,901,730,722,585,32,907,810,941,563; // Mining Explosion. set .Delay,5; end; } mina,302,356,0 duplicate(Usar Explosivos) Usar Explosivos#2 4_crack mina,368,333,0 duplicate(Usar Explosivos) Usar Explosivos#3 4_crack mina,112,378,0 duplicate(Usar Explosivos) Usar Explosivos#4 4_crack mina,126,299,0 duplicate(Usar Explosivos) Usar Explosivos#5 4_crack mina,61,360,0 duplicate(Usar Explosivos) Usar Explosivos#6 4_crack mina,171,241,0 duplicate(Usar Explosivos) Usar Explosivos#7 4_crack mina,131,142,0 duplicate(Usar Explosivos) Usar Explosivos#8 4_crack mina,28,121,0 duplicate(Usar Explosivos) Usar Explosivos#9 4_crack mina,51,238,0 duplicate(Usar Explosivos) Usar Explosivos#10 4_crack mina,163,371,0 duplicate(Usar Explosivos) Usar Explosivos#11 4_crack mina,206,389,0 duplicate(Usar Explosivos) Usar Explosivos#12 4_crack mina,143,81,0 duplicate(Usar Explosivos) Usar Explosivos#17 4_crack mina,257,319,0 duplicate(Usar Explosivos) Usar Explosivos#18 4_crack mina2,92,92,0 duplicate(Usar Explosivos) Usar Explosivos#13 4_crack mina2,84,55,0 duplicate(Usar Explosivos) Usar Explosivos#14 4_crack mina2,30,79,0 duplicate(Usar Explosivos) Usar Explosivos#15 4_crack mina2,62,40,0 duplicate(Usar Explosivos) Usar Explosivos#16 4_crack
-
-
How does diff the most recent hexed?
-
where can i get this??
- 1
-
-
Hi @Mabuhay, When the event ends, the player does not receive the prize.
-
On 7/12/2019 at 7:54 PM, Quesooo said:
for this error you will be stocked when you choose level 175
Hello, @llchrisll I also have this same problem and when we leave the instance, this error happens.
-
@Naruto zackdreaver/ROenglishRE , hexed 2018-06-20. I'm using this .
-
-
-
-
-
Copy all the contents of the import-tmpl folder that you upgraded to the import folder. It worked for me.
- 2
-
Solved, Thanks.
-
Hi guys. After I updated rAthena to the latest version, this error appeared in the script, can anyone help me?
-
-
Amazing!
-
-
-
Hi, after I updated rAthena, these messages started appearing. Can someone help me? Thx
Note: script: iRO Bounty Board
Spoiler//===== EinherjarRO Scripts ==================================
//= Bounty Board
//===== By: ==================================================
//= Stolao
//===== Current Version: =====================================
//= 1.0
//===== Compatible With: =====================================
//= rAthena SVN
//===== Description: =========================================
//= iRO Bounty Board
//===== Comments: ============================================
//= [Stolao]
//= http://irowiki.org/wiki/Bounty_Board_Quests
//= Uses custom text, provide official if you want
//===== Additional Comments: =================================
//= 1.0 First Released
//===== Contact Ifo: =========================================
//= [Stolao]
//= Email: [email protected]
//============================================================function script F_BBQ {
explode(.@M$,getarg(2),","); explode(.@B$,getarg(3),","); explode(.@J$,getarg(4),",");
for(.@i = 0; .@i < getarraysize(.@M$); .@i++){
.@MobIds[.@i] = atoi(.@M$[.@i]);
.@BaseExp[.@i] = atoi(.@B$[.@i]);
.@JobExp[.@i] = atoi(.@J$[.@i]);
}
mes "[ Missões de Caça ]";
mes "O que você gostaria de caçar?";
.@Menu$ = "";
for(.@i = 0; .@i < getarraysize(.@MobIds); .@i++){
.@Menu$ = .@Menu$ + ((!Target[.@MobIds[.@i] - 1000])?""+strmobinfo(1,.@MobIds[.@i])+":":":");
if(Target[.@MobIds[.@i] - 1000] > 100) .@c++;
}
if(.@c) .@Menu$ = .@Menu$ + "^00AA00Quest Completa^000000";
.@s = select(.@Menu$) - 1;
if(.@s >= getarraysize(.@MobIds)){
for(.@i = 0; .@i < getarraysize(.@MobIds); .@i++){
if(Target[.@MobIds[.@i] - 1000] > 100){
.@Jexp += .@JobExp[.@i];
.@Bexp += .@BaseExp[.@i];
.@c++;
Target[.@MobIds[.@i] - 1000] = 0;
}
}
if(vip_status(1))
switch(prompt("Both "+.@Bexp+"/"+.@Jexp+":Only Base "+(.@Bexp+.@Jexp)+":Only Job"+(.@Bexp+.@Jexp)+"")){
case 3:
.@Jexp += .@Bexp;
.@Bexp = 0;
break;
case 2:
.@Bexp += .@Jexp;
.@Jexp = 0;
default:
break;
}
getexp .@Bexp,.@Jexp;
if(.@c >= getarraysize(.@MobIds)) getitem (checkre(0)?6495:501),1;
} else {
if(BaseLevel < getarg(0))
mes "Seu nível é muito baixo, voltar quando for mais forte o suficiente.";
else if(BaseLevel > getarg(1))
mes "Seu nível está muito acima para essa missão .";
else {
mes "Mate 100 "+strmobinfo(1,.@MobIds[.@s]);
Target[.@MobIds[.@s] - 1000] = 1;
}
}
close;
}prontera,146,156,5 script Missões de Caça 1-20#prt1 837,{
callfunc "F_BBQ",.Levels[0], .Levels[1], .MobIds$, .BaseExp$, .JobExp$;
OnInit:
setarray .Levels, 1,20;
.MobIds$ = "1010,1014,1025";
.BaseExp$ = "50678,67678,67678";
.JobExp$ = "5175,9675,9675";
end;
OnNPCKillEvent:
.@kid = killedrid;
if(Target[.@kid - 1000])
if(!getcharid(1) && Target[.@kid - 1000]){
Target[.@kid - 1000] += 1;
dispbottom "[ Quest Boards ]: "+(Target[.@kid - 1000] - 1)+"/100 "+strmobinfo(1,.@kid)+" slain.",0xCC00CC;
} else {
getmapxy(.@map1$,.@x1,.@y1,0);
getpartymember getcharid(1),1;
getpartymember getcharid(1),2;
for(set .@j, 0; .@j < $@partymembercount; .@j++){
if(isloggedin($@partymemberaid[.@j], $@partymembercid[.@j])){
if(attachrid($@partymemberaid[.@j])){
if(Target[.@kid - 1000] && HP > 0){
getmapxy(.@map2$,.@x2,.@y2,0);
if(.@map1$ == .@map2$ && distance(.@x1,.@y1,.@x2,.@y2) < 20){
Target[.@kid - 1000] += 1;
dispbottom "[ Quest Boards ]: "+(Target[.@kid - 1000] - 1)+"/100 "+strmobinfo(1,.@kid)+" slain.",0xCC00CC;
}
}
}
}
}
}
end;
}prontera,146,153,5 script Missões de Caça 1-20#prt 837,{
callfunc "F_BBQ",.Levels[0], .Levels[1], .MobIds$, .BaseExp$, .JobExp$;
OnInit:
setarray .Levels, 1,20;
.MobIds$ = "1063,1002,1012,1052,1167,1048,1094,1004";
.BaseExp$ = "50678,55678,55678,65678,65678,68678,61678,67678";
.JobExp$ = "3900,6750,7650,8325,7650,15975,9675,9675";
}prontera,165,172,5 script Missões de Caça 21-50#prt 837,{
callfunc "F_BBQ",.Levels[0], .Levels[1], .MobIds$, .BaseExp$, .JobExp$;
OnInit:
setarray .Levels, 21,50;
.MobIds$ = "1051,1175,1174,1019,1104,1105,1053,1054,1031,1033,1055";
.BaseExp$ = "80678,90678,90678,120678,150678,320678,220678,220678,250678,280678,110678";
.JobExp$ = "15975,17100,15975,20475,34200,34200,22725,25200,25200,29475,27337";
}prontera,165,169,5 script Missões de Caça 41-70#prt 837,{
callfunc "F_BBQ",.Levels[0], .Levels[1], .MobIds$, .BaseExp$, .JobExp$;
OnInit:
setarray .Levels, 41,70;
.MobIds$ = "1138,1100,1494,1166";
.BaseExp$ = "449500,440500,550625,664350";
.JobExp$ = "55575,45450,56925,72450";
}prontera,165,166,5 script Missões de Caça 61-100#prt 837,{
callfunc "F_BBQ",.Levels[0], .Levels[1], .MobIds$, .BaseExp$, .JobExp$;
OnInit:
setarray .Levels, 61,100;
.MobIds$ = "1380,1035,1139,1037,1099";
.BaseExp$ = "866825,2066825,3066825,5162000,9291125";
.JobExp$ = "75150,76500,75263,182250,102600";
}aretnorp,229,132,3 script Missões de Caça 81-100#nib 837,{
callfunc "F_BBQ",.Levels[0], .Levels[1], .MobIds$, .BaseExp$, .JobExp$;
OnInit:
setarray .Levels, 81,100;
.MobIds$ = "1613,1162,1215,1692,1627,"; //In Official is set to '??' so i just add '1' as dummy just create your own custom BaseEXP and JobEXP.
.BaseExp$ = "43291125,36291125,36291125,42291125,30291125";
.JobExp$ = "148050,148050,136575,136575,213975";
}aretnorp,229,129,3 script Missões de Caça 90-120#nib 837,{
callfunc "F_BBQ",.Levels[0], .Levels[1], .MobIds$, .BaseExp$, .JobExp$;
OnInit:
setarray .Levels, 90,120;
.MobIds$ = "1109,1143,1192,1198,1253,1156,1155,1117,1263";
.BaseExp$ = "69291125,48291125,48291125,75291125,49291125,48291125,60291125,62291125,40291125";
.JobExp$ = "243675,225900,133875,187425,160275,133850,148050,144000,150075";
}aretnorp,229,126,3 script Missões de Caça 110-150#nib 837,{
callfunc "F_BBQ",.Levels[0], .Levels[1], .MobIds$, .BaseExp$, .JobExp$;
OnInit:
setarray .Levels,110,150;
.MobIds$ = "1267,1310,1208,1207,1194,1163,1132,1206,1371,1390,1292";
.BaseExp$ = "90000000,90000000,92211280,90000000,90000000,93100320,95000000,90000000,90000000,94110000,90000000";
.JobExp$ = "250000,250000,277425,250000,250000,233550,241425,250000,250000,241425,250000";
}aretnorp,229,123,3 script Missões de Caça 121-160#nib 837,{
callfunc "F_BBQ",.Levels[0], .Levels[1], .MobIds$, .BaseExp$, .JobExp$;
OnInit:
setarray .Levels, 121,160;
.MobIds$ = "1714,1717,1752,1753,1716,1713";
.BaseExp$ = "394424350,397424350,398424350,390424350,390824350,390824350";
.JobExp$ = "336262,336262,386775,402412,381262,381262";
}aretnorp,210,129,3 script Missões de Caça 131-175#nib 837,{
callfunc "F_BBQ",.Levels[0], .Levels[1], .MobIds$, .BaseExp$, .JobExp$;
OnInit:
setarray .Levels, 131,175;
.MobIds$ = "2083,2084,2085,2086";
.BaseExp$ = "494424350,555506250,665546750,668546750";
.JobExp$ = "3451237,511762,591187,674437";
}aretnorp,210,132,3 script Missões de Caça 121-175#nib 837,{
callfunc "F_BBQ",.Levels[0], .Levels[1], .MobIds$, .BaseExp$, .JobExp$;
OnInit:
setarray .Levels, 121,175;
.MobIds$ = "1682,1657,1655,1654,1653,1656,1652";
.BaseExp$ = "444424350,442506250,551546750,551550575,552573075,552573975,553588510";
.JobExp$ = "318150,503550,511200,552150,531000,481050,501750";
}aretnorp,210,126,3 script Missões de Caça 140-175#nib 837,{
callfunc "F_BBQ",.Levels[0], .Levels[1], .MobIds$, .BaseExp$, .JobExp$;
OnInit:
setarray .Levels, 140,175;
.MobIds$ = "2479,2478,2917,2616,2919";
.BaseExp$ = "666622800,441181250,441690425,441675575,331321650";
.JobExp$ = "529650,1782000,1902825,1576125,1489050";
}aretnorp,210,123,3 script Missões de Caça 141-175#nib 837,{
callfunc "F_BBQ",.Levels[0], .Levels[1], .MobIds$, .BaseExp$, .JobExp$;
OnInit:
setarray .Levels, 141,175;
.MobIds$ = "2137,2136,2365,2363,2364,2133,2366,2368,2367,2369,2370";
.BaseExp$ = "441516950,448437500,448006620,224668750,224565250,448763750,448128120,337954870,448085370,448101120,448115750";
.JobExp$ = "708750,731250,848137,461812,378,112,789750,871650,862762,846562,892800,811575";}
aretnorp,187,222,3 script Missões de Caça 180-210#nib 837,{
callfunc "F_BBQ",.Levels[0], .Levels[1], .MobIds$, .BaseExp$, .JobExp$;
OnInit:
setarray .Levels, 180,220;
.MobIds$ = "1639,1637,1638,1635,1634,1636,2227,2223,2226,2225,2224,2222,2221";
.BaseExp$ = "3111516950,3111736100,3111863225,3111880325,3111996987,3111918687,6011799325,6012486925,6012496600,6012729925,6012889450,6012969550,6013641175";
.JobExp$ = "1997550,1738912,1861312,1993162,2010825,2022525,1490400,2139300,2286225,2276100,2228625,2596500,2706075";
}aretnorp,190,218,3 script Missões de Caça 220-240#nib 837,{
callfunc "F_BBQ",.Levels[0], .Levels[1], .MobIds$, .BaseExp$, .JobExp$;
OnInit:
setarray .Levels, 220,240;
.MobIds$ = "1870,1777,1833,1918",
.BaseExp$ = "82011799325,82011799325,82011799325,82011799325",
.JobExp$ = "2738912,2861312,2993162,3010825",
}aretnorp,194,215,3 script Missões de Caça 230-255#nib 837,{
callfunc "F_BBQ",.Levels[0], .Levels[1], .MobIds$, .BaseExp$, .JobExp$;
OnInit:
setarray .Levels, 230,255;
.MobIds$ = "3727,3728,3729,3730,3731,3732,3733,3734,3735,3736,3737,3738,3739";
.BaseExp$ = "842011799325,842011799325,842011799325,842011799325,842011799325,842011799325,12442011799325,12442011799325,12442011799325,12442011799325,12442011799325,12442011799325,12442011799325";
.JobExp$ = "4997550,4738912,4861312,4993162,6010825,6022525,4490400,6139300,6286225,6276100,6228625,6596500,6706075";
}
-
@llchrisllCould you help me how to fix the script? Thx
-
-
-
problem in the script (explosive_mining)
in Scripting Support
Posted
Solved. Thanks man @Emistry