Jump to content

hendra814

Members
  • Posts

    1191
  • Joined

  • Last visited

  • Days Won

    17

Everything posted by hendra814

  1. hendra814

    idRO NPC

    Gan Cydh, ini masih work untuk client 2015 untuk item_cash dbnya. atkutnya di client 2015 jadinya berantakan.
  2. prt_in,61,54,3 script Refiner 826,{ OnUsed: set .Mode,0; // Refine mode [ 0 = Refine +1 Each time / 1 = Refine to Max Limit ] set .EquipCheck,1; // Check Equips is refineable or not. [ 0 = Disable / 1 = Enable ] set .MaxRefine,4; // Max Refine Limit set .MaxRefine2,7; // Max Refine Limit [ for Mode 2 Max Refine ] set .TicketID,7539; // Ticket ID if( countitem(.TicketID) < 1 ){ mes "you don't have "+getitemname(.TicketID)+" to continue refine."; end; } switch(select( ( getequiprefinerycnt(6) >= .MaxRefine2 || getequipisequiped(6) == 0 )?"":"Upper Headgear [ ^4EEE94"+getequipname(6)+"^000000 ]", ( getequiprefinerycnt(5) >= .MaxRefine2 || getequipisequiped(5) == 0 )?"":"Middle Headgear [ ^4EEE94"+getequipname(5)+"^000000 ]", ( getequiprefinerycnt(4) >= .MaxRefine2 || getequipisequiped(4) == 0 )?"":"Lower Headgear [ ^4EEE94"+getequipname(4)+"^000000 ]", ( getequiprefinerycnt(7) >= .MaxRefine2 || getequipisequiped(7) == 0 )?"":"Armor [ ^4EEE94"+getequipname(7)+"^000000 ]", ( getequiprefinerycnt(8) >= .MaxRefine2 || getequipisequiped(8) == 0 )?"":"Left Hand [ ^4EEE94"+getequipname(8)+"^000000 ]", ( getequiprefinerycnt(9) >= .MaxRefine2 || getequipisequiped(9) == 0 )?"":"Right Hand [ ^4EEE94"+getequipname(9)+"^000000 ]", ( getequiprefinerycnt(3) >= .MaxRefine2 || getequipisequiped(3) == 0 )?"":"Garment [ ^4EEE94"+getequipname(3)+"^000000 ]", ( getequiprefinerycnt(2) >= .MaxRefine2 || getequipisequiped(2) == 0 )?"":"Shoes [ ^4EEE94"+getequipname(2)+"^000000 ]", ( getequiprefinerycnt(1) >= .MaxRefine2 || getequipisequiped(1) == 0 )?"":"Accessory [ ^4EEE94"+getequipname(1)+"^000000 ]", ( getequiprefinerycnt(0) >= .MaxRefine2 || getequipisequiped(0) == 0 )?"":"Accessory [ ^4EEE94"+getequipname(0)+"^000000 ]", "^FF0000end^000000")) { Case 1: if ( .Mode == 0 ) { callsub RefineSystem,6; } if ( .Mode == 1 ) { callsub MaxRefineSystem,6; } if ( .Mode == 2 ) { callsub NewRefineSystem,6; } Case 2: if ( .Mode == 0 ) { callsub RefineSystem,5; } if ( .Mode == 1 ) { callsub MaxRefineSystem,5; } if ( .Mode == 2 ) { callsub NewRefineSystem,5; } Case 3: if ( .Mode == 0 ) { callsub RefineSystem,4; } if ( .Mode == 1 ) { callsub MaxRefineSystem,4; } if ( .Mode == 2 ) { callsub NewRefineSystem,4; } Case 4: if ( .Mode == 0 ) { callsub RefineSystem,7; } if ( .Mode == 1 ) { callsub MaxRefineSystem,7; } if ( .Mode == 2 ) { callsub NewRefineSystem,7; } Case 5: if ( .Mode == 0 ) { callsub RefineSystem,8; } if ( .Mode == 1 ) { callsub MaxRefineSystem,8; } if ( .Mode == 2 ) { callsub NewRefineSystem,8; } Case 6: if ( .Mode == 0 ) { callsub RefineSystem,9; } if ( .Mode == 1 ) { callsub MaxRefineSystem,9; } if ( .Mode == 2 ) { callsub NewRefineSystem,9; } Case 7: if ( .Mode == 0 ) { callsub RefineSystem,3; } if ( .Mode == 1 ) { callsub MaxRefineSystem,3; } if ( .Mode == 2 ) { callsub NewRefineSystem,3; } Case 8: if ( .Mode == 0 ) { callsub RefineSystem,2; } if ( .Mode == 1 ) { callsub MaxRefineSystem,2; } if ( .Mode == 2 ) { callsub NewRefineSystem,2; } Case 9: if ( .Mode == 0 ) { callsub RefineSystem,1; } if ( .Mode == 1 ) { callsub MaxRefineSystem,1; } if ( .Mode == 2 ) { callsub NewRefineSystem,1; } Case 10: if ( .Mode == 0 ) { callsub RefineSystem,0; } if ( .Mode == 1 ) { callsub MaxRefineSystem,0; } if ( .Mode == 2 ) { callsub NewRefineSystem,0; } Case 11: end; } RefineSystem: if ( .EquipCheck == 1 && getequipisenableref(getarg(0)) == 0 ){ mes "this item is unrefinable."; end; } if(getequiprefinerycnt(getarg(0)) < .MaxRefine) { mes "I'm can't upgrade this item."; mes "you must upgrade into ^0000FF+4^000000"; mes "berfore you bring it to me."; end; } successrefitem (getarg(0)); message strcharinfo(0),"done."; delitem .TicketID,1; end; MaxRefineSystem: if ( .EquipCheck == 1 && getequipisenableref(getarg(0)) == 0 ){ mes "This item is unrefinable."; end; } for ( set .@i,getequiprefinerycnt(getarg(0)); getequiprefinerycnt(getarg(0)) < .MaxRefine; set .@i,getequiprefinerycnt(getarg(0)) ){ successrefitem (getarg(0)); } message strcharinfo(0),"done."; delitem .TicketID,1; end; NewRefineSystem: if ( .EquipCheck == 1 && getequipisenableref(getarg(0)) == 0 ){ mes "this item is unrefinable."; end; } mes "i'm just upgrade from +4 ~ +7."; next; while ( countitem(.TicketID) > 0 && getequiprefinerycnt(getarg(0)) < .MaxRefine ){ successrefitem (getarg(0)); delitem .TicketID,1; } while ( countitem(.TicketID) > 1 && getequiprefinerycnt(getarg(0)) > .MaxRefine && getequiprefinerycnt(getarg(0)) < .MaxRefine2 ){ successrefitem (getarg(0)); delitem .TicketID,1; } message strcharinfo(0),"Done."; end; } prontera,171,226,4 script Great Refiner 826,{ setarray .@slots[0],2,3,4,5,6,7,8,9,10; for( set .@a,0; .@a < getarraysize(.@slots); set .@a,.@a + 1 ) { if( getequipisequiped(.@slots[.@a]) ) { if( .@slots[.@a] == 3 || .@slots[.@a] == 4) { switch( getequipweaponlv(.@slots[.@a]) ) { case 0: set .@r, 4; break; default: set .@r, 8 - getequipweaponlv(.@slots[.@a]); break; } } else { set .@r, 4; } set .@refinefix,.@r-getequiprefinerycnt(.@slots[.@a]); if(getequiprefinerycnt(.@slots[.@a]) < .@r && getequipisenableref(.@slots[.@a]) ) { for( set .@i,0; .@i < .@refinefix; set .@i,.@i + 1) successrefitem .@slots[.@a]; } } sleep2 100; } }
  3. please help me fix this script this one can't refine to safe limit for armor only *Solved prontera,171,226,4 script Great Refiner 826,{ setarray .@slots[0],1,2,3,4,5,6,9,10; //change into setarray .@slots[0],2,3,4,5,6,7,8,9,10; for( set .@a,0; .@a < getarraysize(.@slots); set .@a,.@a + 1 ) { if( getequipisequiped(.@slots[.@a]) ) { if( .@slots[.@a] == 3 || .@slots[.@a] == 4) { switch( getequipweaponlv(.@slots[.@a]) ) { case 0: set .@r, 4; break; default: set .@r, 8 - getequipweaponlv(.@slots[.@a]); break; } } else { set .@r, 4; } set .@refinefix,.@r-getequiprefinerycnt(.@slots[.@a]); if(getequiprefinerycnt(.@slots[.@a]) < .@r && getequipisenableref(.@slots[.@a]) ) { for( set .@i,0; .@i < .@refinefix; set .@i,.@i + 1) successrefitem .@slots[.@a]; } } sleep2 100; } } and this one for armor slot with shoes, so can't refine armor equipment too *Solved prt_in,61,54,3 script Refiner 826,{ OnUsed: set .Mode,0; // Refine mode [ 0 = Refine +1 Each time / 1 = Refine to Max Limit ] set .EquipCheck,1; // Check Equips is refineable or not. [ 0 = Disable / 1 = Enable ] set .MaxRefine,4; // Max Refine Limit set .MaxRefine2,7; // Max Refine Limit [ for Mode 2 Max Refine ] set .TicketID,7539; // Ticket ID if( countitem(.TicketID) < 1 ){ mes "you don't have "+getitemname(.TicketID)+" to continue refine."; end; } switch(select( ( getequiprefinerycnt(6) >= .MaxRefine2 || getequipisequiped(1) == 0 )?"":"Headgear [ ^4EEE94"+getequipname(1)+"^000000 ]", ( getequiprefinerycnt(2) >= .MaxRefine2 || getequipisequiped(2) == 0 )?"":"Armor [ ^4EEE94"+getequipname(2)+"^000000 ]", ( getequiprefinerycnt(3) >= .MaxRefine2 || getequipisequiped(3) == 0 )?"":"Left Hand [ ^4EEE94"+getequipname(3)+"^000000 ]", ( getequiprefinerycnt(4) >= .MaxRefine2 || getequipisequiped(4) == 0 )?"":"Right Hand [ ^4EEE94"+getequipname(4)+"^000000 ]", ( getequiprefinerycnt(5) >= .MaxRefine2 || getequipisequiped(5) == 0 )?"":"Garment [ ^4EEE94"+getequipname(5)+"^000000 ]", ( getequiprefinerycnt(6) >= .MaxRefine2 || getequipisequiped(6) == 0 )?"":"Shoes [ ^4EEE94"+getequipname(6)+"^000000 ]", "^FF0000end^000000")) { Case 1: if ( .Mode == 0 ) { callsub RefineSystem,1; } if ( .Mode == 1 ) { callsub MaxRefineSystem,1; } if ( .Mode == 2 ) { callsub NewRefineSystem,1; } Case 2: if ( .Mode == 0 ) { callsub RefineSystem,2; } if ( .Mode == 1 ) { callsub MaxRefineSystem,2; } if ( .Mode == 2 ) { callsub NewRefineSystem,2; } Case 3: if ( .Mode == 0 ) { callsub RefineSystem,3; } if ( .Mode == 1 ) { callsub MaxRefineSystem,3; } if ( .Mode == 2 ) { callsub NewRefineSystem,3; } Case 4: if ( .Mode == 0 ) { callsub RefineSystem,4; } if ( .Mode == 1 ) { callsub MaxRefineSystem,4; } if ( .Mode == 2 ) { callsub NewRefineSystem,4; } Case 5: if ( .Mode == 0 ) { callsub RefineSystem,5; } if ( .Mode == 1 ) { callsub MaxRefineSystem,5; } if ( .Mode == 2 ) { callsub NewRefineSystem,5; } Case 6: if ( .Mode == 0 ) { callsub RefineSystem,6; } if ( .Mode == 1 ) { callsub MaxRefineSystem,6; } if ( .Mode == 2 ) { callsub NewRefineSystem,6; } Case 7: end; } RefineSystem: if ( .EquipCheck == 1 && getequipisenableref(getarg(0)) == 0 ){ mes "this item is unrefinable."; end; } if(getequiprefinerycnt(getarg(0)) < .MaxRefine) { mes "i'm can't refine this item."; mes "you must upgrade ^0000FF+4^000000"; mes "before bring it to me."; end; } successrefitem (getarg(0)); message strcharinfo(0),"done."; delitem .TicketID,1; end; MaxRefineSystem: if ( .EquipCheck == 1 && getequipisenableref(getarg(0)) == 0 ){ mes "this item is unrefinable."; end; } for ( set .@i,getequiprefinerycnt(getarg(0)); getequiprefinerycnt(getarg(0)) < .MaxRefine; set .@i,getequiprefinerycnt(getarg(0)) ){ successrefitem (getarg(0)); } message strcharinfo(0),"done."; delitem .TicketID,1; end; NewRefineSystem: if ( .EquipCheck == 1 && getequipisenableref(getarg(0)) == 0 ){ mes "this item is unrefinable."; end; } mes "i'm only refine +4 ~ +7."; next; while ( countitem(.TicketID) > 0 && getequiprefinerycnt(getarg(0)) < .MaxRefine ){ successrefitem (getarg(0)); delitem .TicketID,1; } while ( countitem(.TicketID) > 1 && getequiprefinerycnt(getarg(0)) > .MaxRefine && getequiprefinerycnt(getarg(0)) < .MaxRefine2 ){ successrefitem (getarg(0)); delitem .TicketID,1; } message strcharinfo(0),"done."; end; }
  4. please help me fix this script this one can't refine to safe limit for armor only prontera,171,226,4 script Great Refiner 826,{ setarray .@slots[0],1,2,3,4,5,6,9,10; for( set .@a,0; .@a < getarraysize(.@slots); set .@a,.@a + 1 ) { if( getequipisequiped(.@slots[.@a]) ) { if( .@slots[.@a] == 3 || .@slots[.@a] == 4) { switch( getequipweaponlv(.@slots[.@a]) ) { case 0: set .@r, 4; break; default: set .@r, 8 - getequipweaponlv(.@slots[.@a]); break; } } else { set .@r, 4; } set .@refinefix,.@r-getequiprefinerycnt(.@slots[.@a]); if(getequiprefinerycnt(.@slots[.@a]) < .@r && getequipisenableref(.@slots[.@a]) ) { for( set .@i,0; .@i < .@refinefix; set .@i,.@i + 1) successrefitem .@slots[.@a]; } } sleep2 100; } } and this one for armor slot with shoes, so can't refine armor equipment too prt_in,61,54,3 script Refiner 826,{ OnUsed: set .Mode,0; // Refine mode [ 0 = Refine +1 Each time / 1 = Refine to Max Limit ] set .EquipCheck,1; // Check Equips is refineable or not. [ 0 = Disable / 1 = Enable ] set .MaxRefine,4; // Max Refine Limit set .MaxRefine2,7; // Max Refine Limit [ for Mode 2 Max Refine ] set .TicketID,7539; // Ticket ID if( countitem(.TicketID) < 1 ){ mes "you don't have "+getitemname(.TicketID)+" to continue refine."; end; } switch(select( ( getequiprefinerycnt(1) >= .MaxRefine2 || getequipisequiped(1) == 0 )?"":"Headgear [ ^4EEE94"+getequipname(1)+"^000000 ]", ( getequiprefinerycnt(2) >= .MaxRefine2 || getequipisequiped(2) == 0 )?"":"Armor [ ^4EEE94"+getequipname(2)+"^000000 ]", ( getequiprefinerycnt(3) >= .MaxRefine2 || getequipisequiped(3) == 0 )?"":"Left Hand [ ^4EEE94"+getequipname(3)+"^000000 ]", ( getequiprefinerycnt(4) >= .MaxRefine2 || getequipisequiped(4) == 0 )?"":"Right Hand [ ^4EEE94"+getequipname(4)+"^000000 ]", ( getequiprefinerycnt(5) >= .MaxRefine2 || getequipisequiped(5) == 0 )?"":"Garment [ ^4EEE94"+getequipname(5)+"^000000 ]", ( getequiprefinerycnt(6) >= .MaxRefine2 || getequipisequiped(6) == 0 )?"":"Shoes [ ^4EEE94"+getequipname(6)+"^000000 ]", "^FF0000end^000000")) { Case 1: if ( .Mode == 0 ) { callsub RefineSystem,1; } if ( .Mode == 1 ) { callsub MaxRefineSystem,1; } if ( .Mode == 2 ) { callsub NewRefineSystem,1; } Case 2: if ( .Mode == 0 ) { callsub RefineSystem,2; } if ( .Mode == 1 ) { callsub MaxRefineSystem,2; } if ( .Mode == 2 ) { callsub NewRefineSystem,2; } Case 3: if ( .Mode == 0 ) { callsub RefineSystem,3; } if ( .Mode == 1 ) { callsub MaxRefineSystem,3; } if ( .Mode == 2 ) { callsub NewRefineSystem,3; } Case 4: if ( .Mode == 0 ) { callsub RefineSystem,4; } if ( .Mode == 1 ) { callsub MaxRefineSystem,4; } if ( .Mode == 2 ) { callsub NewRefineSystem,4; } Case 5: if ( .Mode == 0 ) { callsub RefineSystem,5; } if ( .Mode == 1 ) { callsub MaxRefineSystem,5; } if ( .Mode == 2 ) { callsub NewRefineSystem,5; } Case 6: if ( .Mode == 0 ) { callsub RefineSystem,6; } if ( .Mode == 1 ) { callsub MaxRefineSystem,6; } if ( .Mode == 2 ) { callsub NewRefineSystem,6; } Case 7: end; } RefineSystem: if ( .EquipCheck == 1 && getequipisenableref(getarg(0)) == 0 ){ mes "this item is unrefinable."; end; } if(getequiprefinerycnt(getarg(0)) < .MaxRefine) { mes "i'm can't refine this item."; mes "you must upgrade ^0000FF+4^000000"; mes "before bring it to me."; end; } successrefitem (getarg(0)); message strcharinfo(0),"done."; delitem .TicketID,1; end; MaxRefineSystem: if ( .EquipCheck == 1 && getequipisenableref(getarg(0)) == 0 ){ mes "this item is unrefinable."; end; } for ( set .@i,getequiprefinerycnt(getarg(0)); getequiprefinerycnt(getarg(0)) < .MaxRefine; set .@i,getequiprefinerycnt(getarg(0)) ){ successrefitem (getarg(0)); } message strcharinfo(0),"done."; delitem .TicketID,1; end; NewRefineSystem: if ( .EquipCheck == 1 && getequipisenableref(getarg(0)) == 0 ){ mes "this item is unrefinable."; end; } mes "i'm only refine +4 ~ +7."; next; while ( countitem(.TicketID) > 0 && getequiprefinerycnt(getarg(0)) < .MaxRefine ){ successrefitem (getarg(0)); delitem .TicketID,1; } while ( countitem(.TicketID) > 1 && getequiprefinerycnt(getarg(0)) > .MaxRefine && getequiprefinerycnt(getarg(0)) < .MaxRefine2 ){ successrefitem (getarg(0)); delitem .TicketID,1; } message strcharinfo(0),"done."; end; }
  5. using 2015-10-29 and last rathena have this problem
  6. todah i have this problem with the lastest rathena
  7. here Thanks but i have this error , when i login in, it goes inside, but i cant move, now chat here in map serve t says its loggoff , sorry noob question, any idea how to solve this? try update your KRO client. same as the first problem i've handled
  8. try this https://rathena.org/board/topic/105222-2015-10-29aragexere-error/
  9. how about this error clientinfo.xml using version 54 and mmo.h already 20151029. and this is my option using NEMO Edit: already solved. Thanks rathena.
  10. help, why i always failed when going to char selection edit: already solved. Thanks rathena
  11. here image problem after uninstal and delete mysql folder then reinstall again and here for the problem change root pass with another key
  12. same here, im looking for 2015-10-01bRagexeRE for the 2015-09-16aRagexeRE here the link https://mega.nz/#!8pQzwSwD!CyeyYi0PwZLNg3rlUu_3IFlZTbDpKr43E3Zs_slWdHE
  13. Gan mau tanya ni. ada teman saya yang sudah pernah install offline server rathena menggunakan mysql. tapi karena bosan dia uninstal mysql dan clientnya. masalahnya waktu dia mau coba main lagi, ada problem sewaktu install myqlnya pada saat start mysql instalasi selalu ada eror. sudah dicoba uninstall mysqlnya dan delete folder mysql di program files juga menggunakan applikasi cleaner hasilnya sama saja. password untuk root coba diganti juga tetap tidak bisa.
  14. Hi all, i'm already try looking this command at Rathena, but i'm found it at another forum. So i hope this command officiall into Rathena emulator here i found from another emulator, hope this can help src moderator hercules: http://herc.ws/board/topic/576-whosell-command/ eathena: https://eathena.ws/board/index.php?showtopic=216350 Thanks for helping and support.
  15. take up to date translated from here https://github.com/ROClientSide/Translation
  16. i made like that because he not mention like player just kill monster on spesific map or just kill spesific monster.
  17. prontera.gat,0,0,0 script KillMob -1,{ OnNPCKillEvent: getitem 969,100; getitem 7539,100; warp "SavePoint", 0, 0; }
  18. Char_athena only change char_ip map_athena only change map_ip
  19. Thanks all, already solve with that file. mine is not update (differrent size)
  20. can someone help me this problem client 2015-05-13
  21. try this one http://herc.ws/board/topic/398-client-translation-project/
  22. try this one guild_ranker.txt
  23. i'm already have that file, but still got the message
×
×
  • Create New...