Jump to content

Ronald

Members
  • Posts

    241
  • Joined

  • Last visited

  • Days Won

    2

Everything posted by Ronald

  1. Ronald

    Unable to move

    Another solution for that is @warp or @go . I guess it is a NPC script bug.
  2. prontera,142,170,5 script Freebies 936,{ mes "[Hello]"; mes "[I can give you a free gift based on your future job.]"; mes "[Please choose the correct item for the future job]"; if(!#Freebie) { mes "Select one:"; next; switch(select("Swordsman:Magician - Ninja:Archer - Gunslinger:Acolyte:Merchant - Taekwon :Thief")) { case 1: getitem 12537,1; getitem 7256,1500; getitem 7726,1500; //Item for Swordsman break; case 2: getitem 12537,1; getitem 7256,1500; getitem 7726,1500; //Item for Magician - Ninja break; case 3: getitem 12537,1; getitem 7256,1500; getitem 7726,1500; //Item for Archer - Gunslinger break; case 4: getitem 12537,1; getitem 7256,1500; getitem 7726,1500; //Item for Acolyte break; case 5: getitem 12537,1; getitem 7256,1500; getitem 7726,1500; //Item for Merchant - Taekwon break; case 6: getitem 12537,1; getitem 7256,1500; getitem 7726,1500; //Item for Thief break; } set #Freebie, 1; close; } OnInit: delwaitingroom; waitingroom "Get your freebies here ! ",0; end; } Just edit the Items.
  3. I don't think so that it's possible
  4. As you can see Skorm already gave you other option. You just need to add the script and load it.
  5. You mean in mob_db? Solved. Thank you!
  6. I know that. It was created by Euphy but I made one for my self but it doesn't work.
  7. May I request for a Dummy Damage Tester? I've searched some threads in rA Boards but I couldn't find anything working. Thank you!
  8. It doesn't work Thanks anyway!
  9. http://svn.rathena.org/svn/rathena/trunk/npc/merchants/socket_enchant.txt I know you'd be able to understand that.
  10. prontera,149,178,5 script PT vs PT Manager 52,{ 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 Max = "+$@partymembercount; mes "Because you only have "+$@partymembercount+" member right now."; next; input .No,1,$@partymembercount; 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 7558,5,$@partymemberaid[.@i]; getitem 12245,100,$@partymemberaid[.@i]; } set .Winner,0; } sleep2 2000; set .Created,0; mapwarp .Map$,"prontera",149,178; 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",149,178; } } end; OnInit: set .GMLevel,80; set .Map$,"guild_vs2"; end; } Any party leader can cancel the running event.
  11. http://rathena.org/board/topic/81874-guide-in-adding-a-custom-card-full-pls/ http://rathena.org/wiki/Custom_Items
  12. //= PvP //===== By: ================================================== //= Destinee~ //===== Description: ========================================= //= A basic PVP script. //===== Additional Comments: ================================= //= Dont copyright this and claiming that you've made this. Use it only for your own server. //============================================================ prontera,164,174,4 script Ultimate PvP Warper 796,{ mes "[PvP Warper]"; mes "You have ^FF0000"+#CASHPOINTS+" Cash Points^000000."; mes "Do you want to warp to the PvP Arena and fight your enemies?"; menu "Sure, Bring it on!",L_Yes,"Nah, I'm not ready yet.",L_No; L_Yes: mes "[PvP Warper]"; mes "Which PvP Arena do you want to enter?"; menu "PVP.1 With Costume Equip [" + getmapusers("pvp_y_1-2.gat") + " / 20]",L1, "PVP.2 No Donate , Costume [" + getmapusers("guild_vs3.gat") + " / 30]",L2; L1: if (getmapusers("pvp_y_1-2.gat") > 99) goto Lsorry; warp "pvp_y_1-2",0,0; close; L2: if (getmapusers("guild_vs3.gat") > 99) goto Lsorry; warp "guild_vs3",0,0; close; Lsorry: mes "[PvP Warper]"; mes "Sorry but this PvP Arena is full, maybe you could try another one."; close; L_No: close; OnInit: end; } // == Mapflags guild_vs2 mapflag loadevent guild_vs2 mapflag loadevent guild_vs2 mapflag nowarp guild_vs2 mapflag nowarpto guild_vs2 mapflag noteleport guild_vs2 mapflag nosave guild_vs2 mapflag nomemo guild_vs2 mapflag nobranch guild_vs2 mapflag nogo guild_vs2 mapflag nodrop guild_vs2 mapflag nocommand pvp_y_1-2 mapflag nowarp pvp_y_1-2 mapflag noteleport pvp_y_1-2 mapflag nomemo pvp_y_1-2 mapflag nogo pvp_y_1-2 mapflag nodrop pvp_y_1-2 mapflag nosave pvp_y_1-2 mapflag nobranch As you can see this is a working PVP. But I want it to put in a way that if a Player enters this PvP room it will say "Playername" has entered "PVP Map" Thank you guys. Fixed already >.< Sorry please lock this thread.
  13. Mind fixing all the warnings. Fix them one by one.
  14. Ronald

    Pvp with bet.

    Up for this. I think this is a good idea. Hehe. Hope to see update on this one. I'll definitely use this script
  15. Why not make it in a way that If Specific account ID (Correct) then NPC will give the Item?
  16. Hi there guys. Would it be possible to disconnect a specific account when being logged-in with different IP other than the IP that I use? If yes please help me. Thank you! I've solved this already. Sorry for this one. I don't know how to delete this. >.<
  17. Ronald

    Help :)

    - script Sample -1,{ OnPCLoginEvent: if ( !#enabled || #pw$ == "" ) end; sc_start SC_BERSERK, 1000000000, 1; mes .npc$; mes "Input your account password"; next; input @pass$; if ( @pass$ == #pw$ ) { sc_end SC_BERSERK; percentheal 100, 100; end; } sc_end SC_BERSERK; atcommand "@kick " +strcharinfo(0); end; OnSecurity: mes .npc$; mes "Hello " +strcharinfo(0)+ ", What can i do for you?"; next; switch (select("Password Protection ( "+(#enabled?"^009933Enabled":"^FF0000Disabled")+"^000000 ):Setup a password:Delete my password:Nothing")) { case 1: if ( #pw$ == "" ) { mes .npc$; mes "You cannot enable the password protection if you don't have a password."; close; } if ( #enabled ) #enabled = 0; else #enabled = 1; message strcharinfo(0),"You have " +(#enabled?"enabled":"disabled")+ " the security system on your account"; break; case 2: if ( #pw$ != "" ) { mes .npc$; mes "You already have a password for your account."; close; } mes .npc$; mes "Input your account password"; next; input @pw$; if ( @pw$ == "" ) end; #pw$ = @pw$; message strcharinfo(0),"You have set your account password (" +#pw$+ ")"; break; case 3: if ( #pw$ == "" ) { mes .npc$; mes "You don't have a password to delete."; close; } #pw$ = ""; if ( #enabled ) #enabled = 0; message strcharinfo(0),"You have deleted your account password"; break; case 4: break; default: break; } end; OnInit: .npc$ = "[ ^FF0000" +strnpcinfo(1)+ "^000000 ]"; bindatcmd "security",strnpcinfo(3)+"::OnSecurity"; end; } So as you can see this is working already. Would it be possible that a character in this state (Berserk) couldn't be recalled by a GM or Ecalled by a Guild? Just wondering because I was trying to put a security. If there's a way please help me Thank you guys Already solved this one w/ another script. I don't know how to delete threads. Sorry.
  18. Thank you for your time Sir. I really appreciate it.
  19. By that I don't need to bind them one by one?
  20. Okay Sir Thank you. Because it would cost alot of time if I'm going to bind all the following possible case on a specific command. And Sir Emistry also told me about the charisupper and charislower this but I don't know how to use those things.
  21. Is that the only way? So I need to bind all the possible case?
  22. - script asdjkasdj -1,{ end; OnInit: bindatcmd "item", strnpcinfo(0)+"::Onaaa"; end; Onaaa: if ( .@atcmd_parameters$[0] == "*********" ) atcommand "@item "+ .@atcmd_parameters$[1] +" "+ .@atcmd_parameters$[2]; else message strcharinfo(0), "Wrong password SIR/MAAM"; end; } Hi guys. I just need help. Because I have a problem. As you can see I binded @item w/ a password but a Admin Level GM just needs to use @IteM or @iTem or whatever He/She wants as long as it's @item in different case sensitivity. I just want to know how would I be able to bind the command in any case-sensitive. Thank you for your help guys!
  23. You use the search button you just have to change the cost. Look for Quest NPC.
×
×
  • Create New...