gyroguevarra
Members-
Posts
107 -
Joined
-
Last visited
Content Type
Profiles
Forums
Downloads
Jobs Available
Server Database
Third-Party Services
Top Guides
Store
Crowdfunding
Everything posted by gyroguevarra
-
Paano ba gumawa ng rental box
gyroguevarra replied to gyroguevarra's topic in Tulong para sa Script at Database
Nakagawa na po ako 22600,Sleipnir_Box,Sleipnir Box,18,20,,10,,,,,0xFFFFFFFF,63,2,,,,,,{ rentitem 2410,604800; },{},{} Yan po. tapos po? nag @item po ako wala po nalabas -
Paano ba gumawa ng rental box
gyroguevarra replied to gyroguevarra's topic in Tulong para sa Script at Database
Pano po ba yung script ng box? Newbie pa lang po ako -
Yung ganito
-
Yung ganito
-
Yung script ko yung kay Emistry multi currency shop. // 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 "^FF0000[ TCG SHOP ]^000000"; mes "^00FF00____________________________^000000"; mes "So, Which item do you wish to obtain? Select only one."; next; // Menu Selection select("Usables","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$,"7227"; // Item ID Lists setarray @ItemLists[0],12202,12203,12204,12205,12206,12207; // Item Price setarray @ItemCost[0],3,3,3,3,3,3; 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$,"7227"; // 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; } Yan po. Thank you. Newbie lang kasi ako
-
pano po ba yung ganito? gusto ko kasi 10steamed tounge = 5tcg
-
Nag @item kasi ako ng tcg card pero nalabas name bossnia entrance ticket.
-
Ano pa ba kailangan pag mag papahost meron na ko client and server. Ano pa po ba need?
-
How to disable skill helm me please
gyroguevarra replied to gyroguevarra's question in Scripting Support
renewal sir -
How to disable skill helm me please
gyroguevarra replied to gyroguevarra's question in Scripting Support
I want to disable sura skills dragon combo and fallen empire skill. How to disable? -
Help* me please im newbie
-
pa help po pano po ba ayusin to
gyroguevarra replied to gyroguevarra's topic in Tulong para sa Server
Ay oo nga nu. Di ko kasi napapansin sa ibang RO. HAHA. Sorry sensya natanga lang ako. Kala ko may mali. Ganyan nga pala talaga tiningnan ko ngayon sa ibang RO. Last na pano palitn fonts ng lahat? Sorry newbie lang -
pa help po pano po ba ayusin to
gyroguevarra replied to gyroguevarra's topic in Tulong para sa Server
ayan pano ayusin yan? -
and font why is like that?
-
pa help po pano po ba ayusin to
gyroguevarra replied to gyroguevarra's topic in Tulong para sa Server
I mean bakit ganyan yung pub may malaki space [pvp room ] hndi sya gnito [ pvp room ] at bakit ganyan yung font -
How to fix this
-
Patulong pano ionline yung offline ro ko
gyroguevarra replied to gyroguevarra's topic in Tulong para sa Server
Ayaw pumasok sa hamachi pano ba yun? Yung engine -
eto tsaka eto po bat ganito yung font ko pano po yan ayusin ang liit kasi
-
Working now. Ahm. You know how to fix this
-
With izlude morroc pronter selection map. Thank you
-
prontera,155,181,5 script Sample 757,{ setarray .@Map$[0],"pvp_y_1-1","pvp_y_1-2"; mes "Select your room"; set .@i,select("Room 1 ["+getmapusers(.@Map$[0])+"/50]:Room 2 ["+getmapusers(.@Map$[1]+"]"/50)) - 1; if( getmapusers( .@Map$[.@i] ) >= "50" ){ mes "Sorry, room Full."; close; }else warp .Map$[.@i],0,0; end; OnPCKillEvent: for( set .@i,0; .@i < getarraysize( .@Map$ ); set .@i,.@i + 1 ) if( strcharinfo(3) == .@Map$[.@i] ) { announce "["+strcharinfo(0)+"] has killed ["+rid2name(killedrid)+"] in "+strcharinfo(3),0; break; } } end; } This is my script
-
Patulong pano ionline yung offline ro ko
gyroguevarra replied to gyroguevarra's topic in Tulong para sa Server
Gusto ko sana noip kaso di ko maopen port ko nasunod ko naman yung sa portforward.com pero pag check ko closed. pano po ba yun