-
Posts
10018 -
Joined
-
Days Won
408
Content Type
Profiles
Forums
Downloads
Jobs Available
Server Database
Third-Party Services
Top Guides
Store
Crowdfunding
Everything posted by Emistry
-
i guess you are trying to update the point when the WOE End after the Guild has conquered the Castle... try this set .@i,getcastledata( "prtg_cas03",1 ); query_sql("UPDATE `woe_record` SET `id` = `id`+1 WHERE `guild_id` ="+.@i+""); in your previous case...it wont work..because it need a player to be attached in order to get the information of getcharid( ) hope this work for you ~
-
Weeee i like this 1...xD i dont like the current 1....red colour + stripe..>.< feel like a Candy Cane ...O.O well...maybe it is for the upcoming Christmas eve xD
-
since you are using SELECT , you need a variable to store it....so ... .@ignore is needed in SELECT case when you using UPDATE , there is not needed to use the .@ignore since nothing is used to save in that variable... correct me if i was wrong..>.<
-
here you go....but there is a chances of Repeating Items appear in the Lists since i randomed the items from the same lists. try this prontera,155,178,3 script Event Ticket Trader 910,{ set @npc$,"[ Roll Machine ]"; // How many Items can be Choose set .List,3; // Hours Delay for each Roll set .Hours,24; // Ticket ID used for this Roll Machine set .TicketID,7539; // Items Available to Gain through Roll Machine setarray .Items[0],607,608,609,610,512; // Amount of Ticket required to change into Items. setarray .Cost[0],1,3,5,10,50; if ( #Roll_Claimed > gettimetick(2) ){ mes "You already rolled for the day"; mes "see you tomorrow"; }else{ mes @npc$; mes "Roll the machine?"; next; if( select("Yes!:No! not yet") == 2 ) close; mes @npc$; mes "Are you sure?"; next; if( select("Yes, let's roll it!:I change my mind") == 2 ) close; mes @npc$; mes "Random Item Flashing...."; mes "Rolling........"; next; mes @npc$; mes "Item Apear List :"; mes "[ ^FF0000Required Items^000000 ] [ ^0000FFItem Gain^000000 ]"; for( set .x,0; .x < .List; set .x,.x + 1 ){ set .Random,rand( getarraysize( .Items ) ); set .Rolled[.x],.Items[.Random]; set .RolledCost[.x],.Cost[.Random]; mes "^FF0000"+.RolledCost[.x]+" x "+getitemname( .TicketID )+" = ^0000FF"+getitemname( .Rolled[.x] )+"^000000"; set .@Menu$,.@Menu$ + getitemname( .Rolled[.x] )+":"; } set .@i,select( .@Menu$ ) - 1; mes "This item cost ^FF0000"+.RolledCost[.@i]+" x "+getitemname( .TicketID )+"^000000."; next; if( select("Spend my Ticket:Waste my roll") == 2 ) close; mes @npc$; if( countitem( .TicketID ) < .RolledCost[.@i] ){ mes "You need ^0000FF"+.RolledCost[.@i]+" ^0000FF"+getitemname( .TicketID )+"^000000"; mes "Better luck next time"; }else{ mes "Thanks for using Roll Machine"; set #Roll_Claimed,gettimetick(2) + ( .Hours * 3600 ); getitem .Rolled[.@i],1; delitem .TicketID,.RolledCost[.@i]; } } close; } Settings : // How many Items can be Choose set .List,3; // Hours Delay for each Roll set .Hours,24; // Ticket ID used for this Roll Machine set .TicketID,7539; // Items Available to Gain through Roll Machine setarray .Items[0],607,608,609,610,512; // Amount of Ticket required to change into Items. setarray .Cost[0],1,3,5,10,50; LOL....how come i feel like this Script Release become Script Requests .....
-
From Wiki : Custom_Items (S.) Novice (2^00): 0x00000001 Swordman (2^01): 0x00000002 Mage (2^02): 0x00000004 Archer (2^03): 0x00000008 Acolyte (2^04): 0x00000010 Merchant (2^05): 0x00000020 Thief (2^06): 0x00000040 Knight (2^07): 0x00000080 Priest (2^08): 0x00000100 Wizard (2^09): 0x00000200 Blacksmith (2^10): 0x00000400 Hunter (2^11): 0x00000800 Assassin (2^12): 0x00001000 Unused (2^13): 0x00002000 Crusader (2^14): 0x00004000 Monk (2^15): 0x00008000 Sage (2^16): 0x00010000 Rogue (2^17): 0x00020000 Alchemist (2^18): 0x00040000 Bard/Dancer (2^19): 0x00080000 Unused (2^20): 0x00100000 Taekwon (2^21): 0x00200000 StarGladiator (2^22): 0x00400000 Soul Linker (2^23): 0x00800000 Gunslinger (2^24): 0x01000000 Ninja (2^25): 0x02000000 All Classes : 0xFFFFFFFF Every Job Except Novice : 0xFFFFFFFE
-
here...try this prontera,155,178,3 script Event Ticket Trader 910,{ set @npc$,"[ Roll Machine ]"; // Hours Delay for each Roll set .Hours,24; // Ticket ID used for this Roll Machine set .TicketID,30540; // Items Available to Gain through Roll Machine setarray .Items[0],607,608,609,610,512; // Amount of Ticket required to change into Items. setarray .Cost[0],1,3,5,10,50; mes @npc$; mes "Roll machine restarts everyday 12:00AM"; next; if ( #Roll_Claimed > gettimetick(2) ){ mes "You already rolled for the day"; mes "see you tomorrow"; }else{ mes @npc$; mes "Roll the machine?"; next; if( select("Yes!:No! not yet") == 2 ) close; mes @npc$; mes "Are you sure?"; next; if( select("Yes, let's roll it!:I change my mind") == 2 ) close; mes @npc$; mes "Random Item Flashing...."; mes "Rolling........"; next; mes @npc$; set .@i,rand( getarraysize( .Items ) ); mes "A ^0000FF"+getitemname( .Items[.@i] )+"^000000 appear on the screen."; mes "This item cost ^FF0000"+.Cost[.@i]+" x "+getitemname( .TicketID )+"^000000."; next; if( select("Spend my Ticket:Waste my roll") == 2 ) close; mes @npc$; if( !countitem( .TicketID ) ){ mes "You don't have enough "+getitemname( .TicketID )+""; mes "Better luck next time"; }else{ mes "Thanks for using Roll Machine"; set #Roll_Claimed,gettimetick(2) + ( .Hours * 3600 ); getitem .Items[.@i],1; delitem .TicketID,1; } } close; } Settings : // Hours Delay for each Roll set .Hours,24; // Ticket ID used for this Roll Machine set .TicketID,30540; // Items Available to Gain through Roll Machine setarray .Items[0],607,608,609,610,512; // Amount of Ticket required to change into Items. setarray .Cost[0],1,3,5,10,50;
-
like this..... morocc,159,96,5 duplicate(School of Fish) School of Fish#1 742 morocc,159,96,5 duplicate(School of Fish) School of Fish#2 742 morocc,159,96,5 duplicate(School of Fish) School of Fish#3 742 morocc,159,96,5 duplicate(School of Fish) School of Fish#4 742
-
can anyone give me client #define PACKETVER 20111122
Emistry replied to ajibasket32's question in Client Requests
Choose any client that you want here 2011 Client by Judas click and download your client.. Otherwise... 2010 Client by Brian Click into it...and tick whatever diff patch you want...then hit the DOWNLOAD button. Or, go download WeeDiffPatcher / Any other Patcher in the forum.. Download the Client and Hex files and hex at your own~ -
erm...my suggestion... you can make use of array in this script.. the script look very long because of the repeating lines.... try to minimize the repeated line... and your script is 1 time per day ? not every player can roll 1 time per day ? in your case it is 1 time per day...only 1 player from your server can roll it per day. how ever, if you want...you can try make it like this prontera,155,178,3 script Event Ticket Trader 910,{ set @npc$,"[ Roll Machine ]"; // Ticket ID used for this Roll Machine set .TicketID,30540; // Items Available to Gain through Roll Machine setarray .Items[0],607,608,609,610,512; // Amount of Ticket required to change into Items. setarray .Cost[0],1,3,5,10,50; mes @npc$; mes "Roll machine restarts everyday 12:00AM"; next; if ( $roll_claimed ){ mes "You already rolled for the day"; mes "see you tomorrow"; }else{ mes @npc$; mes "Roll the machine?"; next; if( select("Yes!:No! not yet") == 2 ) close; mes @npc$; mes "Are you sure?"; next; mes @npc$; mes "Puff* Puff* Tink***"; set $roll_claimed, 1; next; if( select("Yes, let's roll it!:I change my mind") == 2 ) close; mes @npc$; mes "Random Item Flashing...."; mes "Rolling........"; next; mes @npc$; set .@i,rand( getarraysize( .Items ) ); mes "A ^0000FF"+getitemname( .Items[.@i] )+"^000000 appear on the screen."; mes "This item cost ^FF0000"+.Cost[.@i]+" x "+getitemname( .TicketID )+"^000000."; next; if( select("Spend my Ticket:Waste my roll") == 2 ) close; mes @npc$; if( countitem( .TicketID ) < .Cost[.@i] ){ mes "You don't have enough "+.Cost[.@i]+" x "+getitemname( .TicketID )+""; mes "Better luck next time"; }else{ mes "Thanks for using Roll Machine"; getitem .Items[.@i],1; delitem .TicketID,.Cost[.@i]; } close; } } setting here // Ticket ID used for this Roll Machine set .TicketID,30540; // Items Available to Gain through Roll Machine setarray .Items[0],607,608,609,610,512; // Amount of Ticket required to change into Items. setarray .Cost[0],1,3,5,10,50; using the switch for too many cases...caused you keep repeatly type the same things...so you can just simplify it... LOL....miland is faster than my posts when i was writing it...>.<
-
What slot machine ? mind to spend abit more time to elaborate your request ??
-
Help Ai.lua Files sa Hommunculus
Emistry replied to Kariton Revolution's topic in Tulong para sa Client
if you are looking for AI Files...you can try these... IROWiki - Ai Files -
ya there is a new GBA for it if you want to play that... and the new GBA named No$GBA ( some sort like that ) a GBA that have 2 separated Screen instead of the old 1 only have 1 big screen... and this GBA has been used since the several latest Pokemon Game... i think it is after the Pokemon Sapphire / Ruby version....
-
kdrama cartoons or anime ??
-
Okay try this... now both Guild Master and GM Above Level 50 should be able to use this they able to Turn ON / OFF PVP and make announcement prontera,155,181,5 script Sample 718,{ set .Map$,"prtg_cas03"; if( strcharinfo(0) != getguildmaster( getcastledata( .Map$,1 ) ) && getgmlevel() < 50 ){ mes "Only ^FF0000"+getguildmaster( getcastledata( .Map$,1 ) )+"^000000 can use this services."; }else{ mes "Turn ON/OFF the PVP ?"; mes "Made Announcement ?"; switch( select("Announce:Turn ON PVP:Turn OFF PVP") ){ Case 1: mes "Type your message."; input @Input$; mes "Your Message :"; mes "^0000FF"+@Input$+"^000000"; if( select("Announce:Cancel") == 2 ) break; mes "Okay.."; close2; announce @Input$,0; end; Case 2: pvpon "prontera"; mapannounce "prontera","PVP in Turned ON",0; break; Case 3: pvpoff "prontera"; mapannounce "prontera","PVP in Turned OFF",0; break; } } close; }
-
welcome kurodikku..... i dont think there will be indonesian support forum yet...since we have too less members for it.....
-
/me slap EVERYBODY !! coz all...PRO than me...
-
try this query_sql "UPDATE table SET points = points + countitem(FISHID) WHERE char_id = "+getcharid(0);
-
LunarCast Dynamic Shop
-
try this prontera,155,181,5 script Sample 718,{ set .Map$,"prtg_cas03"; if( strcharinfo(0) != getguildmaster( getcastledata( .Map$,1 ) ) ){ mes "Only ^FF0000"+getguildmaster( getcastledata( .Map$,1 ) )+"^000000 can use this services."; }else{ mes "Turn ON/OFF the PVP ?"; switch( select("Turn ON PVP:Turn OFF PVP") ){ Case 1: pvpon "prontera"; mapannounce "prontera","PVP in Turned ON",0; break; Case 2: pvpoff "prontera"; mapannounce "prontera","PVP in Turned OFF",0; break; } } close; }
-
GBA Pokemon Series..xD...Childhood Games....
-
Can not carry More Than 30,000 of one kind item
Emistry replied to johnmark's question in Source Requests
if i was right.....if you exceed the limit...there will have problem... last time...i have tried with increase the max value... but then....ingame....it did success to carry more than 30k items...even up to 100K items for ea....O.O but...the problem came.. i cant sell items / drops / trade...and etc.. alot problems caused...cant remember much ~