Jump to content

jacky

Members
  • Posts

    51
  • Joined

  • Last visited

Everything posted by jacky

  1. no edit,its original script, So I'm change the parse_simpleexpr:unmatch')'? btw i cant see the parse_simpleexpr ~_~
  2. can you post some error message from map-server? its pic of map severs
  3. http://pastebin.com/4YDvXK19 problem cant click the npc no working
  4. how to make FullVersion or Cilent With My ragnarok Online Please tell me :thx master
  5. if players would kill out frist blood, etc and automatic announcements, to all town, can not reward or skull thx master, pvp rank
  6. dont have item_combo_db.txt,,, im make new txt its will work?
  7. example i have 3 helm , 3 arrmor , 1 wing item id str :2265,3002 item id int : 2278,3000 item id dex: 5061,3001 how to make with combo with 1 wing please? example 5089,Deviling_Wings,Deviling Wings,5,1000000,,100,,2,,1,0xFFFFFFFF,7,2,1,,0,1,1017,{ if(isequipped(3002,)==0){bonus bAllStats,7;} else{ bonus bstr,20;} },{ misceffect 500; end; },{} 5089,Deviling_Wings,Deviling Wings,5,1000000,,100,,2,,1,0xFFFFFFFF,7,2,1,,0,1,1017,{ if(isequipped(3000,)==0){bonus bAllStats,7;} else{ bonus bint,20;} },{ misceffect 500; end; },{} 5089,Deviling_Wings,Deviling Wings,5,1000000,,100,,2,,1,0xFFFFFFFF,7,2,1,,0,1,1017,{ if(isequipped(3001,)==0){bonus bAllStats,7;} else{ bonus bdex,20;} },{ misceffect 500; end; },{} help thx rathena 2265,Dragon_Helm,Dragon Helm,5,1000000,1,100,0,4,0,3,0xFFFFFFFF,7,2,256,0,0,1,52,{ bonus bMdef,3; bonus bStr,10; bonus2 bSubRace,RC_DemiHuman,1; bonus2 bAddRace,RC_DemiHuman,1; },{},{} 2278,Traveler_Hat,Traveler Hat,5,20,1,100,0,4,0,3,0xFFFFFFFF,7,2,256,0,0,1,65,{ bonus bMdef,3; bonus bInt,10; bonus2 bSubRace,RC_DemiHuman,1; bonus2 bAddRace,RC_DemiHuman,1; },{},{} 5061,Dowry,Dowry,5,20,1,100,0,4,0,3,0xFFFFFFFF,7,2,256,0,0,1,145,{ bonus bMdef,3; bonus bAgi,10; bonus2 bSubRace,RC_DemiHuman,1; bonus2 bAddRace,RC_DemiHuman,1; },{},{} or help combit with { if(isequipped(5089,)bonus str 20 ?
  8. In config? If I'm make only town no pk mode can? In conf/map?
  9. I'm want all map PK mode how to setting it? No with status pvp 1/1
  10. many gm is like corruption, so I need an auto announcement when using gm commands please? script or src work please thx master
  11. //===== Script: =============================================================== //= 3ManFreeForAll //= By Matthew //= Credit to Matty in [url=http://eAthena.ws]http://eAthena.ws[/url] //============================================================================== prontera,154,188,5 script Free For All 823,{ set .npc$,"[^ff8800 Register ^000000]"; set .npcgm$,"[^ff8800 Conf. Administration ^000000]"; if(getgmlevel() >= 60) { mes .npcgm$; mes "^ff0000* Status *^000000"; mes " "; mes "^0000ffPlayer 1:^000000 ^ff0000" +$player1+ "^000000."; mes "^0000ffPlayer 2:^000000 ^ff0000" +$player2+ "^000000."; mes "^0000ffPlayer 3:^000000 ^ff0000" +$player3+ "^000000."; mes "^0000ffPlayer 4:^000000 ^ff0000" +$player4+ "^000000."; mes "^0000ffPlayer 5:^000000 ^ff0000" +$player5+ "^000000."; mes "^0000ffMatch:^000000 ^ff0000" +$@match+ "^000000."; next; gmmenu: mes .npcgm$; mes "Want do you want to do?"; next; menu "-Normal Menu",normalmenu,"-Check Positions",checkongm,"-^777777Configuration^000000",conf; conf: mes .npcgm$; mes "What do you want to change?"; menu "-^0000ffReset Variables^000000",Rteams; Rteams: set $player1,0; set $player2,0; set $player3,0; set $player4,0; set $player5,0; set $@match,0; set $player1$,"[^ff0000 Off ^000000]"; set $player2$,"[^ff0000 Off ^000000]"; set $player3$,"[^ff0000 Off ^000000]"; set $player4$,"[^ff0000 Off ^000000]"; set $player5$,"[^ff0000 Off ^000000]"; dispbottom "[" + strcharinfo(0) + "] the FreeForAll Variables are now available!"; close; checkongm: set $player1$,"[^00ff00 On ^000000]"; set $player2$,"[^00ff00 On ^000000]"; set $player3$,"[^00ff00 On ^000000]"; set $player4$,"[^00ff00 On ^000000]"; set $player5$,"[^00ff00 On ^000000]"; if ($player1 == 0) { set $player1$,"[^ff0000 Off ^000000]"; } if ($player2 == 0) { set $player2$,"[^ff0000 Off ^000000]"; } if ($player3 == 0) { set $player3$,"[^ff0000 Off ^000000]"; } if ($player4 == 0) { set $player4$,"[^ff0000 Off ^000000]"; } if ($player5 == 0) { set $player5$,"[^ff0000 Off ^000000]"; } mes .npcgm$; mes "^0000ffPlayer One:^000000 " +$player1$+ "."; mes "^0000ffPlayer Two:^000000 " +$player2$+ "."; mes "^0000ffPlayer Three:^000000 " +$player3$+ "."; mes "^0000ffPlayer Four:^000000 " +$player4$+ "."; mes "^0000ffPlayer Five:^000000 " +$player5$+ "."; close; } normalmenu: if ($player1 == getcharid(0)) { mes .npc$; mes "You are already ^00ff00Signed In^000000!"; menu "-Ok",Lok,"Sign Out!",-; set $player1,0; mapannounce "prontera","Free For All: " +strcharinfo(0)+ " signed out from 5ManFFA Next Match!",0; message strcharinfo(0),"You has been removed from 5ManFFA Next Match!"; close; } if ($player2 == getcharid(0)) { mes .npc$; mes "You are already ^00ff00Signed In^000000!"; menu "-Ok",Lok,"Sign Out!",-; set $player2,0; mapannounce "prontera","Free For All: " +strcharinfo(0)+ " signed out from 5ManFFA Next Match!",0; message strcharinfo(0),"You has been removed from 5ManFFA Next Match!"; close; } if ($player3 == getcharid(0)) { mes .npc$; mes "You are already ^00ff00Signed In^000000!"; menu "-Ok",Lok,"Sign Out!",-; set $player3,0; mapannounce "prontera","Free For All: " +strcharinfo(0)+ " signed out from 5ManFFA Next Match!",0; message strcharinfo(0),"You has been removed from 5ManFFA Next Match!"; close; } if ($player4 == getcharid(0)) { mes .npc$; mes "You are already ^00ff00Signed In^000000!"; menu "-Ok",Lok,"Sign Out!",-; set $player4,0; mapannounce "prontera","Free For All: " +strcharinfo(0)+ " signed out from 5ManFFA Next Match!",0; message strcharinfo(0),"You has been removed from 5ManFFA Next Match!"; close; } if ($player5 == getcharid(0)) { mes .npc$; mes "You are already ^00ff00Signed In^000000!"; menu "-Ok",Lok,"Sign Out!",-; set $player5,0; mapannounce "prontera","Free For All: " +strcharinfo(0)+ " signed out from 5ManFFA Next Match!",0; message strcharinfo(0),"You has been removed from 5ManFFA Next Match!"; close; } mes .npc$; mes "Hi ^5555FF" + strcharinfo(0) + "^000000"; next; mes .npc$; mes "You can register with me to play 5manFreeForAll."; menu "Register",Lregister,"^777777Nevermind^000000",Lnevermind; Lregister: if ($player1 == 0) { set $player1,getcharid(0); mapannounce "prontera","Free For All: 1 Person Registered for FFA Next Match!",0; message strcharinfo(0),"You have been Registered for 5manFFA as Player 1 in next match!"; goto checkon; } if ($player2 == 0) { set $player2,getcharid(0); mapannounce "prontera","Free For All: 2 Person Registered for FFA Next Match!",0; message strcharinfo(0),"You have been Registered for 5manFFA as Player 2 in next match!"; goto checkon; } if ($player3 == 0) { set $player3,getcharid(0); mapannounce "prontera","Free For All: We're Set!",0; message strcharinfo(0),"You have been Registered for 5manFFA as Player 3 in next match!"; goto checkon; } mes .npc$; if ($player4 == 0) { set $player4,getcharid(0); mapannounce "prontera","Free For All: We're Set!",0; message strcharinfo(0),"You have been Registered for 5manFFA as Player 4 in next match!"; goto checkon; } mes .npc$; if ($player5 == 0) { set $player5,getcharid(0); mapannounce "prontera","Free For All: We're Set!",0; message strcharinfo(0),"You have been Registered for 5manFFA as Player 5 in next match!"; goto checkon; } mes .npc$; mes "Sorry but there is a match in progress right now."; close; Lnevermind: mes .npc$; mes "i'll be here when you want =)"; close; checkon: set $player1$,"[^00ff00 On ^000000]"; set $player2$,"[^00ff00 On ^000000]"; set $player3$,"[^00ff00 On ^000000]"; set $player4$,"[^00ff00 On ^000000]"; set $player5$,"[^00ff00 On ^000000]"; if ($player1 == 0) { set $player1$,"[^ff0000 Off ^000000]"; } if ($player2 == 0) { set $player2$,"[^ff0000 Off ^000000]"; } if ($player3 == 0) { set $player3$,"[^ff0000 Off ^000000]"; } if ($player4 == 0) { set $player4$,"[^ff0000 Off ^000000]"; } if ($player5 == 0) { set $player5$,"[^ff0000 Off ^000000]"; } mes .npc$; mes "^0000ffPlayer One:^000000 " +$player1$+ "."; mes "^0000ffPlayer Two:^000000 " +$player2$+ "."; mes "^0000ffPlayer Three:^000000 " +$player3$+ "."; mes "^0000ffPlayer Four:^000000 " +$player4$+ "."; mes "^0000ffPlayer Five:^000000 " +$player5$+ "."; close2; set $@match,1; if ($player1 == 0) { set $@match,0; } if ($player2 == 0) { set $@match,0; } if ($player3 == 0) { set $@match,0; } if ($player4 == 0) { set $@match,0; } if ($player5 == 0) { set $@match,0; } if ($@match == 1) { warpchar "guild_vs1",32,66,$player1; goto label2; label2: warpchar "guild_vs1",57,44,$player2; goto label3; label3: warpchar "guild_vs1",42,27,$player3; goto label4; label4: warpchar "guild_vs1",73,31,$player4; goto label5; label5: warpchar "guild_vs1",11,51,$player5; goto matchstart; } Lok: close; matchstart: initnpctimer; OnTimer1000: end; OnTimer2000: end; OnTimer3000: getmapxy($mapname$,$mapx,$mapy,0); if($mapname$ == "guild_vs1") { message strcharinfo(0),"Buffs Removed!"; sc_end SC_All; end; } end; OnTimer4000: mapannounce "guild_vs1","Welcome to 5ManFreeForAll",0; end; OnTimer5000: end; OnTimer6000: callsub winner; end; OnTimer7000: callsub winner; end; OnTimer8000: callsub winner; end; OnTimer9000: callsub winner; end; OnTimer10000: callsub winner; end; OnTimer11000: callsub winner; end; OnTimer12000: callsub winner; end; OnTimer13000: callsub winner; end; OnTimer14000: callsub winner; end; OnTimer15000: callsub winner; end; OnTimer16000: callsub winner; end; OnTimer17000: callsub winner; end; OnTimer18000: callsub winner; end; OnTimer19000: callsub winner; end; OnTimer20000: callsub winner; end; OnTimer21000: callsub winner; end; OnTimer22000: callsub winner; end; OnTimer23000: callsub winner; end; OnTimer24000: callsub winner; end; OnTimer25000: callsub winner; end; OnTimer26000: callsub winner; end; OnTimer27000: callsub winner; end; OnTimer28000: callsub winner; end; OnTimer29000: callsub winner; end; OnTimer30000: callsub winner; end; OnTimer31000: callsub winner; end; OnTimer32000: callsub winner; end; OnTimer33000: callsub winner; end; OnTimee34000: callsub winner; end; OnTimer35000: callsub winner; end; OnTimer36000: callsub winner; end; OnTimer37000: callsub winner; end; OnTimer38000: callsub winner; end; OnTimer39000: callsub winner; end; OnTimer40000: callsub winner; end; OnTimer41000: callsub winner; end; OnTimer42000: callsub winner; end; OnTimer43000: callsub winner; end; OnTimer44000: callsub winner; end; OnTimer45000: callsub winner; end; OnTimer46000: callsub winner; end; OnTimer47000: callsub winner; end; OnTimer48000: callsub winner; end; OnTimer49000: callsub winner; end; OnTimer50000: callsub winner; end; OnTimer51000: callsub winner; end; OnTimer52000: callsub winner; end; OnTimer53000: callsub winner; end; OnTimer54000: callsub winner; end; OnTimer55000: callsub winner; end; OnTimer56000: callsub winner; end; OnTimer57000: callsub winner; end; OnTimer58000: callsub winner; end; OnTimer59000: callsub winner; end; // 1minute remaining OnTimer60000: mapannounce "guild_vs1","1 Minute Remaining!!",0; callsub winner; end; OnTimer61000: callsub winner; end; OnTimer62000: callsub winner; end; OnTimer63000: callsub winner; end; OnTimer64000: callsub winner; end; OnTimer65000: callsub winner; end; OnTimer66000: callsub winner; end; OnTimer67000: callsub winner; end; OnTimer68000: callsub winner; end; OnTimer69000: callsub winner; end; OnTimer70000: callsub winner; end; OnTimer71000: callsub winner; end; OnTimer72000: callsub winner; end; OnTimer73000: callsub winner; end; OnTimer74000: callsub winner; end; OnTimer75000: callsub winner; end; OnTimer76000: callsub winner; end; OnTimer77000: callsub winner; end; OnTimer78000: callsub winner; end; OnTimer79000: callsub winner; end; OnTimer80000: callsub winner; end; OnTimer81000: callsub winner; end; OnTimer82000: callsub winner; end; OnTimer83000: callsub winner; end; OnTimer84000: callsub winner; end; OnTimer85000: callsub winner; end; OnTimer86000: callsub winner; end; OnTimer87000: callsub winner; end; OnTimer89000: callsub winner; end; OnTimer90000: callsub winner; end; OnTimer91000: callsub winner; end; OnTimer92000: callsub winner; end; OnTimer93000: callsub winner; end; OnTimer94000: callsub winner; end; OnTimer95000: callsub winner; end; OnTimer96000: callsub winner; end; OnTimer97000: callsub winner; end; OnTimer98000: callsub winner; end; OnTimer99000: callsub winner; end; OnTimer100000: callsub winner; end; OnTimer101000: callsub winner; end; OnTimer102000: callsub winner; end; OnTimer103000: callsub winner; end; OnTimer104000: callsub winner; end; OnTimer105000: callsub winner; end; OnTimer106000: callsub winner; end; OnTimer107000: callsub winner; end; OnTimer108000: callsub winner; end; OnTimer109000: callsub winner; end; OnTimer110000: callsub winner; end; OnTimer111000: callsub winner; end; OnTimer112000: callsub winner; end; OnTimer113000: callsub winner; end; OnTimer114000: callsub winner; end; OnTimer115000: callsub winner; end; OnTimer116000: callsub winner; end; OnTimer117000: callsub winner; end; OnTimer118000: callsub winner; end; OnTimer119000: callsub winner; end; OnTimer120000: mapannounce "guild_vs1","The match will end without a winner...",0; callsub winner; end; OnTimer121000: callsub winner; end; OnTimer122000: callsub winner; end; OnTimer123000: callsub winner; end; OnTimer124000: callsub winner; end; OnTimer125000: callsub winner; mapwarp "guild_vs1","prontera",156,176; stopnpctimer; // match end. goto listo1; end; listo1: set $player1,0; set $player2,0; set $player3,0; set $player4,0; set $player5,0; set $@match,0; set $player1$,"[^ff0000 Off ^000000]"; set $player2$,"[^ff0000 Off ^000000]"; set $player3$,"[^ff0000 Off ^000000]"; set $player4$,"[^ff0000 Off ^000000]"; set $player5$,"[^ff0000 Off ^000000]"; goto end1; winner: if(getmapusers("guild_vs1") == 1) { mapwarp "guild_vs1","bat_b01",9,290; goto listo1; } return; end1: end; OnPCLogoutEvent: if ($player1 == getcharid(0)) { set $player1,0; end; } if ($player2 == getcharid(0)) { set $player2,0; end; } if ($player3 == getcharid(0)) { set $player3,0; end; } if ($player4 == getcharid(0)) { set $player4,0; end; } if ($player5 == getcharid(0)) { set $player5,0; end; } end; } // Prize bat_b01,9,290,4 script Prize 822,3,3,{ OnTouch: percentheal 100,100; sc_end SC_All; mes "[Mr. Prize]"; mes "Write your Character name (Exact Name pls)"; next; input .@name$; if(.@name$ != strcharinfo(0)) { mes "[Mr. Prize]"; mes "Are you sure of your name?"; goto OnTouch; } getitem 22555,2; warp "prontera",156,176; close; } //-------------------------- //== Mapflags ============== bat_b01 mapflag nobranch bat_b01 mapflag nomemo bat_b01 mapflag nopenalty bat_b01 mapflag noreturn bat_b01 mapflag noteleport bat_b01 mapflag nowarp bat_b01 mapflag nowarpto bat_b01 mapflag noicewall guild_vs1 mapflag nobranch guild_vs1 mapflag nomemo guild_vs1 mapflag nopenalty guild_vs1 mapflag noreturn guild_vs1 mapflag noteleport guild_vs1 mapflag nowarp guild_vs1 mapflag nowarpto guild_vs1 mapflag noicewall hi can edit my script? disable yggdrasil berry and yggdrasil seed auto out if got killed, auto Dispel if got call fighting, bump, Help, edit the script, for disable yggdrasil berry n seed, AutoRemove buffler, Players dead auto out, Help thx
  12. why my castle Kriemhild no spawn treasurebox in time 00.00? please help me
  13. read, im reloadbattleconf then reloadmobdb all no work im just copy paste it to my folder
  14. Hehe sorry I'm bad english, I want make homunculus strong, I don't know how to make it strong hehe thx master
  15. how make it? lvl 255, Can Fighting with players
  16. All Castle I want Disable , Just Prtg_cas01 i want open how?
  17. box just drop item 22556 (1pcs) 22555(1pcs) etc how to change like 22556(30pcs) etc thx
  18. its work Probably the worst error explanation ever. xD its working master i cant closed the npc after talk L_exit? can make it Private Mvp Room? thx
  19. can u make it winner take prize must go here n enter the name?
  20. prontera,164,191,4 script 3v3 757,{ mes "I am Party Match Manager."; mes "Party Leader may create a PVP Match here."; next; switch( select( ( .Created )?"Join Game[ ^FF0000"+.No+"vs"+.No+"^000000 ]":"Create Game", ( ( getgmlevel() >= .GMLevel || getcharid(0) == getpartyleader( getcharid(1),2 ) ) && .Created )?"^FF0000Remove Game^000000":"" )){ Case 1: switch( .Created ){ Case 0: getpartymember getcharid(1),1; if( getcharid(0) != getpartyleader( getcharid(1),2 ) || !getcharid(1) ){ mes "Sorry, but only a ^FF0000Party Leader^000000 can register a game here."; }else{ mes "How many Players for each Party Team ?"; mes "Min = 1"; mes "Because you only have "+$@partymembercount+" member right now."; next; input .No,3; announce "[ "+.No+"vs"+.No+" Party Match ] created by "+strcharinfo(0)+", you may register to join.",0; set .Team[0],getcharid(1); set .Created,1; } close; Case 1: if( !.Team[1] && getcharid(1) == .Team[0] ){ mes "Please wait for ^FF0000Team 2^000000 to Register."; }else{ if( getcharid(0) != getpartyleader( getcharid(1),2 ) || !getcharid(1) ){ mes "Sorry, but only a ^FF0000Party Leader^000000 can register a game here."; close; } getpartymember getcharid(1),1; if( $@partymembercount < .No ){ mes "You didnt have enough of "+.No+" Member for the Game."; mes "You only have "+$@partymembercount+" Member."; }else{ mes "Confirm Registration ?"; if( select("Yes:No") == 1 ){ set .Team[1],getcharid(1); set .Created,2; setarray .Members[0],.No,.No; for( set .@party,0; .@party < 2; set .@party,.@party + 1 ){ getpartymember .Team[.@party],1; for( set .@i,0; .@i < .No; set .@i,.@i + 1 ) warpchar .Map$,0,0,$@partymembercid[.@i]; } end; } } } close; Case 2: mes "^FF0000The Game is in Progress.^000000"; mes "[ A "+.No+" vs "+.No+" Game ]"; mes "Team ^FF0000"+getpartyname( .Team[0] )+"^000000 vs Team ^FF0000"+getpartyname( .Team[1] )+"^000000 ."; close; } close; Case 2: mes "Done, Match will be terminated right away."; mapannounce .Map$,"Match has been Cancelled by a GM.",0; close2; OnReset: deletearray .Team[0],getarraysize( .Team ); deletearray .Members[0],getarraysize( .Members ); if( .Winner ){ getpartymember .Winner,2; for( set .@i,0; .@i < .No; set .@i,.@i + 1 ){ getitem 22555,1,$@partymemberaid[.@i]; } set .Winner,0; } sleep2 2000; set .Created,0; mapwarp .Map$,"prontera",155,181; end; } close; OnPCDieEvent: OnPCLogoutEvent: if( strcharinfo(3) == .Map$ && .Created ){ for( set .@i,0; .@i < 2; set .@i,.@i + 1 ) if( getcharid(1) == .Team[.@i] ) set .Members[.@i],.Members[.@i] - 1; if( .Members[0] < 1 ) set .Winner,.Team[1]; else if( .Members[1] < 1 ) set .Winner,.Team[0]; if( .Winner ){ mapannounce .Map$,"Team "+getpartyname( .Winner )+" Win the "+.No+"vs"+.No+" Game.",0; donpcevent strnpcinfo(0)+"::OnReset"; }else{ warp "prontera",155,181; } } end; OnInit: set .GMLevel,80; set .Map$,"guild_vs1"; end; } script works problem just all party spawn in random place, the prize i want use this n if party got recall from npc , i want all got dispel frist // Prize bat_b01,9,290,4 script Prize 822,3,3,{ OnTouch: percentheal 100,100; sc_end SC_All; mes "[Mr. Prize]"; mes "Write your Character name (Exact Name pls)"; next; input .@name$; if(.@name$ != strcharinfo(0)) { mes "[Mr. Prize]"; mes "Are you sure of your name?"; goto OnTouch; } getitem 22555,2; warp "prontera",156,176; close; } //-------------------------- //== Mapflags ============== bat_b01 mapflag nobranch bat_b01 mapflag nomemo bat_b01 mapflag nopenalty bat_b01 mapflag noreturn bat_b01 mapflag noteleport bat_b01 mapflag nowarp bat_b01 mapflag nowarpto bat_b01 mapflag noicewall guild_vs1 mapflag nobranch guild_vs1 mapflag nomemo guild_vs1 mapflag nopenalty guild_vs1 mapflag noreturn guild_vs1 mapflag noteleport guild_vs1 mapflag nowarp guild_vs1 mapflag nowarpto guild_vs1 mapflag noicewall please fix it thx master disable ygg n got remove all buffer
  21. Thx so much master its no work bro , Can u Give Me Other Script ?thx
×
×
  • Create New...