Jump to content
  • 0

setting prize help


darking123

Question


  • Group:  Members
  • Topic Count:  318
  • Topics Per Day:  0.07
  • Content Count:  931
  • Reputation:   13
  • Joined:  12/20/11
  • Last Seen:  

i want this 2 script that i wont set the prize anymore ingame instead i will just set in on the script..

how to edit it

//===== rAthena Script ================================================================================================================
//= Goblin Invasion
//===== Created By: ===================================================================================================================
//= Mysterious
//===== Current Version: ==============================================================================================================
//= v1.3
//===== Compatible With: ==============================================================================================================
//= TXT & SQL
//===== Credits: ==============================================================================================================
//= Mysterious
//==== Information: =====================================================================================================
// Keep in mind that the prize amount that is given out is 5 <of the item ID you input> in the NPC.
// With knowledge, you can change it to whatever you want the prize to be (I.e. cashpoints, etc.).
//===================================================================================================================
splendide,184,198,6 script Invasion NPC 459,{
set .gm,90;//GM Level to access the GM Menu. Default: 50
// GM menu
//It allows GMs Level 50 or more to Start and Stop invasions.
if (getgmlevel()>.gm) {
 if (.mobs_left) {
  mes "[invasion]";
  mes "An invasion is in progress..";
  mes "Location: " + .Map$;
  mes "^FF0000"+.mobs_left+"^000000 Goblins left";
  mes " ";
  mes "Stop invasion?";
  if(select("No:Yes")==1) close;
  donpcevent "Invasion NPC::OnTimer1805000";
  mes "Invasion stopped";
  announce "The Invasion has been stopped by "+strcharinfo(0),bc_all;
  close;
 }
 mes "[invasion]";
 mes "Please customize the Invasion event before starting it.";
 mes "Note - The Goblin Leader drops x5 of the prize.";
 Main:
 next;
 mes "[invasion]";
  switch(select("Item [" + getitemname(.ItemID) + "]:Start Event")) {
 case 1:
  mes "Which item would you like the Goblin Leader to drop?";
  mes "Please input the item ID:";
  input .ItemID;
  goto Main;
 case 2:
  mes "Starting the event now...";
  close2;
  goto OnStart;
}

// If a player clicks the NPC, it displays:

mes "[invasion]";
mes .mobs_left+" have invaded "+.Map$[.rand_map]+"!";
close;

  /////////////////////////
  //The actual NPC Script//
  /////////////////////////
OnClock1200:
OnClock1100:
OnClock1300:
OnClock2300: // Change this to your liking
OnStart:
set .mobs_left, 1;
sleep2 1000;
set $@ran, rand(1,12);
if ($@ran == 12) set .Map$,"alberta";
if ($@ran == 11) set .Map$,"umbala";
if ($@ran == 10) set .Map$,"ayothaya";
if ($@ran == 9) set .Map$,"hugel";
if ($@ran == 8) set .Map$,"yuno";
if ($@ran == 7) set .Map$,"comodo";
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";
sleep2 1000;
announce "[ Rune-Midgard Guard ]: We have trouble here in the town " + .Map$ + "!", bc_all;
sleep2 5000;
announce "[ Rune-Midgard Guard ]: Everyone, we need your help to get rid of these Goblins!", bc_all;
monster .Map$,0,0,"Goblin",1258,250,"Invasion NPC::OnMyMobDead";
set .mobs_left, 250;
end;


OnTimer3600: // 30 minutes later, kills all the mobs.
killmonster .Map$,"Invasion NPC::OnMyMobDead";
set .mobs_left, 0;
OnStop://When the event is stopped by a GM, or all monsters dead.
killmonster .Map$,"Invasion NPC::OnMyMobDead";
killmonster .Map$,"Invasion NPC::OnSpecialMobDead";
announce "It seems that "+strcharinfo(0)+" has ended the Invasion!",bc_all;
end;
OnMyMobDead: //When a Goblin is killed
set .mobs_left, .mobs_left-1;
if (.mobs_left==0) {
 mapannounce .Map$,"[ Rune-Midgard Guard ]: The Goblin Leader has spawned in " + .Map$ + "!", bc_all;
 monster .Map$,0,0,"Goblin Leader",1299,1,"Invasion NPC::OnSpecialMobDead";
} else {
 announce "["+.mobs_left+"/250] Goblins left.",bc_map;
}
end;
OnSpecialMobDead:
 announce strcharinfo(0)+" has fought off the Goblin Invasion and has been awarded a worthy prize!", bc_all;
 getitem .ItemID,10; //Change the [5] to the amount you wish to hand out.
 donpcevent "Invasion NPC::OnStop";
}
end;
}

