-
Posts
439 -
Joined
-
Last visited
Content Type
Profiles
Forums
Downloads
Jobs Available
Server Database
Third-Party Services
Top Guides
Store
Crowdfunding
Everything posted by RN1986
-
+1 Kisuka + jTynne
-
how to add Right click mute>? unmute or mute with duration of time?
RN1986 posted a question in Scripting Support
how to add Right click mute unmute or mute with duration of time???thanks GM + right click mute player? how? -
hindi gumagana eh...hindi natatrap =( kapag sa ground ilalagay... NVM
-
panu paganahin ung spider web?
-
panu to? ung sa sonic blow...ung sa ifrit ring na set gusto ko kase kapag nag sosonic blow tuloy parin ang banat hindi hihinto ang atake.....
-
auto sonic blow while attacking problem.....anyone help
RN1986 posted a question in Scripting Support
`what i wanna do is to not interrupt/stop attacking mob/demihuman when auto sonic blow activated. -
panu malaman ung mga nahahack? na account?
RN1986 replied to RN1986's topic in Tulong para sa Server
panu un? idol bVersatile -
panu malaman ung mga nahahack? na account? sa loginlog?
-
Request Capture the Flag (Flag Sprite) and Map Suggestions
RN1986 replied to herenow's question in Graphics Requests
bump for this -
[Closed]panu iset ang client na 3-5 wrong password bago magclose?
RN1986 replied to RN1986's topic in Tulong para sa Client
tama ka nabasa ko nga salamat. closed. -
about Multi Currency Shop [ Version 6 ] by sir emistry
RN1986 replied to RN1986's question in Scripting Support
can i just change this into [quote]set @Currency$,"#votepoints";[/quote] ? ??? -
about Multi Currency Shop [ Version 6 ] by sir emistry
RN1986 posted a question in Scripting Support
can this code by sir emistry ->Multi Currency Shop [ Version 6 ]<- set to votepoints? i'm using vote4points add on by sir jaypee. // Settings : // - Only required to edit the ShopSetting() Function // Notes : You may also add / remove Menu ( If any ) // - Shop Currency can be either ItemID or Variable Name, but must write within Quotation Marks ( "" ) // Ex. of Variable. -> Zeny , #CASHPOINTS , #KAFRAPOINTS , CustomVariable , #CustomVariable // - ERROR Message are used to show Invalid Settings in your NPC. // Leave this alone... - shop Emistry_Shop -1,512:100 prontera,155,181,5 script Sample 757,{ function ShopSettings; function ValidateCost; function CurrencyInfo; function ClearData; function ValueConvert; function ErrorNotice; mes "Each Shop from the Menu may purchase using ^FF0000Different Currency^000000."; mes "^00FF00____________________________^000000"; mes "So,Which shop you would like to look at it"; next; // Menu Selection select("Shop 1","Shop 2","Shop 3"); ClearData(); ShopSettings( @menu ); npcshopitem "Emistry_Shop",512,100; npcshopdelitem "Emistry_Shop",512; for(set .@i,0; .@i < getarraysize( @ItemLists ); set .@i,.@i+1) npcshopadditem "Emistry_Shop",@ItemLists[.@i],@ItemCost[.@i]; mes "Okay...wait awhile"; mes "^00FF00____________________________^000000"; CurrencyInfo( @Currency$ ); mes "^00FF00____________________________^000000"; callshop "Emistry_Shop",1; npcshopattach "Emistry_Shop"; end; function ShopSettings { switch( getarg(0) ){ Case 1: // Currency [ Item ID / Variable Name ] set @Currency$,"7179"; // Item ID Lists setarray @ItemLists[0],6153,7227; // Item Price setarray @ItemCost[0],100,1; break; Case 2: // Currency [ Item ID / Variable Name ] set @Currency$,"7227"; // Item ID Lists setarray @ItemLists[0],2306,2302,2303,2304,2305,2301; // Item Price setarray @ItemCost[0],2,2,3,4,5,6; break; Case 3: // Currency [ Item ID / Variable Name ] set @Currency$,"#CASHPOINTS"; // Item ID Lists setarray @ItemLists[0],2306,2302,2303,2304,2305,2301; // Item Price setarray @ItemCost[0],20,22,34,445,52,641; break; // Case 4,5,6.....etc... default: ErrorNotice( "Invalid Menu Selection for Menu "+@menu+"." ); close; } if( @Currency$ == "" ) ErrorNotice( "Invalid Currency Setting in Menu "+@menu+" ." ); if( getarraysize( @ItemCost ) != getarraysize( @ItemLists ) || getarraysize( @ItemLists ) != getarraysize( @ItemCost ) ) ErrorNotice( "Missing or Extra Value of Item or Cost Settings in Menu "+@menu+" ." ); return; } function ErrorNotice { mes "^FF0000ERROR^000000 - "+getarg(0); mes "^00FF00____________________________^000000"; mes "Inform this Message to ^0000FFGame Staffs^000000 immediately !"; close; } function CurrencyInfo { if( getitemname( atoi( getarg(0) ) ) != "null" ){ mes "Item Currency : ^FF0000"+getitemname( atoi( getarg(0) ) )+"^000000"; mes "Available Amount : ^0000FF"+ValueConvert( countitem( atoi( getarg(0) ) ) )+"^000000"; }else if( getitemname( atoi( getarg(0) ) ) == "null" ){ mes "Variable Currency : ^FF0000"+getarg(0)+"^000000"; mes "Available Amount : ^0000FF"+ValueConvert( getd( getarg(0) ) )+"^000000"; } return; } function ValidateCost { if( getitemname( atoi( getarg(0) ) ) != "null" ){ if( countitem( atoi( getarg(0) ) ) < getarg(1) ) return 1; }else{ if( getd( getarg(0) ) < getarg(1) ) return 1; } return 0; } function ClearData { set @Currency$,""; set @TotalCost,0; deletearray @bought_nameid[0],getarraysize( @bought_nameid ); deletearray @bought_quantity[0],getarraysize( @bought_quantity ); deletearray @ItemLists[0],getarraysize( @ItemLists ); deletearray @ItemCost[0],getarraysize( @ItemCost ); return; } function ValueConvert { set .@num, atoi(""+getarg(0)); if ( .@num == 0 || .@num >= 2147483647 ) return getarg(0); set .@l, getstrlen(""+.@num); for ( set .@i,0; .@i < .@l; set .@i, .@i + 1 ) { set .@num$, .@num % pow(10,.@i+1) / pow(10,.@i) + .@num$; if ( (.@i+1) % 3 == 0 && .@i+1 != .@l ) set .@num$, ","+ .@num$; } return .@num$; } OnBuyItem: ShopSettings( @menu ); for(set @i,0; @i < getarraysize( @bought_nameid ); set @i,@i+1) for(set @j,0; @j < getarraysize( @ItemLists ); set @j,@j+1) if( @ItemLists[@j] == @bought_nameid[@i] ) set @TotalCost,@TotalCost + ( @ItemCost[@j] * @bought_quantity[@i] ); mes "^FF0000 BILLING LIST^000000"; mes "^00FF00____________________________^000000"; for( set @i,0; @i < getarraysize( @bought_nameid ); set @i,@i+1 ) mes "^FF0000"+@bought_quantity[@i]+" x ^0000FF"+getitemname( @bought_nameid[@i] )+"^000000"; mes "^00FF00____________________________^000000"; if( getitemname( atoi( @Currency$ ) ) != "null" ) mes "Total Cost : ^0000FF"+ValueConvert( @TotalCost )+" x "+getitemname( atoi( @Currency$ ) )+"^000000"; else if( getitemname( atoi( @Currency$ ) ) == "null" ){ mes "Total Cost : ^0000FF"+ValueConvert( @TotalCost )+" "+@Currency$+"^000000"; } mes "^00FF00____________________________^000000"; if( ValidateCost( @Currency$,@TotalCost ) ){ if( getitemname( atoi( @Currency$ ) ) != "null" ) mes "[ ^FF0000X^000000 ] Insufficient ^0000FF"+getitemname( atoi( @Currency$ ) )+"^000000"; else{ mes "[ ^FF0000X^000000 ] Insufficient ^0000FF"+@Currency$+"^000000"; } }else{ if( select( "^0000FFPurchase^000000:Cancel" ) == 1 ){ if( getitemname( atoi( @Currency$ ) ) != "null" ) delitem atoi( @Currency$ ),@TotalCost; else{ set getd( @Currency$ ),getd( @Currency$ ) - @TotalCost; } for(set @i,0; @i < getarraysize( @bought_nameid ); set @i,@i+1) getitem @bought_nameid[@i],@bought_quantity[@i]; message strcharinfo(0),"Purchased "+getarraysize( @bought_nameid )+" Items."; mes "Thank you for shopping."; } } ClearData(); close; } -
Pano ayusin to. Tagos ung Dispell ng tarot kahit naka GTB kana.
RN1986 replied to eJay's topic in Tulong para sa Server
ganon ata tlg..mwawalan sila gana pag-tinanggal mo yan... yan lang masayang skill nila. -
Closed i change script.
-
i add the Gargoyle Wings",l_ry, the npc stop working any idea? prontera,156,179,1 script Wing Maker 911,{ // ==Change coords, Name of NPC and Sprite== set .@npc$,"[Mixis]"; // ==Change to name of npc== mes .@npc$; // ==You can change the dialouge if you want== mes "Do you want some Wing?"; mes "This may help your journey...."; mes "then."; mes "You must get the required items for me "; next; menu "Matsuri Wings",l_wbw,"Artic Wings",l_bbw,"Deviling Wings",l_tw,"Gargoyle Wings",l_ry,"No Thanks!",l_nothanks; l_wbw: mes .@npc$; mes "^4EE2ECMatsuri Wing^000000"; mes "81Pcs of Flame Heart,"; mes "82Pcs of Shining Scale,"; mes "83Pcs of Wing Red Bat,"; mes "300 Gold"; next; if(countitem(994) <81) goto l_noitem; if(countitem(954) <82) goto l_noitem; if(countitem(7006) <83) goto l_noitem; if(countitem(969) <300) goto l_noitem; delitem 994,81; delitem 954,82; delitem 7006,83; delitem 969,300; getitem 1998,1; // IMPORTANT: Change this to the ItemID of the item you're giving and the amount. mes .@npc$; mes "Congratulations! You have earned my ^4EE2ECMatsuri Wing^000000!"; next; mes .@npc$; mes "Goodbye!"; close; l_noitem: mes .@npc$; mes "Please come back when you have my required items."; close; l_bbw: mes .@npc$; mes "^15317EArtic Wings^000000"; mes "Mystic Frozen 25Pcs,"; // IMPORTANT: Enter the text for required items on Black Butterfly Wings mes "Frozen Rose 25Pcs"; mes "Ice Cubic 100Pcs"; mes "Gold 300"; next; if(countitem(995) <25) goto l_noitembb; // Replace the first 123 with the ItemID of the required item and the second 123 for the amount if(countitem(749) <25) goto l_noitembb; if(countitem(7066) <100) goto l_noitembb; if(countitem(969) <300) goto l_noitembb; delitem 995,25; // delitem ItemID, Amount; delitem 749,25; delitem 7066,100; delitem 969,300; getitem 1992,1; mes .@npc$; mes "Congratulations! You have earned my ^15317EArtic Wings^000000!"; next; mes .@npc$; mes "Goodbye!"; close; l_noitembb: mes .@npc$; mes "Please come back when you have my required items."; close; l_tw: mes .@npc$; mes "^F6358ADeviling Wings^000000"; mes "Brigan 150pcs,"; // IMPORTANT: Enter the text for required items on Black Butterfly Wings mes "Soft Feather 30pcs"; mes "White Dyestuff 10pcs"; mes "300 Gold's"; next; if(countitem(7054) <150) goto l_noitemtw; // Replace the first 123 with the ItemID of the required item and the second 123 for the amount if(countitem(7063) <30) goto l_noitemtw; if(countitem(982) <10) goto l_noitemtw; if(countitem(969) <300) goto l_noitemtw; delitem 7054,150; // delitem ItemID, Amount; delitem 7063,30; delitem 982,10; delitem 969,300; getitem 9146,1; mes .@npc$; mes "Congratulations! You have earned my ^F6358ADeviling Wings^000000!"; next; mes .@npc$; mes "Goodbye!"; close; l_noitemtw: mes .@npc$; mes "Please come back when you have my required items."; close; 1_ry: mes .@npc$; mes "^F6358AGargoyle Wings^000000"; mes "Brigan 150pcs,"; // IMPORTANT: Enter the text for required items on Black Butterfly Wings mes "Soft Feather 30pcs"; mes "White Dyestuff 10pcs"; mes "300 Gold's"; next; if(countitem(7054) <150) goto l_noitemry; // Replace the first 123 with the ItemID of the required item and the second 123 for the amount if(countitem(7063) <30) goto l_noitemry; if(countitem(982) <10) goto l_noitemry; if(countitem(969) <300) goto l_noitemry; delitem 7054,150; // delitem ItemID, Amount; delitem 7063,30; delitem 982,10; delitem 969,300; getitem 9146,1; mes .@npc$; mes "Congratulations! You have earned my ^F6358ADeviling Wings^000000!"; next; mes .@npc$; mes "Goodbye!"; close; l_noitemry: mes .@npc$; mes "Please come back when you have my required items."; close; l_nothanks: mes .@npc$; mes "Alright, bye for now!"; close; } } } } }