Jump to content

JassMax

Members
  • Posts

    235
  • Joined

  • Last visited

Everything posted by JassMax

  1. that's original script!! -.- Since renwal come ..Thanatos only work with hard Def, i want to make work it with soft Def which increasing by Vit
  2. not working its give same damge with high vit user..
  3. is this script will give more damage on higher vit user? Bump~ i want to give Thanatos card Pre-Renwal effect [i dont want to change Renwal in to Pre-Renwal] should give damage more when other user has high vit not only refining def Thanatos card should work with Soft def and Hard def if there is Source modification plz let me know.. i will change .. thanks in advance
  4. I want to add card effect user should give more damage on high vit user
  5. Bump~ I really want to know how it will work thanks in advance found it xD
  6. im getting this error could anyone plz help? Script // WoE Setter 3 Plug-in // GM - Castle Ownership Change // By: [GM]Xeon // Version: 1.0.1 - script WoES3Pl_RChangeOwnership -1,{ end; OnLoadPlugins: //The following section adds the plug-in to the main NPC set $@woes3_pl_gmmenu$[getarraysize($@woes3_pl_gmmenu$)], "Change Castle Ownership"; set $@woes3_pl_gm$[getarraysize($@woes3_pl_gm$)], "ChangeOwnership"; end; } function script WoES3Pl_ChangeOwnership { L_Select: dispbottom "Select castle(s) to change the ownership of, enter the guild ID to change it when selected, otherwise enter 0 to release the castle(s)."; menu $woe_towns$[1]+":"+$woe_towns$[2]+":"+$woe_towns$[3]+":"+$woe_towns$[4]+":"+$woe_towns$[5]+":"+$woe_towns$[6]+":"+$woe_towns$[7],-,"^FF0000Change all",-,"^000000Back",L_Return; if (@menu==8) { dispbottom "Are you positive you wish to change ownership for ALL castles for ALL towns?"; if (select("No","Yes")==2) { input .@gid; callsub(S_Change,127,31,.@gid); } goto L_Select; } set @temp, 64; for (set .@i, 7; .@i>0; set .@i,.@i-1) { if (.@i==@menu) { set @town, @temp; set @town_, .@i; } set @temp, @temp/2; } L_SelectCastles: menu getd("$woe_cas"+@town_+"_1$[1]")+":"+getd("$woe_cas"+@town_+"_1$[2]")+":"+getd("$woe_cas"+@town_+"_1$[3]")+":"+getd("$woe_cas"+@town_+"_1$[4]")+((@set_town!=5)?":"+getd("$woe_cas"+@town_+"_1$[5]"):""),-,"Change all",-,"Back",L_Select; if (@menu==6) { dispbottom "Are you positive you wish to change ownership for ALL castles for this town?"; if (select("No","Yes")==2) { input .@gid; callsub(S_Change,@town,31,.@gid); } goto L_Select; } set @temp, 16; for (set .@i, 5; .@i>0; set .@i,.@i-1) { if (.@i==@menu) { set @cas, @temp; set @cas_,.@i; } set @temp, @temp/2; } input .@gid; callsub(S_Change,@town,@cas,.@gid); goto L_SelectCastles; L_Return: return; //Sub that sets castle ownership castles //arg0=Town(s) bitmask, 127=All //arg1=Castle(s) bitmask, 31=All //arg2=Guild ID S_Change: if (!getarg(2)||getguildname(getarg(2))=="null") { set .@ownerid, 0; set .@ownername$, "No Owner"; } else { set .@ownername$, getguildname(getarg(2)); set .@ownerid, getarg(2); } set .@tcode, getarg(0); set .@tcurrent, 64; for (set .@i_, 7; .@i_>0; set .@i_,.@i_-1) { if (.@tcode>=.@tcurrent) { set .@temp$, ""; set .@ccode, getarg(1); set .@ccurrent, 16; for (set .@i, 5; .@i>0; set .@i,.@i-1) { if (.@ccode>=.@ccurrent) { setcastledata(getd("$woe_cas"+.@i_+"_3$["+.@i+"]"),1,.@ownerid); set .@temp$, .@temp$+getd("$woe_cas"+.@i_+"_1$["+.@i+"]")+((.@ccode>.@ccurrent)?", ":" "); if (.@i_<5) { disablenpc "Kafra Staff#"+getd("$woe_cas"+.@i_+"_3$["+.@i+"]"); GetCastleData getd("$woe_cas"+.@i_+"_3$["+.@i+"]"),0,"::OnRecvCastle"; } //Some OnRecvCastle label in a guild script is spitting out 'Map "" not found' debugs =( if (.@i_>5) { disablenpc "Kafra Employee#"+((.@i==6)?"sch":"aru")+"0"+.@i; GetCastleData getd("$woe_cas"+.@i_+"_3$["+.@i+"]"),0,"::OnRecvCastle"+((.@i==6)?"sc":"Ar")+"0"+.@i; } for( set .@n, 4; .@n <= 9; set .@n, .@n+1 ) { SetCastleData getd("$woe_cas"+.@i_+"_3$["+.@i+"]"), .@n, 0; } set .@ccode, .@ccode-.@ccurrent; } set .@ccurrent, .@ccurrent/2; } if (getarg(0)!=127&&.@tcurrent!=16) announce "Castle ownership changed to [ "+.@ownername$+" ] for "+$woe_towns$[.@i_]+" ( Castle(s): "+((getarg(1)==31)?"All":.@temp$)+" )!",bc_all|bc_yellow; set .@tcode, .@tcode-.@tcurrent; } set .@tcurrent,.@tcurrent/2; } if (getarg(0)==127) { set .@temp$, ""; set .@ccode, getarg(1); set .@ccurrent, 16; for (set .@i, 5; .@i>0; set .@i,.@i-1) { if (.@ccode>=.@ccurrent) set .@temp$, .@temp$+.@i+((.@ccode>.@ccurrent)?", ":" "); set .@ccode, .@ccode-.@ccurrent; set .@ccurrent, .@ccurrent/2; } announce "Castle ownership changed to [ "+.@ownername$+" ] for All Towns ( Castle(s): "+((getarg(1)==31)?"All":.@temp$)+" )!",bc_all|bc_yellow; } return; } error in CMD Bump~
  7. Hello thanks a lot met..its working now can u add this in this script as well new_zone02,78,101,6 script Cat De Smith 559,{ mes "[Refine Master]"; mes "Greetings!"; mes "I can refine and de-refine an item with ^006400Lotto Ball^000000."; mes "You don't have to worry! There's no chance of breaking your item."; mes "Per refine an item i will charge"; mes "^0000FF1^000000 x ^9F81F7Lotto Ball No.4^000000 "; mes "for de-refine an item i will charge ^0000FF1^000000 x ^FE2E2ELotto Ball No.3^000000 "; next; mes "[Refine Master]"; mes "So tell me what may i do for you?"; next; switch (select("Refine","De-Refine")) { case 1: mes "[Refine Master]"; mes "Which equipment you want to ?"; mes "refine ?"; callfunc( "RefineFunc",7364 ,1,831,0,10,1,0,100 ); end; case 2: setarray .@ItemID[0],7363,1; mes "[Refine Master]"; mes "Which equipment you want to de-refine?"; mes "Required ^FF00001 x Lotto ball 03^000000"; if( countitem( .@ItemID[0] ) >= .@ItemID[1] ){ for( set .@i,1; .@i <= 10; set .@i,.@i + 1 ) set .@Menu$,.@Menu$ + (( getequipid(.@i) > 0 && getequiprefinerycnt(.@i) )? getitemname(getequipid(.@i)):"" )+":"; set .@i,select(.@Menu$); setarray .@GetData[0],getequipid(.@i),getequipcardid(.@i,0),getequipcardid(.@i,1),getequipcardid(.@i,2),getequipcardid(.@i,3); failedrefitem .@i; delitem .@ItemID[0],.@ItemID[1]; getitem2 .@GetData[0],1,1,0,0,.@GetData[1],.@GetData[2],.@GetData[3],.@GetData[4]; equip .@GetData[0]; mes "Done."; } end; } } this is different script which is more better but.. this also refine per ball.. i want same like this if player has 10 balls it will direct refine +10 refining depends on their balls how many they has,,, max refine is 10 can u please edit this script and allow to direct refine to max lvl
  8. Its still +10 refine in 1 lotto ball Bump~
  9. Hii but item get refine +10 in 1 lotto ball 04 it should be required 10 > lotto balls 04 to get +10 refine. and if player has 5 lotto balls in their inventory it should refine +5
  10. Hello thank you for replying I want to make if i have 10 lotto balls it should refine direct +10 but this is refining per item gives 1 time only.. Bump~
  11. Getting an Error in CMD. I try to understand the problem but i couldn't im not really good in scripting i need help Here is my Script new_zone02,79,101,6 script Lotto4 Refiner 414,{ mes "[Lotto4 Refiner]"; if(countitem(7364)>=1) goto L_Refine; mes "You don't have any Lotto4s with you, come back again when you have them."; close; L_Refine: mes "Please select which item to refine:"; next; menu getequipname(1),PART1,getequipname(2),PART2,getequipname(3),PART3,getequipname(4),PART4,getequipname(5),PART5, getequipname(6),PART6,getequipname(7),PART7,getequipname(8),PART8,getequipname(9),PART9,getequipname(10),PART10; //Head Gear PART1: set @part,1; if (getequipisequiped(1)) goto CHECK1; mes "[Lotto4 Refiner]"; mes "Do you want me to refine your dumb brain?"; emotion 6; goto M_Menu; //Armor PART2: set @part,2; if (getequipisequiped(2)) goto CHECK1; mes "[Lotto4 Refiner]"; mes "Do you want me to melt your body with blazing heat...?"; emotion 6; goto M_Menu; //Left Hand PART3: set @part,3; if (getequipisequiped(3)) goto CHECK1; mes "[Lotto4 Refiner]"; mes "I can't make your left hand into an ultimate weapon..."; emotion 4; goto M_Menu; //Right Hand PART4: set @part,4; if (getequipisequiped(4)) goto CHECK1; mes "[Lotto4 Refiner]"; mes "I can't make your right hand into an ultimate weapon..."; emotion 4; goto M_Menu; //Garment PART5: set @part,5; if (getequipisequiped(5)) goto CHECK1; mes "[Lotto4 Refiner]"; mes "Look here... you don't have any Garments on..."; goto M_Menu; //Foot Gear PART6: set @part,6; if (getequipisequiped(6)) goto CHECK1; mes "[Lotto4 Refiner]"; mes "Ack!! Those are some stinky feet. I definitely can't refine those... uck!!"; emotion 16; goto M_Menu; //Accessory1 PART7: set @part,7; if (getequipisequiped(7)) goto CHECK1; mes "[Lotto4 Refiner]"; mes "What do you mean by Accessory? Which One?"; emotion 20; goto M_Menu; //Accessory2 PART8: set @part,8; if (getequipisequiped(8)) goto CHECK1; mes "[Lotto4 Refiner]"; mes "What do you mean by Accessory? Which One?"; emotion 20; goto M_Menu; PART9: set @part,9; if (getequipisequiped(9)) goto CHECK1; mes "[Lotto4 Refiner]"; mes "What do you want from me? There's nothing equipped there..."; emotion 20; goto M_Menu; PART10: set @part,10; if (getequipisequiped(10)) goto CHECK1; mes "[Lotto4 Refiner]"; mes "What do you want from me? There's nothing equipped there..."; emotion 20; goto M_Menu; //Check if the item is refinable... CHECK1: if(getequipisenableref(@part)) goto CHECK2; mes "[Lotto4 Refiner]"; mes "I can't work on this item..."; close; //Check if the item is identified... (Don't know why this is in here... but kept it anyway) CHECK2: if(getequipisidentify(@part)) goto CHECK3; mes "[Lotto4 Refiner]"; mes "You must appraise this item first."; close; //Check to see if the items is already +10 CHECK3: if(getequiprefinerycnt(@part) < 10) goto REFINE; mes "[Lotto4 Refiner]"; mes "This weapon is already at its maximum level and can no longer be refined."; close; REFINE: delitem 7364,1; successrefitem @part; next; mes "Your item has been refined."; close; } and this is Error in CMD Someone please correct this script I'm using rAthena Version
  12. Hello I want to make an armor.. that would give nothing! but when i wear that armor.. any gm's command wont work on me!! example .. nuke, disgus..ban, mute....ect any command!! is it possible? thanks in advance
  13. how to repair tabe? im sorry i dont know i couldn't find in my broswer sql
  14. i'm getting this problem in cmd.. can u tell me what the problem?
  15. thanks Kichi i will try and let you know dose it work or not... thanks a lot bro ♥ i only need to change "bonusautoscript" in to "autobonus" ? am i right?
  16. Problem is in "bonusautoscript" i dont know what's wrong with it.. these are gunslinger's weapon please somebody correct this item script please 20125,Quicksilver,Quicksilver,4,20000,,450,190,,7,4,0x01000000,7,2,34,4,35,1,17,{ bonus2 bAddRace,RC_DemiHuman,55; bonus bDex,20; bonus bHit,-10; bonus2 bSubRace,RC_DemiHuman,20; bonusautoscript "{ sc_start SC_INCBASEATK,3000,readparam(bAtk); }",10,BF_WEAPON; bonus bNoMagicDamage,65;},{},{} 20127,Peacemaker,Peacemaker,4,32000,,900,240,,9,4,0x01000000,7,2,34,4,80,1,20,{ bonus bDex,20; bonus bSplashRange,1; bonus2 bAddRace,RC_DemiHuman,35; bonus2 bSubRace,RC_DemiHuman,20; bonusautoscript "{ sc_start SC_INCBASEATK,6000,800; heal -100,0; }",10,BF_WEAPON; bonus bUnbreakableWeapon,0; bonus bNoMagicDamage,65;},{},{} 20128,Missing_Score,Missing Score,4,130000,,2500,180,,9,4,0x01000000,7,2,34,4,68,1,20,{ bonus bDex,20; bonus2 bAddRace,RC_DemiHuman,35; bonus2 bSubRace,RC_DemiHuman,20; bonusautoscript "{ sc_start SC_INCBASEATK,6000,800; heal -120,0; }",10,BF_WEAPON; bonus bUnbreakableWeapon,0; bonus bNoMagicDamage,65;},{},{} 20129,Silver_Cassandra,Silver Cassandra,4,110000,,1200,500,,9,4,0x01000000,7,2,34,4,52,1,21,{ bonus bDex,20; bonus2 bAddRace,RC_DemiHuman,35; bonus2 bSubRace,RC_DemiHuman,20; bonusautoscript "{ sc_start SC_INCBASEATK,9000,3000; heal -500,0; }",10,BF_WEAPON; bonus bUnbreakableWeapon,0; bonus bNoMagicDamage,65;},{},{} I'm not able to solve this problem error in CMD Bump~
  17. Thanks Shade i still not able to disable Aura effect after change aura lvl value 0
×
×
  • Create New...