MukkiesftKies Posted October 24, 2013 Posted October 24, 2013 (edited) who can help me to add slot for 2nd , 3rd and 4th ? prontera,155,181,5 script Sample 757,{ mes "Which Armor you want to Enchant ?"; mes "Make sure there is no Card / Rune in it."; next; setarray .EquipID[0],2301,2302,2303,2304,2305,2306,2307,2308,2309,2310; for( set .@i,0; .@i < getarraysize( .EquipID ); set .@i,.@i + 1 ){ set .@EquipMenu$,.@EquipMenu$ + getitemname( .EquipID[.@i] )+( !getitemslots(.EquipID[.@i])?"":"["+getitemslots(.EquipID[.@i])+"]" )+":"; } set .@Equip,select( .@EquipMenu$ ) - 1; if( !countitem( .EquipID[.@Equip] ) ){ mes "You didnt have this Equipment with you."; close; } mes "Equipment : ^FF0000"+getitemname( .EquipID[.@Equip] )+"^000000"; switch( select( "Strength:Intelligent:Dexterity:Agility:Vitality:Luck" )){ Case 1: setarray .RuneID[0],4700,4701,4702,4703,4704,4705,4706,4707,4708,4709; break; Case 2: setarray .RuneID[0],4710,4711,4712,4713,4714,4715,4716,4717,4718,4719; break; Case 3: setarray .RuneID[0],4720,4721,4722,4723,4724,4725,4726,4727,4728,4729; break; Case 4: setarray .RuneID[0],4730,4731,4732,4733,4734,4735,4736,4737,4738,4739; break; Case 5: setarray .RuneID[0],4740,4741,4742,4743,4744,4745,4746,4747,4748,4749; break; Case 6: setarray .RuneID[0],4750,4751,4752,4753,4754,4755,4756,4757,4758,4759; break; } for( set .@i,0; .@i < getarraysize( .RuneID ); set .@i,.@i + 1 ){ set .@RuneMenu$,.@RuneMenu$ + getitemname( .RuneID[.@i] )+":"; } set .@Rune,select( .@RuneMenu$ ) - 1; mes "Rune : ^FF0000"+getitemname( .RuneID[.@Rune] )+"^000000"; next; if( select("Confirm:Cancel") == 1 ){ delitem .EquipID[.@Equip],1; getitem2 .EquipID[.@Equip],1,1,0,0,0,0,0,.RuneID[.@Rune]; mes "Done."; mes "^0000FF"+getitemname( .EquipID[.@Equip] )+"^000000"; mes "Enchanted with ^FF0000"+getitemname( .RuneID[.@Rune] )+"^000000"; } close; } Edited October 24, 2013 by MukkiesftKies Quote
chriser Posted October 24, 2013 Posted October 24, 2013 http://rathena.org/wiki/Getitem2 getitem2 <item id>,<amount>,<identify>,<refine>,<attribute>,<card1>,<card2>,<card3>,<card4>{,<account ID>}; account ID is optional. Your code already adds it to the 4th card slot. Or have I misunderstood your request? Quote
MukkiesftKies Posted October 24, 2013 Author Posted October 24, 2013 (edited) how about 2nd and 3rd ? I want players may choose to place their slot on 2nd 3rd and 4th. Edited October 24, 2013 by MukkiesftKies Quote
chriser Posted October 24, 2013 Posted October 24, 2013 ah okay prontera,155,181,5 script Sample 757,{ mes "Which Armor you want to Enchant ?"; mes "Make sure there is no Card / Rune in it."; next; setarray .EquipID[0],2301,2302,2303,2304,2305,2306,2307,2308,2309,2310; for( set .@i,0; .@i < getarraysize( .EquipID ); set .@i,.@i + 1 ){ set .@EquipMenu$,.@EquipMenu$ + getitemname( .EquipID[.@i] )+( !getitemslots(.EquipID[.@i])?"":"["+getitemslots(.EquipID[.@i])+"]" )+":"; } set .@Equip,select( .@EquipMenu$ ) - 1; if( !countitem( .EquipID[.@Equip] ) ){ mes "You didnt have this Equipment with you."; close; } mes "Equipment : ^FF0000"+getitemname( .EquipID[.@Equip] )+"^000000"; switch( select( "Strength:Intelligent:Dexterity:Agility:Vitality:Luck" )){ Case 1: setarray .RuneID[0],4700,4701,4702,4703,4704,4705,4706,4707,4708,4709; break; Case 2: setarray .RuneID[0],4710,4711,4712,4713,4714,4715,4716,4717,4718,4719; break; Case 3: setarray .RuneID[0],4720,4721,4722,4723,4724,4725,4726,4727,4728,4729; break; Case 4: setarray .RuneID[0],4730,4731,4732,4733,4734,4735,4736,4737,4738,4739; break; Case 5: setarray .RuneID[0],4740,4741,4742,4743,4744,4745,4746,4747,4748,4749; break; Case 6: setarray .RuneID[0],4750,4751,4752,4753,4754,4755,4756,4757,4758,4759; break; } for( set .@i,0; .@i < getarraysize( .RuneID ); set .@i,.@i + 1 ){ set .@RuneMenu$,.@RuneMenu$ + getitemname( .RuneID[.@i] )+":"; } set .@Rune,select( .@RuneMenu$ ) - 1; mes "Rune : ^FF0000"+getitemname( .RuneID[.@Rune] )+"^000000"; next; .@slot = select("Slot 1":"Slot 2":"Slot 3":"Slot 4"); next; if( select("Confirm:Cancel") == 1 ){ delitem .EquipID[.@Equip],1; if(.@slot == 1) getitem2 .EquipID[.@Equip],1,1,0,0,.RuneID[.@Rune],0,0,0; if(.@slot == 2) getitem2 .EquipID[.@Equip],1,1,0,0,0,.RuneID[.@Rune],0,0; if(.@slot == 3) getitem2 .EquipID[.@Equip],1,1,0,0,0,0,.RuneID[.@Rune],0; if(.@slot == 4) getitem2 .EquipID[.@Equip],1,1,0,0,0,0,0,.RuneID[.@Rune]; mes "Done."; mes "^0000FF"+getitemname( .EquipID[.@Equip] )+"^000000"; mes "Enchanted with ^FF0000"+getitemname( .RuneID[.@Rune] )+"^000000"; } close; } Quote
MukkiesftKies Posted October 24, 2013 Author Posted October 24, 2013 script error on npc/myheart/custom/test.txt line 29 parse_callfunc: expected ')' to close argument list 24 : set .@RuneMenu$,.@RuneMenu$ + getitemname( .RuneID[.@i] )+":"; 25 : } 26 : set .@Rune,select( .@RuneMenu$ ) - 1; 27 : mes "Rune : ^FF0000"+getitemname( .RuneID[.@Rune] )+"^000000"; 28 : next; * 29 : .@slot = select("Slot 1"':'"Slot 2":"Slot 3":"Slot 4"); 30 : next; 31 : if( select("Confirm:Cancel") == 1 ){ 32 : delitem .EquipID[.@Equip],1; 33 : if(.@slot == 1) 34 : getitem2 .EquipID[.@Equip],1,1,0,0,.RuneID[.@Rune],0,0,0; i found error at line 29. Quote
Patskie Posted October 25, 2013 Posted October 25, 2013 Change : .@slot = select("Slot 1":"Slot 2":"Slot 3":"Slot 4"); to : .@slot = select("Slot 1:Slot 2:Slot 3:Slot 4"); Quote
MukkiesftKies Posted October 25, 2013 Author Posted October 25, 2013 (edited) excuse me, how to use the three slots that? I do not want to use only one slot that just changing places.i want like this Edited October 25, 2013 by MukkiesftKies Quote
MukkiesftKies Posted October 26, 2013 Author Posted October 26, 2013 script that you edit it works like this. Headgear first slot. [RUNE][sLOT][sLOT][sLOT] Headgear second slot. [sLOT][RUNE][sLOT][sLOT] Headgear third slot. [sLOT][sLOT][RUNE][sLOT] but i want like this Headgear first slot. [RUNE][sLOT][sLOT][sLOT] Headgear second slot. [RUNE][RUNE][sLOT][sLOT] Headgear third slot. [RUNE][RUNE][RUNE][sLOT] Quote
chriser Posted October 27, 2013 Posted October 27, 2013 I think i got it, two different ways of what i understood: 1. Filling the slots up to the selected slot (select slot 3 -> make rune into 1,2,3 || select slot 2 -> make rune into 1,2) prontera,155,181,5 script Sample 757,{ mes "Which Armor you want to Enchant ?"; mes "Make sure there is no Card / Rune in it."; next; setarray .EquipID[0],2301,2302,2303,2304,2305,2306,2307,2308,2309,2310; for( set .@i,0; .@i < getarraysize( .EquipID ); set .@i,.@i + 1 ){ set .@EquipMenu$,.@EquipMenu$ + getitemname( .EquipID[.@i] )+( !getitemslots(.EquipID[.@i])?"":"["+getitemslots(.EquipID[.@i])+"]" )+":"; } set .@Equip,select( .@EquipMenu$ ) - 1; if( !countitem( .EquipID[.@Equip] ) ){ mes "You didnt have this Equipment with you."; close; } mes "Equipment : ^FF0000"+getitemname( .EquipID[.@Equip] )+"^000000"; switch( select( "Strength:Intelligent:Dexterity:Agility:Vitality:Luck" )){ Case 1: setarray .RuneID[0],4700,4701,4702,4703,4704,4705,4706,4707,4708,4709; break; Case 2: setarray .RuneID[0],4710,4711,4712,4713,4714,4715,4716,4717,4718,4719; break; Case 3: setarray .RuneID[0],4720,4721,4722,4723,4724,4725,4726,4727,4728,4729; break; Case 4: setarray .RuneID[0],4730,4731,4732,4733,4734,4735,4736,4737,4738,4739; break; Case 5: setarray .RuneID[0],4740,4741,4742,4743,4744,4745,4746,4747,4748,4749; break; Case 6: setarray .RuneID[0],4750,4751,4752,4753,4754,4755,4756,4757,4758,4759; break; } for( set .@i,0; .@i < getarraysize( .RuneID ); set .@i,.@i + 1 ){ set .@RuneMenu$,.@RuneMenu$ + getitemname( .RuneID[.@i] )+":"; } set .@Rune,select( .@RuneMenu$ ) - 1; mes "Rune : ^FF0000"+getitemname( .RuneID[.@Rune] )+"^000000"; next; .@slot = select("Slot 1:Slot 2:Slot 3:Slot 4"); next; if( select("Confirm:Cancel") == 1 ){ delitem .EquipID[.@Equip],1; if(.@slot == 1) getitem2 .EquipID[.@Equip],1,1,0,0,.RuneID[.@Rune],0,0,0; if(.@slot == 2) getitem2 .EquipID[.@Equip],1,1,0,0,.RuneID[.@Rune],.RuneID[.@Rune],0,0; if(.@slot == 3) getitem2 .EquipID[.@Equip],1,1,0,0,.RuneID[.@Rune],.RuneID[.@Rune],.RuneID[.@Rune],0; if(.@slot == 4) getitem2 .EquipID[.@Equip],1,1,0,0,.RuneID[.@Rune],.RuneID[.@Rune],.RuneID[.@Rune],.RuneID[.@Rune]; mes "Done."; mes "^0000FF"+getitemname( .EquipID[.@Equip] )+"^000000"; mes "Enchanted with ^FF0000"+getitemname( .RuneID[.@Rune] )+"^000000"; } close; } 2. Keeping runes which are already enchanted is only possible if you have the item equipped which you want to enchant (with getequipcardid) Quote
MukkiesftKies Posted October 27, 2013 Author Posted October 27, 2013 (edited) I think i got it, two different ways of what i understood: 1. Filling the slots up to the selected slot (select slot 3 -> make rune into 1,2,3 || select slot 2 -> make rune into 1,2) Enchantment works like this http://rathena.org/board/topic/61734-custom-enchantment-system/ Edited October 27, 2013 by MukkiesftKies Quote
MukkiesftKies Posted October 31, 2013 Author Posted October 31, 2013 cause easy to use and easy to edit. Quote
Question
MukkiesftKies
who can help me to add slot for 2nd , 3rd and 4th ?
prontera,155,181,5 script Sample 757,{ mes "Which Armor you want to Enchant ?"; mes "Make sure there is no Card / Rune in it."; next; setarray .EquipID[0],2301,2302,2303,2304,2305,2306,2307,2308,2309,2310; for( set .@i,0; .@i < getarraysize( .EquipID ); set .@i,.@i + 1 ){ set .@EquipMenu$,.@EquipMenu$ + getitemname( .EquipID[.@i] )+( !getitemslots(.EquipID[.@i])?"":"["+getitemslots(.EquipID[.@i])+"]" )+":"; } set .@Equip,select( .@EquipMenu$ ) - 1; if( !countitem( .EquipID[.@Equip] ) ){ mes "You didnt have this Equipment with you."; close; } mes "Equipment : ^FF0000"+getitemname( .EquipID[.@Equip] )+"^000000"; switch( select( "Strength:Intelligent:Dexterity:Agility:Vitality:Luck" )){ Case 1: setarray .RuneID[0],4700,4701,4702,4703,4704,4705,4706,4707,4708,4709; break; Case 2: setarray .RuneID[0],4710,4711,4712,4713,4714,4715,4716,4717,4718,4719; break; Case 3: setarray .RuneID[0],4720,4721,4722,4723,4724,4725,4726,4727,4728,4729; break; Case 4: setarray .RuneID[0],4730,4731,4732,4733,4734,4735,4736,4737,4738,4739; break; Case 5: setarray .RuneID[0],4740,4741,4742,4743,4744,4745,4746,4747,4748,4749; break; Case 6: setarray .RuneID[0],4750,4751,4752,4753,4754,4755,4756,4757,4758,4759; break; } for( set .@i,0; .@i < getarraysize( .RuneID ); set .@i,.@i + 1 ){ set .@RuneMenu$,.@RuneMenu$ + getitemname( .RuneID[.@i] )+":"; } set .@Rune,select( .@RuneMenu$ ) - 1; mes "Rune : ^FF0000"+getitemname( .RuneID[.@Rune] )+"^000000"; next; if( select("Confirm:Cancel") == 1 ){ delitem .EquipID[.@Equip],1; getitem2 .EquipID[.@Equip],1,1,0,0,0,0,0,.RuneID[.@Rune]; mes "Done."; mes "^0000FF"+getitemname( .EquipID[.@Equip] )+"^000000"; mes "Enchanted with ^FF0000"+getitemname( .RuneID[.@Rune] )+"^000000"; } close; }Edited by MukkiesftKies14 answers to this question
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.