-
Posts
815 -
Joined
-
Last visited
-
Days Won
1
Content Type
Profiles
Forums
Downloads
Jobs Available
Server Database
Third-Party Services
Top Guides
Store
Everything posted by Mootie
-
so yeah how bout the its still the same problem mapindex_name2id: map "anymapname" not found in index list as emistry said just put OnInit set .Map$,"anymapname"; still having error i also try to put another item on itemID it seems i can only get 1 item per special poring OnInit: //---- NPC Config ----- set .ItemID,7960; set .ItemID,7539; set .SpecialPorings,50; set .NormalPorings,100; set .Map$,"anymapname"; another error shows when the event ends after the event ends the nxt event didnt start as well after that error shows
-
Request for poring points exchanger vice versa
Mootie replied to Mootie's question in Script Requests
awesome!!! lol ... if everyone made script standard like this one, member no need ask anymore xD know how to compatible this in RA http://rathena.org/board/topic/73838-is-this-compatible-in-ra/ lol ... if everyone made script standard like this one, member no need ask anymore xD know how to compatible this in RA http://rathena.org/b...mpatible-in-ra/ hi annieruru .i have a little question about the script how i can edit the points to valuable amount? example i have 50 poring points and the platinum coin is 100 points -
i already add the OnInit: //---- NPC Config ----- set .ItemID,7960; set .SpecialPorings,50; set .NormalPorings,100; set .Map$,"anymapname"; its still the same problem mapindex_name2id: map "anymapname" not found in index list
-
//===== rAthena Script ======================================= //= Poring Summoner //===== By: ================================================== //= Bahmut (Made it automated) //= MoonlightRO (Original) //===== Current Version: ===================================== //= 1.4 //===== Compatible With: ===================================== //= TXT & SQL //===== Link to orginal: ===================================== //= [url="http://www.eathena.ws/board/index.php?showtopic=236779"]http://www.eathena.w...howtopic=236779[/url] //============================================================ - script Poring Summoner -1,{ OnInit: //---- NPC Config ----- set .ItemID,7960; set .SpecialPorings,50; set .NormalPorings,100; //--------------------- initnpctimer; end; OnSpecialKill: set .SpecialPorings[1],.SpecialPorings[1]-1; announce strcharinfo(0) + " got a " + getitemname(.ItemID) + "!",bc_map; getitem .ItemID,1; goto PoringCount; OnNormalKill: set .NormalPorings[1],.NormalPorings[1]-1; goto PoringCount; PoringCount: announce "Special Poring: " + .SpecialPorings[1] + " || Normal Poring: " + .NormalPorings[1],bc_map; if(!.SpecialPorings[1]) goto EndEvent; end; OnTimer17: RestartEvent: killmonster .Map$,"All"; set .Event,0; set .SpecialPorings[1],0; set .NormalPorings[1],0; removemapflag .Map$,mf_noskill; set $@ran, rand(1,10); if ($@ran == 10) set .Map$,"lighthalzen"; if ($@ran == 9) set .Map$,"louyang"; if ($@ran == 8) set .Map$,"comodo"; if ($@ran == 7) set .Map$,"xmas"; if ($@ran == 6) set .Map$,"aldebaran"; if ($@ran == 5) set .Map$,"izlude"; if ($@ran == 4) set .Map$,"payon"; if ($@ran == 3) set .Map$,"geffen"; if ($@ran == 2) set .Map$,"morocc"; if ($@ran == 1) set .Map$,"prontera"; setmapflag .Map$,mf_noskill; monster .Map$,0,0,"Poring",1002,.SpecialPorings,"Poring Summoner::OnSpecialKill"; monster .Map$,0,0,"Poring",1002,.NormalPorings,"Poring Summoner::OnNormalKill"; set .SpecialPorings[1],.SpecialPorings; set .NormalPorings[1[attachment=4361:Untitled.png]],.NormalPorings; announce "The Poring Event has begun!",bc_all; announce "Location: " + .Map$,bc_all; announce "Special Poring: " + .SpecialPorings,bc_all; announce "Normal Poring: " + .NormalPorings,bc_all; setnpctimer 0; end; }
-
no there is no error at all and i already put ontimer to 0 so once i restart the server the automated event will start nothing happen and no error
-
//===== rAthena Script ======================================= //= Poring Summoner //===== By: ================================================== //= Bahmut (Made it automated) //= MoonlightRO (Original) //===== Current Version: ===================================== //= 1.4 //===== Compatible With: ===================================== //= TXT & SQL //===== Link to orginal: ===================================== //= http://www.eathena.ws/board/index.php?showtopic=236779 //============================================================ - script Poring Summoner -1,{ OnInit: //---- NPC Config ----- set .ItemID,1000; set .SpecialPorings,2; set .NormalPorings,2; //--------------------- initnpctimer; end; OnSpecialKill: set .SpecialPorings[1],.SpecialPorings[1]-1; announce strcharinfo(0) + " got a " + getitemname(.ItemID) + "!",bc_map; getitem .ItemID,1; goto PoringCount; OnNormalKill: set .NormalPorings[1],.NormalPorings[1]-1; goto PoringCount; PoringCount: announce "Special Poring: " + .SpecialPorings[1] + " || Normal Poring: " + .NormalPorings[1],bc_map; if(!.SpecialPorings[1]) goto EndEvent; end; OnTimer216000000: RestartEvent: killmonster .Map$,"All"; set .Event,0; set .SpecialPorings[1],0; set .NormalPorings[1],0; removemapflag .Map$,mf_noskill; set $@ran, rand(1,10); if ($@ran == 10) set .Map$,"lighthalzen"; if ($@ran == 9) set .Map$,"louyang"; if ($@ran == 8) set .Map$,"comodo"; if ($@ran == 7) set .Map$,"xmas"; if ($@ran == 6) set .Map$,"aldebaran"; if ($@ran == 5) set .Map$,"izlude"; if ($@ran == 4) set .Map$,"payon"; if ($@ran == 3) set .Map$,"geffen"; if ($@ran == 2) set .Map$,"morocc"; if ($@ran == 1) set .Map$,"prontera"; setmapflag .Map$,mf_noskill; monster .Map$,0,0,"Poring",1002,.SpecialPorings,"Poring Summoner::OnSpecialKill"; monster .Map$,0,0,"Poring",1002,.NormalPorings,"Poring Summoner::OnNormalKill"; set .SpecialPorings[1],.SpecialPorings; set .NormalPorings[1],.NormalPorings; announce "The Poring Event has begun!",bc_all; announce "Location: " + .Map$,bc_all; announce "Special Poring: " + .SpecialPorings,bc_all; announce "Normal Poring: " + .NormalPorings,bc_all; setnpctimer 0; end; } if not can you guys help me to make this RA
-
i follow ur guide and the mapserver says error invalid group id 63
-
{ getitem groupranditem(IG_CardAlbum),1; } how i can set the randomize cards for mvp? should i go for mvp.txt or something?
-
/*====================================================================================*/ /*==============================Monster Invasion Event================================*/ /*====================================================================================*/ /*==============================By:Night Terror=======================================*/ /*====================================================================================*/ /*===Inspired by: Automated MVP Event by xMachina / Acetito and Emistry===============*/ /*====================================================================================*/ /*=== v0.9 ================================================English Version============*/ function script F_IsMapValid { //Check if Map is set if(getarg(0)!="") return "["+getarg(0)+"]"; else return ""; } function script F_IsItemValid { //Check if Item is set if(getarg(0)!=0) return "["+getitemname(getarg(0))+" x "+$@Amount+"]"; else return ""; } function script F_IsMobValid { //Check if Monster is set if(getarg(0)!=0) return "["+getmonsterinfo(getarg(0),0) + " x " +getarg(1)+"]"; else return ""; } function script F_ChooseMob { //Monster & Monster amount list switch(select("Weaker Monsters:Stronger Monsters")){ Case 1: set @Monsters[getarg(0)],$@Monsteridstrong[select("Arclouse:Baba Yaga:Baby Leopard:Baphomet Jr.:Bloody Butterfly:Dark Frame:Dragon Tail:Evil Cloud Hermit:Giant Whisper:Grand Peco:Greatest General:High Orc:Hill Wind:Hyegun:Hylozoist:Li Me Mang Ryang / Jing Guai:Live Peach Tree / Enchanted Peach Tree:Marine Sphere:Miyabi Ningyo / Miyabi Doll:Myst Case:Nereid:Orc Archer:Orc Baby:Raydric Archer:Remover:Sea Otter:Side Winder:Stone Shooter:Wanderer:Wind Ghost:Wooden Golem")]; break; Case 2: set @Monsters[getarg(0)],$@Monsteridweak[select("Am Mut:Ancient Mummy:Firelock Soldier:Armeyer Dinze:Bloody Knight:Bloody Murderer:Bow Guardian:Cat o' Nine Tails:Dark Illusion:Eremes Guile:Errende Ebecee:Howard Alt-Eisen:Ice Titan:Imp:Kavach Icarus:Knight of Abyss:Loli Ruri:Margaretha Sorin:Mutant Dragonoid:Observation:Owl Duke:Ragged Zombie:Laurell Weinder:Retribution:Sword Guardian:The Paper:Tirfing/Ogretooth:Wickebine Tres:Wicked Nymph:Zealotus:Zombie Prisoner")]; break; } for (set @i,0; @i < 7; set @i,@i+1) { //Check if Monster is already chosen if (@Monsters[getarg(0)]==@Monsters[@i] && @i!=getarg(0)){ //Clean Monster from list if Monster is already chosen set @Monsters[getarg(0)],0; } } input @MobAmount[getarg(0)],20,300; return 0; } function script F_ClearGarbagez { //Clean previous inputs cleararray @Monsters,0,7; cleararray @MobAmount,0,7; set $@ItemID,0; set $@Map$,"prontera"; return 0; } prontera,139,173,5 script Monster Invasion Helper::MonsterInvasion 402,{ //define monsterlist and itemlist setarray $@Monsteridweak[1],1301,1297,1403,1654,1268,1507,1830,1307,1302,1635,1655,1636,1777,1837,1656,1219,1502,1637,1262,1700,1320,1865,1657,1702,1829,1375,1204,1653,1416,1200,1197; setarray $@Monsteridstrong[1],1194,1882,1415,1101,1408,1260,1321,1412,1186,1369,1277,1213,1680,1512,1510,1517,1410,1142,1404,1249,1255,1189,1686,1276,1682,1323,1037,1495,1208,1236,1497; setarray $@Healitem[1],521,12321,505,548,547,12123,12299,12320,12016,607; setarray $@Useableitem[1],662,12354,12257,12704,14598,12212,12135,14607,12268,12128,12266,12310,14601,12019,7960; if(getgmlevel() < 20) //check if GM Lvl is high enough warp "prontera",156,184; if($@Event!=0){ //Check if Event is already running mes "[ ^0C66C0Event Helper^000000 ]"; mes "Event is already running!"; close; } set $@Map$,"prontera"; //default map=prontera while(1) { mes "[ ^0C66C0Event Helper^000000 ]"; mes "Please choose your parameters."; next; switch(select("Item "+callfunc("F_IsItemValid",$@ItemID)+":Map " +callfunc("F_IsMapValid",$@Map$)+":Monster:Clear current values:Start Event!")){ Case 1: mes "[ ^0C66C0Event Helper^000000 ]"; mes "The reward for the top 10 killers."; mes "The player with the most kills gets the amount of items you choose, the following ranks get 10% less per rank."; next; message strcharinfo(0),"Please choose the item!"; switch(select("RMS Healing Items:RMS Useable Items")){ //Item & Item amount list, sorted like rms does Case 1: set $@ItemID,$@Healitem[select("Aloe Leaflet:Arunafeltz Desert Sandwich:Blue Potion:Cheese:White Slim Potion:Honey Pastry:Status Resist Potion:Poison Bottle:Schwartzwald Pine Jubilee:Speed Potion:Yggdrasil Berry")]; break; Case 2: set $@ItemID,$@Useableitem[select("Authoritative Badge:Buche De Noel:Cold Medicine:Elixir of Life:Ghostring Scroll:Giant Fly Wing:Green Ale:Luxurious Western Food:Rainbow Cake:Royal Cooking Kit:Sesame Pastry:Spray Of Flowers:Tyr's Blessing:Holy Egg")]; break; } mes "[ ^0C66C0Event Helper^000000 ]"; mes "Choose the desired amount, 1 is the minimum, 100 the maximum."; next; input $@Amount,1,100; break; Case 2: mes "[ ^0C66C0Event Helper^000000 ]"; mes "Please choose your desired map!"; mes "Obviously, the map has to be valid."; next; do{ //Loop to ensure valid map input $@Map$;}while(getmapmobs($@Map$) == -1 ); break; Case 3: mes "[ ^0C66C0Event Helper^000000 ]"; mes "Which monster do you want to spawn?"; mes "You can spawn 7 different monsters."; mes "Minimum monster amount is 20, maximum is 300"; next; mes "[ ^0C66C0Event Helper^000000 ]"; mes "Please choose the desired monster and the desired amount."; next; //Stay in menu until player has chosen all monsters he wants while(1){ set @ChosenPlace,select("Mob 1 - "+callfunc("F_IsMobValid",@Monsters[0],@MobAmount[0])+":Mob 2 - "+callfunc("F_IsMobValid",@Monsters[1],@MobAmount[1])+":Mob 3 - "+callfunc("F_IsMobValid",@Monsters[2],@MobAmount[2])+":Mob 4 - "+callfunc("F_IsMobValid",@Monsters[3],@MobAmount[3])+":Mob 5 - "+callfunc("F_IsMobValid",@Monsters[4],@MobAmount[4])+":Mob 6 - "+callfunc("F_IsMobValid",@Monsters[5],@MobAmount[5])+":Mob 7 - "+callfunc("F_IsMobValid",@Monsters[6],@MobAmount[6])+":No more monsters.")-1; if(@ChosenPlace>6) break; callfunc("F_ChooseMob",@ChosenPlace); } break; Case 4: callfunc("F_ClearGarbagez"); break; Case 5: if( $@Map$ == "" || @Monsters[0] == 0){ //Check if Map and Monsters are set mes "[ ^0C66C0Event Helper^000000 ]"; mes "Please check your parameters."; next; break; } setarray $@randnum[0],rand(30,60),rand(200,300),rand(450,500),rand(900,1000); mes "[ ^0C66C0Event Helper^000000 ]"; mes "The Event has been started!"; set $@Event,1; close2; announce "Monsters have been sighted at "+$@Map$+"! Keep pushing them back!",bc_all,0xFFFF86; if ($@ItemID != 0) announce "The reward for the best killer will be "+$@Amount+" x "+getitemname($@ItemID)+". Subsequent killers receive 10% less per rank until rank 10." ,bc_all,0xFFFF86; sleep2 2500; announce "The following monsters have been sighted:",bc_all,0xB7D2E9; sleep2 1000; for (set @i,0; @i < 7; set @i,@i+1){ //Spawn Monsters and announce them if(@Monsters[@i]!=0){ announce getmonsterinfo(@Monsters[@i],0)+" x "+@MobAmount[@i],bc_all,0xB7D2E9; monster $@Map$,0,0,"--ja--",@Monsters[@i],@MobAmount[@i],strnpcinfo(3)+"::OnMobKill"; } } end; } } OnMobKill: if (mobcount($@Map$,strnpcinfo(3)+"::OnMobKill") <= $@randnum[0] && mobcount($@Map$,strnpcinfo(3)+"::OnMobKill") > 5 || mobcount($@Map$,strnpcinfo(3)+"::OnMobKill") == $@randnum[1] || mobcount($@Map$,strnpcinfo(3)+"::OnMobKill") == $@randnum[2] || mobcount($@Map$,strnpcinfo(3)+"::OnMobKill") == $@randnum[3]) announce "Only "+mobcount($@Map$,strnpcinfo(3)+"::OnMobKill")+" Monsters left to kill.",bc_all,0xFFFF46; //announce remaining monsters for(set @i,0; @i < 127; set @i,@i+1){ //Register the killer and add points if($@killer$[@i] == ""){ for (set @j,0; @j < 127; set @j,@j+1){ if($@killer$[@i]==$@killer$[@j] && $@killer$[@i]!= "") goto Nameexists; } set $@killer$[@i],strcharinfo(0); set $@kills[@i],$@kills[@i]+1; break; } else if($@killer$[@i] == strcharinfo(0)){ Nameexists: set $@kills[@i],$@kills[@i]+1; break; } } if(mobcount($@Map$,strnpcinfo(3)+"::OnMobKill") <=5){ //If 5 or less mobs remain: kill all mobs, bubblesort the top 15 killers,announce the top 15 killers and give items (if set) to the Top 10. killmonster $@Map$,"All"; announce "Most of the monsters have been defeated!",bc_all,0xFFFF46; sleep2 2000; announce "Our local guards managed to fend the remaining monsters off.",bc_all,0xFFFF46; sleep2 2000; announce "Let's look at the results:",bc_all,0xFFFF46; sleep2 1000; for (set @i,0; @i < 15; set @i,@i+1){ //Do the Bubblesort for (set @j,0; @j < 15; set @j,@j+1){ if ($@kills[@j] < $@kills[@j+1]){ set @tmpkills, $@kills[@j+1]; set @tmpkillers$, $@killer$[@j+1]; set $@kills[@j+1], $@kills[@j]; set $@killer$[@j+1],$@killer$[@j]; set $@kills[@j], @tmpkills; set $@killer$[@j], @tmpkillers$; } } } for(set @i,0; @i < 15; set @i,@i+1){ //Announce Top 15 if($@killer$[@i] != "") announce @i+1+". Place: "+$@killer$[@i]+" with "+$@kills[@i]+" Monsters killed.",bc_all,0xB7D2E9; } if ($@ItemID != 0){ //Give item if set, 10% less per rank for(set @i,0; @i < 10; set @i,@i+1){ if ($@killer$[@i]!=""){ getitem $@ItemID,$@Amount-$@Amount*@i/10,getcharid(3,$@killer$[@i]); } } } logmes "Monster Invasion complete, the Top 1 Killer is " + $@killer$[0] + " with "+$@kills[0]+ " Kills. The reward was " +getitemname($@ItemID)+ " x "+$@Amount+". This was the "+$Invasioncount+". custom Monster Invasion."; set $Invasioncount,$Invasioncount+1; //Clear variables cleararray $@kills[0],0,200; cleararray $@killer$[0],"",200; cleararray $@flag[0],0,10; set $@Event,0; } }
-
Request for poring points exchanger vice versa
Mootie replied to Mootie's question in Script Requests
I hope what you posted isn't actually the script you created.... Because there isn't a single command in there.... yeah there is no command and no codes cause i already coded a messed one so i request for the new codes for this discription of npc -
As the tittle on the topic says Hi " Players " i can exchange your poring points for item Next you have " 0 " points. You've killed a total of " 0 " porings. What would you like to exchange for? Next dye coupon - 50 gold coin - 125 hat box - 225 MVP Card Album - 225 premium Dye coupon - 250 Platinum Coins - 475 Are you sure you would like to exchange 50 points for a dye coupon? Yes,NO you dont have enough poring points for this item. Come back some other times. i did my fail script into this i tryed emistry poring coins and i messed the codes badly o.o
-
last request for this thank you Increases effectiveness of your ^008800Heal, Sanctuary and Potion Pitcher^000000 by 20%. Further increases the effectiveness of ^008800Heal, Sanctuary and Potion Pitcher^000000 by 2% per refine rate.
-
what about the inflicted? is that demihuman?
-
i will try to learn bymyself when i needed ill call you o.o i've search on the link that you gave me and it look like i cant find inflicted Increases Physical damage inflicted on all enemies by 10% bonus2 bAddRace,RC_NonBoss,10; bonus2 bAddRace,RC_Boss,10 correct? Use this instead of using bAddRace: bonus bAtkRate,10; so i will just add bonus bAtkRate,10; it will be effect Increases Physical damage inflicted on all enemies by 10%.? and i was wondering where i can find RC_ stables?
-
i will try to learn bymyself when i needed ill call you o.o i've search on the link that you gave me and it look like i cant find inflicted Increases Physical damage inflicted on all enemies by 10% bonus2 bAddRace,RC_NonBoss,10; bonus2 bAddRace,RC_Boss,10 correct?
-
1,Increases Physical damage inflicted on all enemies by 10% 2.Reduces damage from Demi-Human monster by 10% [ ^0000FFRefine rate 7-10^000000 ] Further reduces the damage taken from DemiHumans by 3%. 3.dds a 30% resistance against ^777777Neutral^000000 property attacks. Additionally adds a 1% resistance to ^777777Neutral^000000 property attacks per refine rate 4.MATK + 20% Additionally increases MATK by 2% per refine rate 5.Increases Physical damage inflicted on all enemies by 5%. Increases ATK + 4% per refine rate. [ ^0000FF+ Valkyrie's Shield, Valkyrie's Shield, Valkyrie's Shield ^000000] Increases MaxHP by 4%. 6.Increases effectiveness of your ^008800Heal, Sanctuary and Potion Pitcher^000000 by 20%. Further increases the effectiveness of ^008800Heal, Sanctuary and Potion Pitcher^000000 by 2% per refine rate 7.Enables use of ^008800Level 5 Lightning Bolt^000000. Adds 3% Magic Attack per refine rate. 8.Increases the damage of ^008800Sonic Blow^000000 by 40%. Increases the damage of ^008800Grimtooth^000000 by 20%. 9.Increases Physical damage inflicted on all enemies by 40%. Increases the damage you take from DemiHuman monsters by 5%. 10.MATK + 20% Has a 5% chance of auto casting ^008800Level 5 Lightning Bolt^000000, ^FF0000Level 5 Fire Bolt^000000 or ^0000FFLevel 5 Cold Bolt^000000, and on the enemy when attacking. Adds a 5% chance of auto casting '^880000Poison^000000', '^880000Stone Curse^000000', or '^880000Sleep^000000' on an enemy when the user receives Physical Damage. 11.Increases the damage of Double Strafe by 40%. Increases the damage of Sharp Shooting by 20%. thank you
-
lol even you do you the .lub is still like that
-
hi euphy i got some error here //===== rAthena Script ======================================= //= Euphy's Quest Shop //===== By: ================================================== //= Euphy //===== Current Version: ===================================== //= 1.4a //===== Compatible With: ===================================== //= rAthena SVN r15340+ //===== Description: ========================================= //= A dynamic quest shop based on Lunar's, with easier config. //= Includes support for multiple shops & cashpoints. //= Item Preview script by ToastOfDoom. //============================================================ zhakastia,94,37,1 script Silver Coin Exchanger 112,{ function Add; function Chk; function Slot; function A_An; if(.Shops$ != "") set .@i,1; else { set .@menu$,""; for(set .@i,1; .@i<=getarraysize(.Shops$); set .@i,.@i+1) set .@menu$, .@menu$+.Shops$[.@i]+":"; set .@i, select(.@menu$); } dispbottom "Select one item at a time."; callshop "qshop"+.@i,1; npcshopattach "qshop"+.@i; end; function Add { if (getitemname(getarg(1))=="null") { debugmes "Quest reward #"+getarg(1)+" invalid (skipped)."; return; } for(set .@n,5; .@n<127; set .@n,.@n+2) { if (!getarg(.@n,0)) break; if (getitemname(getarg(.@n))=="null") { debugmes "Quest requirement #"+getarg(.@n)+" invalid (skipped)."; return; } } for(set .@i,2; .@i<.@n; set .@i,.@i+1) set getd(".q_"+getarg(1)+"["+(.@i-2)+"]"), getarg(.@i); npcshopadditem "qshop"+getarg(0),getarg(1),((.ShowZeny)?getarg(3):0); return; } function Chk { if (getarg(0)<getarg(1)) { set @qe0,1; return "^FF0000"; } else return "^00FF00"; } function Slot { set .@s$,getitemname(getarg(0)); switch(.ShowSlot){ case 1: if (!getitemslots(getarg(0))) return .@s$; case 2: if (getiteminfo(getarg(0),11)>0) return .@s$+" ["+getitemslots(getarg(0))+"]"; default: return .@s$; } } function A_An { setarray .@A$[0],"a","e","i","o","u"; set .@B$, "_"+getarg(0); for(set .@i,0; .@i<5; set .@i,.@i+1) if (compare(.@B$,"_"+.@A$[.@i])) return "an "+getarg(0); return "a "+getarg(0); } OnBuyItem: set .@q[0],@bought_nameid; copyarray .@q[1],getd(".q_"+@bought_nameid+"[0]"),getarraysize(getd(".q_"+@bought_nameid+"[0]")); if (!.@q[1]) { message strcharinfo(0),"An error has occurred."; end; } mes "[Quest Shop]"; mes "Reward: ^0055FF"+((.@q[1]>1)?.@q[1]+"x ":"")+Slot(.@q[0])+"^000000"; mes "Requirements:"; if (.@q[2]) mes " > "+Chk(Zeny,.@q[2])+.@q[2]+" Zeny^000000"; if (.@q[3]) mes " > "+Chk(getd(.Points$[0]),.@q[3])+.@q[3]+" "+.Points$[1]+" ("+getd(.Points$[0])+"/"+.@q[3]+")^000000"; if (.@q[4]) for(set .@i,4; .@i<getarraysize(.@q); set .@i,.@i+2) mes " > "+Chk(countitem(.@q[.@i]),.@q[.@i+1])+((.DisplayID)?"{"+.@q[.@i]+"} ":"")+Slot(.@q[.@i])+" ("+countitem(.@q[.@i])+"/"+.@q[.@i+1]+")^000000"; next; set @qe1, getiteminfo(.@q[0],5); set @qe2, getiteminfo(.@q[0],11); addtimer 1000, strnpcinfo(1)+"::OnEnd"; while(1){ switch(select(" ~ Purchase ^0055FF"+getitemname(.@q[0])+"^000000:"+((((@qe1&1) || (@qe1&256) || (@qe1&512)) && @qe2>0 && !@qe6)?" ~ Preview...":"")+": ~ ^777777Cancel^000000")) { case 1: if (@qe0) { mes "[Quest Shop]"; mes "You're missing one or more quest requirements."; close; } if (!checkweight(.@q[0],.@q[1])) { mes "[Quest Shop]"; mes "^FF0000You need "+(((.@q[1]*getiteminfo(.@q[0],6))+Weight-MaxWeight)/10)+" additional weight capacity to complete this trade.^000000"; close; } if (.@q[2]) set Zeny, Zeny-.@q[2]; if (.@q[3]) setd .Points$[0], getd(.Points$[0])-.@q[3]; if (.@q[4]) for(set .@i,4; .@i<getarraysize(.@q); set .@i,.@i+2) delitem .@q[.@i],.@q[.@i+1]; getitem .@q[0],.@q[1]; if (.Announce) announce strcharinfo(0)+" has created "+A_An(getitemname(.@q[0]))+"!",0; specialeffect2 699; close; case 2: set @qe3, getlook(3); set @qe4, getlook(4); set @qe5, getlook(5); if (@qe1&0) atcommand "@changelook 4 "+@qe2; if (@qe1&256) atcommand "@changelook 1 "+@qe2; if (@qe1&512) atcommand "@changelook 2 "+@qe2; set @qe6,1; break; case 3: close; } } OnEnd: if (@qe6) { atcommand "@changelook 4 "+@qe3; atcommand "@changelook 1 "+@qe4; atcommand "@changelook 2 "+@qe5; } for(set .@i,0; .@i<7; set .@i,.@i+1) setd "@qe"+.@i,0; end; OnInit: freeloop(1); // --------------------- Config --------------------- // Custom points, if needed: "<variable>","<name to display>" setarray .Points$[0],"#CASHPOINTS","Cash Points"; set .Announce,0; // Announce quest completion? (1: yes / 0: no) set .ShowSlot,0; // Show item slots? (2: all equipment / 1: if slots > 0 / 0: never) set .DisplayID,0; // Show item IDs? (1: yes / 0: no) set .ShowZeny,0; // Show Zeny cost, if any? (1: yes / 0: no) // Shop categories, if needed: "<Shop 1>","<Shop 2>"{,...}; // Duplicate dummy data for any additional shops (bottom of script). // If no categories, use the second line instead (remove //). setarray .Shops$[4],"Silver Coin"; // set .Shops$,"n/a"; // Add(<shop number>,<reward ID>,<reward amount>,<Zeny cost>,<point cost>, // <required item ID>,<required item amount>{,...}); // Shop number corresponds with order above (default is 1). // Note: Do NOT use a reward item more than once! Add(4,678,1,0,0,7960,1); Add(4,12114,1,0,0,7960,1); Add(4,12115,1,0,0,7960,1); Add(4,12117,1,0,0,7960,1); Add(4,12215,1,0,0,7960,1); Add(4,12216,1,0,0,7960,1); Add(4,12217,1,0,0,7960,1); Add(4,12218,1,0,0,7960,1); Add(4,12219,1,0,0,7960,1); Add(4,12220,1,0,0,7960,1); Add(4,12251,1,0,0,7960,1); Add(4,12250,1,0,0,7960,1); Add(4,12253,1,0,0,7960,1); Add(4,12255,1,0,0,7960,1); Add(4,12206,1,0,0,7960,1); Add(4,12220,1,0,0,7960,1); // -------------------------------------------------- freeloop(0); for(set .@i,1; .@i<=getarraysize(.Shops$); set .@i,.@i+1) npcshopdelitem "qshop"+.@i,909; end; } // -------- Dummy data (duplicate as needed) -------- - shop qshop4 -1,909:-1 debug script debug : 110148609 : quest requirement # invalid skipped
-
-
after updating my data.grf and rdata.grf it become like this my custom items image gone and skills become korean anyway know how to fix this>?
-
allow those 3 ports in ur server.php to ur firewall
-
[SOLVED] help 2012-04-10RagRE Client Problem
Mootie replied to azze25's topic in Tulong para sa Client
-
hello, do you guys know how to fix this i already follow this guide still nothing happens im using 2012-04-10
-
[SOLVED] help 2012-04-10RagRE Client Problem
Mootie replied to azze25's topic in Tulong para sa Client
yeah its already fixed the only proble, i have is the floating character creation