splendide,185,200,4 script Find the Mushroom 1084,{
mes "[ Find The Mushroom ]";
if(getgmlevel() < 90) {
if(.Event==0) mes "There is no Find the Mushroom event.";
else {
 mes "There is a Find the Mushroom event on now!";
 mes "Location: "+ .Map$;
 mes "Prize: " + getitemname(.ItemID);
 mes "Number of Mushrooms: " + .Mushrooms;
}
close;
}
mes "Hello "+strcharinfo(0)+"! Please customize this event:";
Main:
next;
mes "[ Find The Mushroom ]";
switch(select("Item [" + getitemname(.ItemID) + "]:Start Event:End Event")) {
 case 1:
  mes "Which item would you like the Mushroom to drop?";
  mes "Please input the item ID:";
  input .ItemID;
  goto Main;
 case 2:
  mes "Starting the event now...";
  set .Event,1;
  close2;
  goto OnStart;

 case 3:
  mes "Ending the event now...";
  if(.Event) announce ""+strcharinfo(0)+" ended Find the Mushroom Event!",bc_all;
  killmonster  .Map$,"All";
  set .Event,0;
 close;
}
OnClock0500:
OnClock0930:
OnClock1700:
OnClock2130:
OnStart:
announce "Find the Mushroom : It's time to play Find the Mushroom!",0;
sleep2 1000;
set $@ran, rand(1,14);
if ($@ran == 14) set .Map$,"alberta";
if ($@ran == 13) set .Map$,"umbala";
if ($@ran == 12) set .Map$,"niflheim";
if ($@ran == 11) set .Map$,"ayothaya";
if ($@ran == 10) set .Map$,"hugel";
if ($@ran == 9) set .Map$,"yuno";
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";
sleep2 1000;
set $@ran2, rand(1,5);
if ($@ran2 == 5) set .Mushrooms,"5";
if ($@ran2 == 4) set .Mushrooms,"4";
if ($@ran2 == 3) set .Mushrooms,"3";
if ($@ran2 == 2) set .Mushrooms,"2";
if ($@ran2 == 1) set .Mushrooms,"1";
announce "Find the Mushroom : The Mushroom has spawned in "+ .Map$ +"!",0;
sleep2 10000;
announce "Find the Mushroom : " + .Mushrooms + " Mushrooms have spawned in "+ .Map$ +"!",0;
sleep2 10000;
monster .Map$,0,0,"Don't kill me please!",1084,.Mushrooms,"Find the Mushroom::OnMobKilled";
end;
OnMobKilled:
mapannounce .Map$,"We've got a winner: " + strcharinfo(0) + " Congrats!",0;
getitem .ItemID,10;
set .Event,0;
end;
}

help?

Edited by glemor123
Link to comment
Share on other sites

3 answers to this question

Recommended Posts


  • Group:  Members
  • Topic Count:  16
  • Topics Per Day:  0.00
  • Content Count:  210
  • Reputation:   10
  • Joined:  11/20/11
  • Last Seen:  

getitem .ItemID,10; //Change the [5] to the amount you wish to hand out.

getitem .ItemID,10;

just replace .ItemID to whatever item you want..

eg:

getitem 607,10; // 10pcs yggdrasillberry

Edited by quesoph
Link to comment
Share on other sites


  • Group:  Members
  • Topic Count:  318
  • Topics Per Day:  0.07
  • Content Count:  931
  • Reputation:   13
  • Joined:  12/20/11
  • Last Seen:  

doesnt work

getitem .ItemID,10; //Change the [5] to the amount you wish to hand out.

getitem .ItemID,10;

just replace .ItemID to whatever item you want..

eg:

getitem 607,10; // 10pcs yggdrasillberry

this does not work...anyone?

Link to comment
Share on other sites


  • Group:  Forum Moderator
  • Topic Count:  93
  • Topics Per Day:  0.02
  • Content Count:  10015
  • Reputation:   2352
  • Joined:  10/28/11
  • Last Seen:  

specify what doesnt work ? show the error that listed in your mapserver...

the solution provided by quesoph looks fine...( for a simple and fast way ) and just remove the GM Panel stuff since you doesnt need that.

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • Create New...