-
Posts
931 -
Joined
-
Last visited
Content Type
Profiles
Forums
Downloads
Jobs Available
Server Database
Third-Party Services
Top Guides
Store
Everything posted by darking123
-
how to make it online but only gm can enter the server
darking123 replied to simplemhan's question in General Support
read this topic sir..maybe it will help you http://rathena.org/board/topic/59786-maintenance-command/ -
[root@stpaul ~]#redhat-config-date -bash: redhat-config-date: command not found
-
salamat bro
-
didnt work...anyone
-
i change my server date i used this command ln -sf /usr/share/zoneinfo/Asia/manila localtime so that time should be april 15 2012 1pm but the result is april 16,2012 2pm.. the time advanced for 1 day and 1 hours help please
-
is like when you run the server using putty then you exit your putty then you want to see the log of server what command will i type so it will show up again to be understandable,,, you you can see the processes that the server did...
-
how to fix this error atcommand.c: In function 'atcommand_itemmap': atcommand.c:2022: error: too many arguments to function 'pc_additem' make[1]: *** [obj_sql/atcommand.o] Error 1 make[1]: Leaving directory `/home/gyrostpaul/src/map' make: *** [map_sql] Error 2
-
http://svn.eathena.ws/svn/ea/trunk/athena-start
-
Auto Start RO when Server Accidentally Restart
darking123 replied to BuLaLaKaW's question in Linux Support
how about for centos and eathena SVN? -
fixed
-
[status]: Connecting to 74.63.213.5:6121 [Error]: make_connection: connect failed (socket #5, code 111)! how to fix it?? im using centos also this Status]: Connecting to 74.63.213.5:6900 [Error]: make_connection: connect failed (socket #6, code 111)!
-
i got a problem...i already fixed the first problem..this is my last problem [info]: Char Server IP Address : '74.63.213.5' -> '74.63.213.5'. [info]: Map Server Bind IP Address : '127.0.0.1' -> '127.0.0.1'. [info]: Map Server IP Address : '74.63.213.5' -> '74.63.213.5'. : [sql]: Unknown database 'ragnarok'Unknown database 'log' [Debug]: at inter.c:284 [Debug]: at loginlog_sql.c:110 [status]: Using SQL dbs: no [info]: Logging item transactions to file 'log/picklog.log'. [info]: Logging gm commands to file 'log/atcommandlog.log'. [info]: Connecting to the Map DB Server.... [sql]: Unknown database 'ragnarok' i followed all this steps...http://rathena.org/wiki/Installation_on_CentOS and all went well...but i use eathena svn...but that above is my problem [sql]: Unknown database 'ragnarok' [Debug]: at inter.c:284 [sql]: Unknown database 'log' [Debug]: at loginlog_sql.c:110 [sql]: Unknown database 'ragnarok'
-
[info]: Connecting to the Map DB Server.... : Host '74.63.213.5' is not allowed to connect to this MySQL server[Debug]: at loginlog_sql.c:110 [sql]: Host '74.63.213.5' is not allowed to connect to this MySQL server [Debug]: at inter.c:284 [sql]: Host '74.63.213.5' is not allowed to connect to this MySQL server and this [info]: Done reading conf/inter_athena.conf. [Error]: Using the default user/password s1/p1 is NOT RECOMMENDED. [Notice]: Please edit your 'login' table to create a proper inter-server user/password (gender 'S') im using linux centos
-
add me sa ym....help kita sir
-
pwede naman yun sir..... pwedeng pwede yung ganun... basta ang nang players gagawin hehe
-
madaming quide para makagawa ka ng renewal server..hehe..
-
nag renewal ka nalang..old na ang xray bro
-
eto 471,9,6,1,0,0x1,0,3,1,no,0,0,0,magic,0, SL_SKE,Eske lagyan mo ng // sa unahan so ganto kinakalabasan //471,9,6,1,0,0x1,0,3,1,no,0,0,0,magic,0, SL_SKE,Eske yup hindi na magagamit
-
hanapin mo skill_db.txt mo then find this one 457,9,6,16,0,0x1,0,5,1,yes,0,0,0,magic,0, SL_ASSASIN,Spirit of the Assasin after niyan palitan mo neto //457,9,6,16,0,0x1,0,5,1,yes,0,0,0,magic,0, SL_ASSASIN,Spirit of the Assasin ang nag bago jan ay nilagyan ko ng //
-
sir emistry when will the 2 new script be released?
-
post your item_db2.txt script here sir..yung sa may custom bow mo lang
-
para sakin kro
-
how to edit this so that the winner will have the prize automatically without claiming the reward from the npc // --- ARTHistic's Property --- // --- Please visit http://thdesigns.co.nr --- // --- Scripted By: ARTHistic --- // --- Do Not Revomed the Credits --- - script PPE_inital -1,{ OnInit: set $@PoringEventChecker, 0; set $@PoringEventPrizeChecker, 0; set $PPEDefendingChampion$,"secret"; end; } prontera,130,205,5 script Poring Punch Event 952,{ mes "[ Poring Punch Event ]"; mes "Hello, I'm the Poring Punch Event Manager. My record says that the defending champion on this event was "+$PPEDefendingChampion$+". Anyways, what do you want to do?"; mes " "; mes "Scripted by: ^777777ARTHistic^000000"; next; menu "How does this work?",PPE_HowTo,"Host this Event",PPE_Host,"Join Event Now",PPE_Join,"Claim my reward",PPE_claim,"Nevermind",PPE_nvm; PPE_HowTo: mes "[ Poring Punch Event ]"; mes "This is an event where everyone can join in. All you have to do is to punch the right monsters and to avoid the wrong ones. Each kind of monster has its corresponsing points. You only have 5 minutes to earn points as much as you can. The Highest Scorer at the end of this event shall win Poring Coins"; mes "Reminder: No weapons, cart, and pets is allowed in this event."; mes " "; mes "Scripted by: ^777777ARTHistic^000000"; close; PPE_Host: if ( $@PoringEventChecker != 0 ){ mes "[ Poring Punch Event ]"; mes "There is Poring Punch Event on-going. You can host this event if it is still on-going."; mes " "; mes "Scripted by: ^777777ARTHistic^000000"; close; }else{ mes "[ Poring Punch Event ]"; mes "You need to pay 200,000,000 z to host this event. Would you like to pay to host this event?"; next; menu "Yes",PPE_HostYes,"No",-; mes "[ Poring Punch Event ]"; mes "Okay. Maybe next time."; mes " "; mes "Scripted by: ^777777ARTHistic^000000"; close; PPE_HostYes: if ( Zeny >= 200000000 ){ mes "[ Poring Punch Event ]"; mes "Thanks "+strcharinfo(0)+", for hosting this event. It will start shortly."; mes " "; mes "Scripted by: ^777777ARTHistic^000000"; set Zeny, Zeny-200000000; close2; set $@PoringEventChecker, 1; announce ""+strcharinfo(0)+" paid to host Poring Punch Event!", bc_all; killmonsterall "pvp_n_1-2"; sleep2 10000; initnpctimer; end; }else{ mes "[ Poring Punch Event ]"; mes "Sorry "+strcharinfo(0)+", you dont have enough zenies to host this event."; mes " "; mes "Scripted by: ^777777ARTHistic^000000"; close; }end; }end; PPE_Join: if ( $@PoringEventChecker != 0 ){ if (gethominfo(2) != "null"){ mes "[ Poring Punch Event ]"; mes "No homunculus is allowed in this event! Sorry "+strcharinfo(0)+" but you can't join this event!"; close; } if (getpetinfo(2) != "null"){ mes "[ Poring Punch Event ]"; mes "No pet is allowed in this event! Sorry "+strcharinfo(0)+" but you can't join this event!"; close; } if (checkcart()){ mes "[ Poring Punch Event ]"; mes "[ Poring Punch Event ]"; mes "No cart is allowed! Sorry "+strcharinfo(0)+" but you can't join this event!"; close; } if (checkfalcon()){ mes "[ Poring Punch Event ]"; mes "No falcon is allowed! Sorry "+strcharinfo(0)+" but you can't join this event!"; close; } if (checkriding()){ mes "[ Poring Punch Event ]"; mes "[ Poring Punch Event ]"; mes "No riding is allowed! Sorry "+strcharinfo(0)+" but you can't join this event!"; close; } mes "[ Poring Punch Event ]"; mes "Good luck "+strcharinfo(0)+"."; mes " "; mes "Scripted by: ^777777ARTHistic^000000"; close2; set @PoringPoints, 0; warp "pvp_n_1-2.gat",0,0; end; }else{ mes "[ Poring Punch Event ]"; mes "Sorry. No Poring Punch Event is held at the moment."; mes " "; mes "Scripted by: ^777777ARTHistic^000000"; close; }end; PPE_claim: if ($HighestPoringPointsName$ == strcharinfo(0) && $@PoringEventPrizeChecker == 1) { mes "[Poring Punch Event]"; mes "Congragulations "+strcharinfo(0)+". Here is your reward."; getitem 674,10; set $HighestPoringPointsName$,""; set $HighestPoringPoints,0; set $@PoringEventPrizeChecker, 0; close; } else { mes "[ Poring Punch Event ]"; mes "Sorry "+strcharinfo(0)+". You're not the winner so you can't claim anything"; mes " "; mes "Scripted by: ^777777ARTHistic^000000"; close; }end; PPE_nvm: mes "[ Poring Punch Event ]"; mes "Okay. Maybe next time."; mes " "; mes "Scripted by: ^777777ARTHistic^000000"; close; OnPoringKill: if (getequipweaponlv(4)==0 && getequipweaponlv(3)==0){ set @PoringPoints,@PoringPoints+1; if (@PoringPoints > $HighestPoringPoints) { set $HighestPoringPointsName$,strcharinfo(0); set $PPEDefendingChampion$,strcharinfo(0); set $HighestPoringPoints,@PoringPoints; } dispbottom "You have "+@PoringPoints+" point(s)"; end; }else { dispbottom "You have to punch the monster without any weapon."; warp "prontera",130,200; end; } OnDropsKill: if (getequipweaponlv(4)==0 && getequipweaponlv(3)==0){ set @PoringPoints,@PoringPoints+5; if (@PoringPoints > $HighestPoringPoints) { set $HighestPoringPointsName$,strcharinfo(0); set $PPEDefendingChampion$,strcharinfo(0); set $HighestPoringPoints,@PoringPoints; } dispbottom "You have "+@PoringPoints+" point(s)"; end; }else { dispbottom "You have to punch the monster without any weapon."; warp "prontera",130,200; end; } OnPoporingKill: if (getequipweaponlv(4)==0 && getequipweaponlv(3)==0){ if (@PoringPoints < 10) { set @PoringPoints, 0; dispbottom "You have "+@PoringPoints+" point(s)"; end; }else { set @PoringPoints,@PoringPoints-10; dispbottom "You have "+@PoringPoints+" point(s)"; end; }end; }else { dispbottom "You have to punch the monster without any weapon."; warp "prontera",130,200; end; } OnHour30: if ( $@PoringEventChecker == 0 ) { set $@PoringEventChecker, 1; initnpctimer; end; } OnTimer10000: announce "Poring Punch Event has started.",0; monster "pvp_n_1-2",0,0,"1 Point",1002,50,"Poring Punch Event::OnPoringKill"; monster "pvp_n_1-2",0,0,"5 Points",1113,10,"Poring Punch Event::OnDropsKill"; monster "pvp_n_1-2",0,0,"-10 Ponts",1031,50,"Poring Punch Event::OnPoporingKill"; end; OnTimer70000: mapannounce "pvp_n_1-2.gat","Poring Punch Event: 4 minutes left.",0; monster "pvp_n_1-2",0,0,"1 Point",1002,50,"Poring Punch Event::OnPoringKill"; monster "pvp_n_1-2",0,0,"5 Points",1113,5,"Poring Punch Event::OnDropsKill"; monster "pvp_n_1-2",0,0,"-10 Ponts",1031,20,"Poring Punch Event::OnPoporingKill"; end; OnTimer130000: mapannounce "pvp_n_1-2.gat","Poring Punch Event: 3 minutes left.",0; monster "pvp_n_1-2",0,0,"1 Point",1002,30,"Poring Punch Event::OnPoringKill"; monster "pvp_n_1-2",0,0,"5 Points",1113,5,"Poring Punch Event::OnDropsKill"; monster "pvp_n_1-2",0,0,"-10 Ponts",1031,15,"Poring Punch Event::OnPoporingKill"; end; OnTimer190000: mapannounce "pvp_n_1-2.gat","Poring Punch Event: 2 minutes left.",0; monster "pvp_n_1-2",0,0,"1 Point",1002,30,"Poring Punch Event::OnPoringKill"; monster "pvp_n_1-2",0,0,"5 Points",1113,5,"Poring Punch Event::OnDropsKill"; monster "pvp_n_1-2",0,0,"-10 Ponts",1031,5,"Poring Punch Event::OnPoporingKill"; end; OnTimer250000: mapannounce "pvp_n_1-2.gat","Poring Punch Event: 1 minute left.",0; monster "pvp_n_1-2",0,0,"1 Point",1002,50,"Poring Punch Event::OnPoringKill"; monster "pvp_n_1-2",0,0,"5 Points",1113,5,"Poring Punch Event::OnDropsKill"; monster "pvp_n_1-2",0,0,"-10 Ponts",1031,5,"Poring Punch Event::OnPoporingKill"; end; OnTimer310000: stopnpctimer; announce "Poring Punch Event has ended and the event Winner is "+$HighestPoringPointsName$+".",0; killmonsterall "pvp_n_1-2"; set $@PoringEventChecker, 0; set $@PoringEventPrizeChecker, 1; sleep2 5000; mapannounce "pvp_n_1-2.gat","You'll be warp at prontera in a short while.",16; sleep2 10000; mapwarp "pvp_n_1-2","prontera",155,166; end; } // MAPFLAGS pvp_n_1-2 mapflag nobranch pvp_n_1-2 mapflag noexp pvp_n_1-2 mapflag noskill pvp_n_1-2 mapflag nomemo pvp_n_1-2 mapflag nopenalty pvp_n_1-2 mapflag pvp off pvp_n_1-2 mapflag nosave SavePoint pvp_n_1-2 mapflag noskill pvp_n_1-2 mapflag noteleport pvp_n_1-2 mapflag nowarp pvp_n_1-2 mapflag nowarpto also this...i want that even if only round 1 and 1 player is left automatically announce the this player won and give the prize to him already tapos bawal din po mag dala ng kahit anung pots or pang heal at pang increase ng speed // Edited version by painisinsane/Eclipse. // Creator of EclipseRO // Please dont remove Credits! // Credits: http://www.paste-it.net/public/a5d2cd4/ quiz_01 mapflag nowarpto quiz_01 mapflag nowarp quiz_01 mapflag noteleport quiz_01 mapflag nomemo quiz_01 mapflag nosave SavePoint quiz_01 mapflag nobranch quiz_01 mapflag noicewall quiz_01 mapflag nopenalty quiz_01 mapflag nobranch quiz_01 mapflag noexp quiz_01 mapflag noreturn quiz_01 mapflag pvp_noparty quiz_01 mapflag restricted 1 - script RFYL#disable -1,{ OnInit: disablenpc "Zombie Master"; disablenpc "Present For You"; } rachel,152,144,4 script Zombie Minion 1015,{ if (getgmlevel() >= 40) goto LMS_Admin; mes "[Minion]"; mes "Hello " + strcharinfo(0) + ", my master is busy."; mes "*sigh*"; close; LMS_Admin: mes "[Minion]"; mes "Hello " + strcharinfo(0) + ", would you like me to call my Boss?"; mes "He is the only one who can start it!"; menu "Start Event",RFYL,"Spectate",M_warp,"End Event",M_EndEvent,"No Thanks",leave; RFYL: next; mes "[Minion]"; mes "Ok, I'll call him this instant."; close2; set $@offvar,1; goto StartEvent; M_warp: mes "[Minion]"; mes "Very well, I will warp you to the map!"; warp "quiz_01",42,369; close; leave: next; mes "[Minion]"; mes "Ok " + strcharinfo(0) +", nice seeing you."; close; M_EndEvent: mes "[Minion]"; mes "Ok master, I will stop the event for you right away!"; next; set $@offvar,1; disablenpc "Zombie Master"; disablenpc "Present For You"; killmonsterall "quiz_01"; areawarp "quiz_01",10,10,450,450,"rachel",120,135; stopnpctimer; disablenpc "Zombie Minion"; warp "rachel",120,135; sleep 180000; enablenpc "Zombie Minion"; StartEvent: announce "Zombie Vs. Novice event Will begin in 3 minutes. Head East/North",0; killmonsterall "quiz_01"; sleep 55000; announce "Zombie Vs. Novice event will begin in 2 minutes! Head East/North",0; sleep 5000; announce "Zombie Master: I have now appeared in Rachel!",0; enablenpc "Zombie Master"; sleep 60000; announce "Zombie Vs. Novice event will begin in 1 minute!",0; sleep 30000; mapannounce "quiz_01","In 30 seconds the zombies will spawn!",0; sleep 25000; announce "Zombie Vs. Novice event will begin in ~5~",0; sleep 1000; announce "Zombie Vs. Novice event will begin in ~4~",0; sleep 1000; announce "Zombie Vs. Novice event will begin in ~3~",0; sleep 1000; announce "Zombie Vs. Novice event will begin in ~2~",0; sleep 1000; announce "Zombie Vs. Novice event will begin in ~1~",0; sleep 1000; announce "Zombie Vs. Novice event has now begun!!",0,0x00FF00; disablenpc "Zombie Master"; disablenpc "Present For You"; sleep 10000; monster "quiz_01",42,369,"Zombie",1015,1; sleep 10000; monster "quiz_01",42,369,"Zombie-2",1015,1; sleep 10000; monster "quiz_01",42,369,"Zombie-3",1015,1; sleep 10000; monster "quiz_01",42,369,"Zombie-4",1015,1; sleep 55000; mapannounce "quiz_01","Round 2!",0; sleep 10000; monster "quiz_01",42,369,"Zombie-4",1015,1; sleep 55000; monster "quiz_01",42,369,"Zombie-4",1015,1; mapannounce "quiz_01","Round 3!",0; sleep 10000; monster "quiz_01",42,369,"Zombie-4",1015,1; sleep 55000; monster "quiz_01",42,369,"Zombie-4",1015,1; mapannounce "quiz_01","Round 4!",0; sleep 10000; monster "quiz_01",42,369,"Zombie-4",1015,1; sleep 10000; monster "quiz_01",42,369,"Zombie-4",1015,1; sleep 55000; monster "quiz_01",42,369,"Zombie-4",1015,1; mapannounce "quiz_01","Round 5!",0; sleep 10000; monster "quiz_01",42,369,"Zombie-4",1015,1; sleep 55000; monster "quiz_01",42,369,"Zombie-4",1015,1; mapannounce "quiz_01","Round 6!",0; sleep 10000; monster "quiz_01",42,369,"Zombie-4",1015,1; sleep 55000; monster "quiz_01",42,369,"Zombie-4",1015,1; mapannounce "quiz_01","Round 7! Final Round!",0; sleep 10000; monster "quiz_01",42,369,"Zombie-4",1015,1; sleep 20000; monster "quiz_01",42,369,"Zombie-4",1015,1; sleep 30000; monster "quiz_01",42,369,"Zombie-4",1015,1; sleep 40000; monster "quiz_01",42,369,"Zombie-4",1036,1; sleep 50000; monster "quiz_01",42,369,"Zombie-4",1036,1; sleep 60000; monster "quiz_01",42,369,"Zombie-4",1015,1; initnpctimer; end; OnTimer0500: if ( getmapusers("quiz_01") == 0 ) { killmonsterall "quiz_01"; announce "'Zombie Vs. Novice' event has ended. No one joined.",0; stopnpctimer; end; } else if ( getmapusers("quiz_01") > 1 ) { mapannounce "quiz_01",getmapusers("quiz_01") +"has survived the event.",0,0x00FF00;; initnpctimer; end; } initnpctimer; end; OnPCDieEvent: getmapxy .@mapnvz$,.@xnvz,.@ynvz,0; if ( .@mapnvz$ == "quiz_01") { sleep2 1; warp "rachel",120,135; atcommand "@alive "+ strcharinfo(0); dispbottom "you have lost..."; } sleep2 0500; if ( .@mapnvz$ == "quiz_01" && getmapusers("quiz_01") == 1 ) { killmonsterall "quiz_01"; mapannounce "quiz_01","You have won, approach the Present For You Npc please.",0; enablenpc "Present For You"; stopnpctimer; end; } end; } quiz_01,42,378,3 script Present For You 72,{ mes "[Present For You]"; mes "Please tell me your name."; next; input .@name$; if(.@name$ != strcharinfo(0)) { mes "[Present For You]"; mes "Are you sure that is your name?"; close; } mes "[Present For You]"; mes "Congrats. You've won."; close2; announce "Present For You: We have a winner! "+.@name$+" has won the Novice vs Zombie event!",0; getitem 674, 3; // Change This item id to what ever you want warp "rachel",120,135; disablenpc "Present For You"; end; } rachel,152,146,4 script Zombie Master 1298,{ if (BaseLevel > 1) goto NO; if (class == 0) goto event; if (class > 0) goto NO; event: mes "[^0000FFZombie Master^000000]"; mes "You wish to participate the Zombie Vs. Novice event?"; next; switch(select("Yes","No")) { case 1: sc_end SC_ALL; sc_start SC_DECREASEAGI,1200000,10; percentheal 100,100; sc_start SC_STRIPSHIELD,1200000,5; sc_start SC_STRIPWEAPON,1200000,5; sc_start SC_STRIPARMOR,1200000,5; sc_start SC_STRIPHELM,1200000,5; statusup2 bStr,-999; statusup2 bAgi,-999; statusup2 bVit,-999; statusup2 bInt,-999; statusup2 bDex,-999; statusup2 bLuk,-999; warp "quiz_01",42,369; end; break; case 2: mes "[^0000FFZombie Master^000000]"; mes "Come back when your ready."; close; break; NO: mes "[^0000FFZombie Master^000000]"; mes "You are not a Novice, level 1."; close; } OnInit: disablenpc "Zombie Master"; disablenpc "Prize"; end; } UPDATED
-
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?
-
how to prevent @afk command from being used in a town
darking123 replied to darking123's question in Source Support
here is my code i want that @afk is disabled to prontera but @afk can be used in other maps /*========================================== * @afk by Rad, built on by Tubby * same as autotrade, but works without vending *------------------------------------------*/ int atcommand_afk(const int fd, struct map_session_data* sd, const char* command, const char* message) { nullpo_retr(-1, sd); if( map[sd->bl.m].flag.autotrade == battle_config.autotrade_mapflag ) { if (!message || !*message) { chat_createpcchat(sd, "(@afk) mail me~", "", 1, 1); trade_tradeack(sd,4); sd->state.autotrade = 1; if( battle_config.at_timeout ) { int timeout = atoi(message); status_change_start(&sd->bl, SC_AUTOTRADE, 10000, 0, 0, 0, 0, ((timeout > 0) ? min(timeout,battle_config.at_timeout) : battle_config.at_timeout) * 60000, 0); } clif_authfail_fd(fd, 15); } if((strlen(message) < 0)||(strlen(message) > 36)) { chat_createpcchat(sd, "(@afk) mail me~", "", 1, 1); trade_tradeack(sd,4); sd->state.autotrade = 1; if( battle_config.at_timeout ) { int timeout = atoi(message); status_change_start(&sd->bl, SC_AUTOTRADE, 10000, 0, 0, 0, 0, ((timeout > 0) ? min(timeout,battle_config.at_timeout) : battle_config.at_timeout) * 60000, 0); } clif_authfail_fd(fd, 15); } chat_createpcchat(sd, message, "", 1, 1); trade_tradeack(sd,4); sd->state.autotrade = 1; if( battle_config.at_timeout ) { int timeout = atoi(message); status_change_start(&sd->bl, SC_AUTOTRADE, 10000, 0, 0, 0, 0, ((timeout > 0) ? min(timeout,battle_config.at_timeout) : battle_config.at_timeout) * 60000, 0); } clif_authfail_fd(fd, 15); } else clif_displaymessage(fd, "AFK is not allowed on this map."); return 0; } BUMP!