Jump to content

krisnx

Members
  • Posts

    104
  • Joined

  • Last visited

Everything posted by krisnx

  1. maybe you need change .gat file update it using mapcache . or you can read on here or here maybe it can help you ..
  2. where is the error? please be more specific sir
  3. read this sir -> http://rathena.org/wiki/Custom_Items if there was an error, posting here again
  4. ///Its a bit simple.. use this script ///http://www.eathena.ws/board/index.php?showtopic=217704 ///Now what the post says.. ///Open file src/common/socket.h ///Find: CODE size_t rdata_pos; time_t rdata_tick; // time of last recv (for detecting timeouts); zero when timeout is disabled Paste after this : CODE // Anti-WPE v2.0 by Zohan // Optimized and DIFF fixed by Zigbigidorlu (14293) int lastTick; int thisTick; int thisDiff; int lastDiff; uint32 warning_number; Open file src/common/socket.c ///Find: CODE time_t last_tick; time_t stall_time = 60; ///Paste after: CODE uint32 max_frequency_warning = 15; //Max number of packets user can have that are within a certain interval of each other before the program kicks int diff_tolerance = 5; //In microseconds ///Find: CODE session[fd]->rdata_size += len; session[fd]->rdata_tick = last_tick; //Paste this after above codes: CODE // Anti-WPE script: v2.0 Parappa the Anti-WPE by Zohan // Optimized and DIFF fixed by Zigbigidorlu (14293) if(!session[fd]->flag.server && RFIFOW(fd,2) != 0x05 && (RFIFOW(fd,0) == 0x0438 || RFIFOW(fd,0) == 0x0116)) { session[fd]->lastTick = session[fd]->thisTick; session[fd]->thisTick = gettick(); session[fd]->lastDiff = session[fd]->thisDiff; session[fd]->thisDiff = session[fd]->thisTick - session[fd]->lastTick; if(abs(session[fd]->thisDiff - session[fd]->lastDiff) < diff_tolerance) session[fd]->warning_number++; if(session[fd]->warning_number > max_frequency_warning) set_eof(fd); else if(session[fd]->thisTick - session[fd]->lastTick > 5000) session[fd]->warning_number = 0; else if(session[fd]->warning_number > 0) session[fd]->warning_number--; } this is originaly from there
  5. your are attacking by ddos , it flow request data cmiiw
  6. maybe you can use this sir //////////////////////////////////////////////////////////////////////// //--------------------------------------------------------------------// // PROMOTIONAL CODES // // AUTHOR: LIL TROLL//COLDFIRE // //--------------------------------------------------------------------// // RATHENA SCRIPT // //--------------------------------------------------------------------// // Version 1.2.1 // //--------------------------------------------------------------------// // FEATURES: (Modified Promotional Code by sir Patskie) // // // // #1 5`Degree of Abuse-Protection(+ItemBound = 6) // // - IP,ACCOUNT,COUNTLIMIT,DOUBLECHECK,MIX // // #2 Code can be deleted/detected by gm. // // #3 Friendly User Interface. // // #4 Very easy to configure. // // #5 Code auto delete at certain variable setup(limit pool). // // #6 GM can view codes when claiming. // // #7 GM can set limitation of usage of the codes. // // #8 Automatically delete any codes that set to desirable // // pool limit by gm claimed by players. // // #9 GM can set random code with random item! // //--------------------------------------------------------------------// //////////////////////////////////////////////////////////////////////// /* DROP TABLE IF EXISTS `reward_codes`; DROP TABLE IF EXISTS `reward_logs`; CREATE TABLE IF NOT EXISTS `reward_codes` ( `promo` VARCHAR(26) NOT NULL DEFAULT '', `nameid` INT(11) UNSIGNED NOT NULL DEFAULT '0', `item_name` VARCHAR(50) NOT NULL DEFAULT '', `amount` SMALLINT(6) UNSIGNED NOT NULL DEFAULT '0', `time_created` DATETIME NOT NULL DEFAULT '0000-00-00 00:00:00', `limit` INT(10) UNSIGNED NOT NULL DEFAULT '0', `pool` INT(10) UNSIGNED NOT NULL DEFAULT '0', PRIMARY KEY (`promo`) ) ENGINE = MYISAM; CREATE TABLE `reward_logs` ( `account_id` int(11) unsigned NOT NULL default '0', `last_ip` BINARY( 9 ) NOT NULL, `code` VARCHAR( 26 ) NOT NULL, `redeem_time` DATETIME NOT NULL DEFAULT '0000-00-00 00:00:00', `claim` INT( 10 ) NOT NULL, PRIMARY KEY (`code`) ) ENGINE = MYISAM; */ - script LilTrollPCodes -1,{ OnInit: //initnpctimer; // I USED THIS FOR TESTING PURPOSES WITH ONTIMER bindatcmd "claim",strnpcinfo(3)+"::OnClaim"; bindatcmd "code",strnpcinfo(3)+"::OnEditCode"; setarray $@PromoPrize[0],501,502,503,504,505,506,507,508,509,510; // SET ITEM ID HERE FOR REWARDS setarray $@PrizeAmount[0],1,2,3,4,5,6,7,8,9,10; // AMOUNT OF REWARDS setarray $@ClaimLimit[0],1,2,3,4,5,6,7,8,9,10; // CLAIM LIMITATION setarray $@length,5,15; // <MIN>,<MAX> LENGTH CHECK // 5 Recommended Minimum due to not recognizing 1234 from garbage deletion. end; // 15 maximum characters supported in random code generation. //OnTimer20000: // I USED THIS FOR TESTING PURPOSES WITH INITNPCTIMER OnMinute0000: // Refreshes every 1 Hour. Automatically delete 0 pool count promos. // Change this if you want. // ****************************************************** BIRBE WIRE *************************************************** set .@promotional,query_sql("SELECT `promo`,`pool` FROM `reward_codes` ORDER BY pool ASC LIMIT 10",.@promo$,.@remaining); for(set .@i,1; .@i <= .@promotional; set .@i,.@i++) { query_sql "DELETE FROM `reward_codes` WHERE `promo` = '" + escape_sql(.@promo$[0]) + "' AND `pool` = '0'"; // Number 1 row will be deleted. query_sql "DELETE FROM `reward_codes` WHERE `promo` = '" + escape_sql(.@promo$[.@i]) + "' AND `pool` = '0'"; // Numbers from 2-10 rows will be deleted. } debugmes "Promotional Codes garbage are deleted."; // ****************************************************** BIRBE WIRE *************************************************** //initnpctimer; // I USED THIS FOR TESTING PURPOSES WITH ONTIMER end; // ****************************************************** BIRBE WIRE *************************************************** OnDay0101: OnDay0102: OnDay0103: OnDay0104: OnDay0105: OnDay0106: // Clean sql garbage every 1st day of the month. OnDay0107: OnDay0108: OnDay0109: OnDay0110: OnDay0111: OnDay0112: set .@garbage,query_sql("SELECT `codes`,`redeem_time` FROM `reward_logs` ORDER BY pool ASC LIMIT 25",.@code$); for(set .@i,1; .@i <= .@garbage; set .@i,.@i++) { query_sql "DELETE FROM `reward_logs` WHERE `codes` = '" + escape_sql(.@code$[0]) + "'"; // Number 1 row will be deleted. query_sql "DELETE FROM `reward_logs` WHERE `codes` = '" + escape_sql(.@code$[.@i]) + ""; // Numbers from 2-25 rows will be deleted. } debugmes "reward_logs garbage has been deleted."; end; // ****************************************************** BIRBE WIRE *************************************************** OnClaim: // ONCLAIM COMMAND STARTS if ( getgmlevel() < 99 ) { mes "^00007fENTER SERVER NAME^000000"; // INPUT YOUR SERVERNAME mes "Promotional Code Rewards"; // YOU CAN CHANGE ALL MES DIALOGUES mes "Input the correct [ ^ff0000Code^000000 ]"; } if ( getgmlevel() == 99 ) { // CHECK GM LEVEL // QUERY SQL SELECT "DONT CHANGE" set .@nb, query_sql("SELECT `promo`,`pool` FROM `reward_codes` ORDER BY time_created DESC LIMIT 20",.@promo$,.@pool); // QUERY SQL SELECT "DONT CHANGE" mes "^00007fPROMOTIONAL REWARDS^000000"; mes "^ff0000GM MENU:^000000"; mes "^005500Available Codes:^000000"; // FOR STATEMENT DONT CHANGE IF YOU DONT KNOW WHAT YOU ARE DOING. for(set .@i,0; .@i < .@nb; set .@i,.@i+1) // FOR STATEMENT DONT CHANGE IF YOU DONT KNOW WHAT YOU ARE DOING. mes ""+.@promo$[.@i]+" : "+.@pool[.@i]+""; } input .@pc$; // CLAIM INPUT CODE if ( getstrlen( .@pc$ ) < $@length[0] || getstrlen( .@pc$ ) > $@length[1] ) { // CHECK LENGHT OF THE CODE dispbottom "Incorrect input. Code is not less than " +$@length[0]+ " and must be greater than " +$@length[1]+ "."; end;// ---------------------------------------------------------------------- } // END CHECK LENGHT close2; // CLOSE2 COMMAND SCRIPTS WOULD CONTINUE // QUERY SQL SELECT "DONT CHANGE" query_sql "SELECT `promo`,`nameid`, `amount`,`limit`,`pool` FROM `reward_codes` WHERE `promo` = '" + escape_sql(.@pc$) + "'", .@promo$, .@item, .@amt,.@limit,.@pool; query_sql "SELECT `account_id`,`last_ip`,`code`,`claim` FROM `reward_logs` WHERE `code` = '" + escape_sql(.@pc$) + "'",.@aid,.@lip$,.@code$,.@claim; // QUERY SQL SELECT "DONT CHANGE" // YOU CAN REMOVE THIS BY PUTTING "//" BEFORE THE LINE OF THIS STATEMENTS //if ( getgmlevel() == 99 ) { //getitem .@item, .@amt; // GM CAN CLAIM REWARDS WITHOUT RESTRICTION //end; //} // END IF GM CONDTION if ( !.@item ) { // CHECK IF CODE IS INVALID announce "Invalid code.",bc_self; end; } // END CHECK INVALID CODE // DONT CHANGE! THIS IS THE 5th DEGREE of ABUSE PROTECTION, COMBO-MIX LOL! ------------------------------------------ if ( getcharip(strcharinfo(0)) == .@lip$ && .@code$ == .@pc$ && .@pool == 0 && getcharid(3) == .@aid && .@claim >= 1 ) { // Double Check MIX // ------------------------------------------------------------------------------------------------------------------ announce "Code claim limit reach. Also either you already got this promo or other player in different IP might used code.",bc_self; // NOTE: YOU CAN CHANGE ABOVE ANNOUNCE DIALOGUE. end; } // END OF 5th DEGREE ABUSE PROTECTION // DONT CHANGE! THIS IS THE 4th DEGREE of ABUSE PROTECTION, THE COMBO XD if ( .@code$ == .@pc$ && .@pool == 0 && getcharid(3) == .@aid && .@claim >= 1 ) { // ---------------------------------------------------------------------- announce "Code claim limit reach. And you already got this promo.",bc_self; // NOTE: YOU CAN CHANGE ABOVE ANNOUNCE DIALOGUE. end; } // END OF 4th DEGREE ABUSE PROTECTION // DONT CHANGE! THIS IS THE 3th DEGREE of ABUSE PROTECTION, POOL LIMIT if ( .@code$ == .@pc$ && .@pool == 0 ) { // ========================================================================== if(.@code$ == .@pc$ && .@limit == 1 ) { announce "Code claim limit reach. "+.@limit+" player already redeemed the codes.",bc_self; // NOTE: YOU CAN CHANGE ABOVE ANNOUNCE DIALOGUE. end; } if(.@code$ == .@pc$ && .@limit >= 1 ) { announce "Code claim limit reach. "+.@limit+" players already redeemed the codes.",bc_self; // NOTE: YOU CAN CHANGE ABOVE ANNOUNCE DIALOGUE. end; } } // END OF 3th DEGREE OF ABUSE PROTECTION // DONT CHANGE! THIS IS THE 2nd DEGREE of ABUSE PROTECTION, ACOUNT BASE LIMIT if(.@code$ == .@pc$ && getcharid(3) == .@aid && .@claim >= 1) { // ---------------------------------------------------------------------- announce "Your Account already claimed this code.",bc_self; // NOTE: YOU CAN CHANGE ABOVE ANNOUNCE DIALOGUE. end; } // END OF 2nd DEGREE OF ABUSE PROTECTION // DONT CHANGE! THIS IS THE 2nd DEGREE of ABUSE PROTECTION, IP BASE LIMIT if (.@code$ == .@pc$ && getcharip(strcharinfo(0)) == .@lip$ && .@claim >= 1 ) { // ---------------------------------------------------------------------- announce "IP that you used already claimed this code.",bc_self; // NOTE: YOU CAN CHANGE ABOVE ANNOUNCE DIALOGUE. end; } // END OF 1st DEGREE OF ABUSE PROTECTION getitem .@item, .@amt; // CODE SUCCESSFULLY REDEEMED! AFTER 5th DEGREE OF CHECKING! announce "Promotional code successfully redeemed!",bc_self; // NOTE: YOU CAN CHANGE ABOVE ANNOUNCE DIALOGUE. // ****************************************** BIRBE WIRE ************************************************* // SQL QUERY SERIES, PLEASE DONT CHANGE ANYTHING BELOW IF YOU DONT KNOW WHAT YOU ARE DOING! // CLAIM COUNT if(query_sql("SELECT `claim` FROM `reward_logs` WHERE `code` = '" + escape_sql(.@pc$) + "'",.@claim)) { set .@claim,1; query_sql("UPDATE `reward_logs` SET `claim` = '"+1+"' WHERE `code` = '" + escape_sql(.@pc$) + "'"); } else { query_sql("INSERT INTO `reward_logs` (`account_id`,`last_ip`,`code`,`redeem_time`,`claim`) VALUES ('"+getcharid(3)+"','"+getcharip(strcharinfo(0))+"','"+escape_sql(.@pc$)+"',NOW(),'"+1+"')"); } // POOL COUNT if(query_sql("SELECT `pool` FROM `reward_codes` WHERE `promo` = '" + escape_sql(.@pc$) + "'",.@pool)){ set .@pool,.@pool-1; query_sql("UPDATE `reward_codes` SET `pool` = '"+.@pool+"' WHERE `promo` = '" + escape_sql(.@pc$) + "'"); } else { if(.@pool == 0) { end; } if(.@pool >= 1) { query_sql "INSERT INTO `reward_codes` VALUES `pool` = '"+.@pool+"'"; end; } } // SQL QUERY SERIES, PLEASE DONT CHANGE ANYTHING ABOVE IF YOU DONT KNOW WHAT YOU ARE DOING! // ****************************************** BIRBE WIRE ************************************************* end; // END OF ONCLAIM COMMAND OnEditCode: // ONEDITCODE STARTS goto EditCode; EditCode: if ( getgmlevel() < 99 ) end; // CHECK GM LEVEL mes "[ ^ff0000Promotional-Code Generator^000000 ]"; // YOU CAN CHANGE MES DIALOGUES HERE mes " ^ff5500Select from the options below:^000000"; mes "==================================="; // SQL QUERY DO NOT CHANGE ========================= set .@nb, query_sql("SELECT `promo`,`pool` FROM `reward_codes` ORDER BY time_created DESC LIMIT 20",.@promo$,.@pool); // ================================================= mes "^005500Available Codes:^000000"; // FOR STATEMENT DONT CHANGE IF YOU DONT KNOW ANYTHING for(set .@i,0; .@i < .@nb; set .@i,.@i+1) mes ""+.@promo$[.@i]+" : "+.@pool[.@i]+""; // =================================================== next; menu "^55007f[ Create Codes ]^000000",Setup,"^005500[ View Codes ]^000000",View,"^6a6a4f[ Delete Codes ]^000000",Delete; close; Setup: menu "[ Create Manualy ]",Bling,"[ Random Code ]",Bleng,"[ All Random ]",Blung,"[ Main Menu ]",EditCode; Bling: goto Promo; Promo: goto step1; step1: mes "[ ^ff0000Promotional Code Generator^000000 ]"; mes "^ff5500Input the desired code.^000000."; input .@pcode$; if ( getstrlen( .@pcode$ ) < $@length[0] || getstrlen( .@pcode$ ) > $@length[1] ) { announce "The code length must not be less than " +$@length[0]+ " and must not be greater than " +$@length[1]+ ".",bc_self; next; menu "[ Re-Enter ]",step1,"[ Cancel ]",Done; close; } query_sql "SELECT `promo` FROM `reward_codes` WHERE `promo` = '"+ escape_sql(.@pcode$) + "'",.@rcodes$; if (.@pcode$ == .@rcodes$) { mes "The Code : [^ff0000"+.@pcode$+"^000000] is already existing."; next; menu "[ Re-Enter ]",step1,"[ Cancel ]",Done; close; } goto step2; step2: mes "You have entered [ ^FF0000"+.@pcode$+"^000000 ]."; mes "Set the ^005500Promotional Item^000000."; input .@reward; if ( !.@reward || getitemname(.@reward) == "null" ) { announce "Sorry, that is an invalid item id.",bc_self; next; menu "[ Re-Enter ]",step2,"[ Cancel ]",Done; close; } goto step3; step3: set .@iname$, getitemname(.@reward); mes "Item ^FF0000"+.@reward+"^000000 is ^FF0000"+.@iname$+"^000000."; mes "Now, set the ^00007fAmount^000000."; input .@amount; if ( !.@amount ) { announce "Sorry, that is an invalid amount number.",bc_self; next; menu "[ Re-Enter ]",step3,"[ Cancel ]",Done; close; } if (.@amount > 1 ) { mes ""+.@amount+" pieces of reward."; } else { mes ""+.@amount+" piece of reward."; } next; menu "[ Proceed ]",Proceed,"[ Done ]",Done; close; Proceed: goto LilTroll; LilTroll: mes "[ ^ff0000Promotional Code Generator^000000 ]"; mes "Check the promo below:"; mes "Code: ^ff0000"+.@pcode$+"^000000 : ^005500"+.@reward+"^000000"; mes "^55007f"+getitemname(.@reward)+"^000000) : ^00007f"+.@amount+"^000000 "; mes "Set claim limitation."; input .@limitation; if(.@limitation == 0){ announce "You must set atleast 1 limitation.",bc_self; close; } set .@limit,.@limitation; mes "Code-Pool usage ends at "+.@limit+"."; mes "Create your Promo Code now?"; next; if ( select("Generate:Stop") - 1 ) close; // QUERY SQL, PLEASE DONT CHANGE ANYTHING IF YOU DONT KNOW THIS ==================================================================================================================================================================================================== query_sql ("INSERT INTO `reward_codes` (`promo`,`nameid`,`item_name`,`amount`,`time_created`,`limit`,`pool`) VALUES ( '" + escape_sql(.@pcode$) + "', '" + .@reward + "', '" + escape_sql(.@iname$) + "', '" + .@amount + "', NOW() ,'"+.@limit+"','"+.@limit+"' )"); // ==================================================================================================================================================================================================== =========================================================== announce "Done creating code!",bc_self; next; menu "[ Create Another Code ]",Setup,"[ Done ]",Done; close; Bleng: goto RandCode; RandCode: // ******************** IF YOU TOUCH BELOW THIS! TESLA COIL WILL ELECTRIFY AND TOAST YOU! RESULTING INSTANT DEATH! ********************************************************************************************************************************************************************************************************************************************************************************************************************************************************* setarray .@s$[0],"a","b","c","d","e","f","g","h","i","j","k","l","m","n","o","p","q","r","s","t","u","v","w","x","y","z","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z","1","2","3","4","5","6","7","8","9","0"; set .@it,$@PromoPrize[rand(getarraysize($@PromoPrize))]; set .@am,$@PrizeAmount[rand(getarraysize($@PrizeAmount))]; set .@lim,$@ClaimLimit[rand(getarraysize($@ClaimLimit))]; if($@length[1]==15) set .@randomcodes$,""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""; if($@length[1]==14) set .@randomcodes$,""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""; if($@length[1]==13) set .@randomcodes$,""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""; if($@length[1]==12) set .@randomcodes$,""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""; if($@length[1]==11) set .@randomcodes$,""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""; if($@length[1]==10) set .@randomcodes$,""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""; if($@length[1]==9) set .@randomcodes$,""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""; if($@length[1]==8) set .@randomcodes$,""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""; if($@length[1]==7) set .@randomcodes$,""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""; if($@length[1]==6) set .@randomcodes$,""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""; if($@length[1]==5) set .@randomcodes$,""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""; // ******************** IF YOU TOUCH ABOVE THIS! TESLA COIL WILL ELECTRIFY AND TOAST YOU! RESULTING INSTANT DEATH! ********************************************************************************************************************************************************************************************************************************************************************************************************************************************************* mes "[ ^ff0000Promotional Code Generator^000000 ]"; mes "Random Generator:"; mes "Code : "+.@randomcodes$+" "; next; menu "[ Re-Generate ]",RandCode,"[ Proceed ]",RandProceed,"[ Return ]",Setup; close; RandProceed: goto RandomProceed; RandomProceed: query_sql "SELECT `promo` FROM `reward_codes` WHERE `promo` = '"+ escape_sql(.@pcode$) + "'",.@rcodes$; if (.@randomcodes$ == .@rcodes$) { mes "The Code : [^ff0000"+.@pcode$+"^000000] is already existing."; next; menu "[ Re-Generate ]",RandCode,"[ Cancel ]",Done; close; } goto RandProceed1; RandProceed1: mes "Randon code is : "; mes "[ ^FF0000"+.@randomcodes$+"^000000 ]."; mes "Set the ^005500Promotional Item^000000."; input .@reward; if ( !.@reward || getitemname(.@reward) == "null" ) { announce "Sorry, that is an invalid item id.",bc_self; next; menu "[ Re-Enter ]",RandProceed1,"[ Cancel ]",Done; close; } goto RandProceed2; RandProceed2: set .@iname$, getitemname(.@reward); mes "Item ^FF0000"+.@reward+"^000000 is ^FF0000"+.@iname$+"^000000."; mes "Now, set the ^00007fAmount^000000."; input .@amount; if ( !.@amount ) { announce "Sorry, that is an invalid amount number.",bc_self; next; menu "[ Re-Enter ]",RandProceed2,"[ Cancel ]",Done; close; } if (.@amount > 1 ) { mes ""+.@amount+" pieces of reward."; } else { mes ""+.@amount+" piece of reward."; } next; menu "[ Proceed ]",RandFinalize,"[ Done ]",Done; close; RandFinalize: goto LilTrollol; LilTrollol: mes "[ ^ff0000Promotional Code Generator^000000 ]"; mes "Check the promo below:"; mes "Code: ^ff0000"+.@randomcodes$+"^000000 : ^005500"+.@reward+"^000000"; mes "^55007f"+getitemname(.@reward)+"^000000) : ^00007f"+.@amount+"^000000 "; mes "Set claim limitation."; input .@limitation; if(.@limitation == 0){ announce "You must set atleast 1 limitation.",bc_self; close; } set .@limit,.@limitation; mes "Code-Pool usage ends at "+.@limit+"."; mes "Create your Promo Code now?"; next; if ( select("Generate:Stop") - 1 ) close; // QUERY SQL, PLEASE DONT CHANGE ANYTHING IF YOU DONT KNOW THIS ==================================================================================================================================================================================================== query_sql ("INSERT INTO `reward_codes` (`promo`,`nameid`,`item_name`,`amount`,`time_created`,`limit`,`pool`) VALUES ( '" + escape_sql(.@randomcodes$) + "', '" + .@reward + "', '" + escape_sql(.@iname$) + "', '" + .@amount + "', NOW() ,'"+.@limit+"','"+.@limit+"' )"); // ==================================================================================================================================================================================================== =========================================================== announce "Done creating code!",bc_self; next; menu "[ Create Another Code ]",Setup,"[ Done ]",Done; close; Blung: goto String; String: // ******************** IF YOU TOUCH BELOW THIS! TESLA COIL WILL ELECTRIFY AND TOAST YOU! RESULTING INSTANT DEATH! ********************************************************************************************************************************************************************************************************************************************************************************************************************************************************* setarray .@s$[0],"a","b","c","d","e","f","g","h","i","j","k","l","m","n","o","p","q","r","s","t","u","v","w","x","y","z","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z","1","2","3","4","5","6","7","8","9","0"; set .@it,$@PromoPrize[rand(getarraysize($@PromoPrize))]; set .@am,$@PrizeAmount[rand(getarraysize($@PrizeAmount))]; set .@lim,$@ClaimLimit[rand(getarraysize($@ClaimLimit))]; if($@length[1]==15) set .@randomcodes$,""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""; if($@length[1]==14) set .@randomcodes$,""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""; if($@length[1]==13) set .@randomcodes$,""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""; if($@length[1]==12) set .@randomcodes$,""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""; if($@length[1]==11) set .@randomcodes$,""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""; if($@length[1]==10) set .@randomcodes$,""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""; if($@length[1]==9) set .@randomcodes$,""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""; if($@length[1]==8) set .@randomcodes$,""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""; if($@length[1]==7) set .@randomcodes$,""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""; if($@length[1]==6) set .@randomcodes$,""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""; if($@length[1]==5) set .@randomcodes$,""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""+.@s$[rand(0,61)]+""; // ******************** IF YOU TOUCH ABOVE THIS! TESLA COIL WILL ELECTRIFY AND TOAST YOU! RESULTING INSTANT DEATH! ********************************************************************************************************************************************************************************************************************************************************************************************************************************************************* mes "[ ^ff0000Promotional Code Generator^000000 ]"; mes "Random Generator:"; mes "Code : "+.@randomcodes$+" "; mes "Item : "+getitemname(.@it)+" "; mes "Item ID : "+.@it+""; set .@itn$,getitemname(.@it); mes "Amount : "+.@am+" "; mes "Limit : "+.@lim+" "; next; menu "[ Re-Generate Codes ]",string,"[ Confirm ]",confirm,"[ Cancel ]",done; close; Done: close; Confirm: // QUERY SQL DONT CHANGE ANYTHING HERE ==================================================================================================================================================================================================================== query_sql ("INSERT INTO `reward_codes` (`promo`,`nameid`,`item_name`,`amount`,`time_created`,`limit`,`pool`) VALUES ( '" + escape_sql(.@randomcodes$) + "', '" + .@it + "', '" + escape_sql(.@itn$) + "', '" + .@am + "', NOW() ,'"+.@lim+"','"+.@lim+"' )"); // ======================================================================================================================================================================================================================================================== announce "Promotional Code : "+.@randomcodes$+" has been created",bc_self; next; menu "[ Create Another Code ]",Setup,"[ Done ]",Done; close; View: goto Existing; Existing: // QUERY SQL DONT CHANGE ANYTHING HERE ========================================================================================================================= set .@nb, query_sql("SELECT `promo`, `item_name`, `amount`, `pool` FROM `reward_codes` ORDER BY time_created DESC LIMIT 20", .@code$, .@nid$, .@amount, .@pool); // QUERY SQL DONT CHANGE ANYTHING HERE ========================================================================================================================= if ( !.@nb ) { announce "No exisiting codes.",bc_self; close; } mes "[ ^ff0000Promotional Code Generator^000000 ]"; mes "==================================="; mes "======= EXISITING CODES ======="; mes "==================================="; mes "Code:ID:Item:Amount:Limit"; // FORE STATEMENT DONT CHANGE ANY OF HERE ================================= for(set .@i,0; .@i < .@nb; set .@i,.@i+1) mes "["+.@code$[.@i]+"]:["+.@nid$[.@i]+"]["+.@amount[.@i]+"]["+.@pool+"]"; // ======================================================================== mes "==================================="; next; menu "[ Main Menu ]",EditCode,"[ Done ]",Done; close; Delete: goto Deletenow; Deletenow: // QUERY SQL DONT CHANGE ANYTHING HERE =========================================================================================== set .@nb, query_sql("SELECT `promo`,`time_created` FROM `reward_codes` ORDER BY time_created ASC LIMIT 10", .@promo$,.@time$); // =============================================================================================================================== mes "[ ^ff0000Promotional Code Generator^000000 ]"; mes "==================================="; mes "======= EXISITING CODES ======="; mes "==================================="; // FORE STATEMENT DONT CHANGE ANY OF HERE === for(set .@i,0; .@i < .@nb; set .@i,.@i+1){ mes ""+.@promo$[.@i]+" : "+.@time$+""; } // ========================================== mes "==================================="; input .@dcode$; next; mes "[ ^ff0000Promotional Code Generator^000000 ]"; mes "Would you like to delete the code?"; mes ""+.@dcode$+""; next; if ( select("[ Confirm ]:[ Decline ]") - 1 ) close; // QUERY SQL DONT CHANGE ANYTHING HERE =========================================================================================== query_sql "SELECT `promo` FROM `reward_codes` WHERE `promo` = '" + escape_sql(.@dcode$) + "'",.@dcode_exists$; if(.@dcode$ == .@dcode_exists$ ) { query_sql "DELETE FROM `ragnarok`.`reward_codes` WHERE `promo` = '" + escape_sql(.@dcode$) + "'"; // QUERY SQL DONT CHANGE ANYTHING HERE =========================================================================================== announce "Promotional Code : ["+.@dcode$+"] has been deleted",bc_self; next; menu "[ Main Menu ]",Proceed,"[ Done ]",Done; close; } else { announce "Promotional code not found.",bc_self; next; menu "[ Main Menu ]",EditCode,"[ Done ]",Done; close; } end; // ENDS ONEDITCODES } // ENDS LILTROLLPCODES
  7. //======Name======================================== // Dice Event //======Version===================================== // 1.0 //======Author(s)=================================== // Sandbox //======Comments==================================== // In loving memory of AstralRO //================================================== //Edit to where would you place the warper mellina,109,153,3 script Dice Event Warper#dice 723,{ mes "Do you want to join the Dice Event?"; menu "Yes",-; warp "quiz_02",55,87; close; } - script DiceTrigger -1,{ OnInit: disablenpc "Dice Event Warper#dice"; disablenpc "Claim Your Prize!#dice"; end; OnDiceETrigger: if(agitcheck() == 1) end; enablenpc "Dice Event Warper#dice"; announce "Dice Event: We are going to have a Dice Event",bc_all,0x8A2BE2; sleep2 1000; announce "Dice Event: For those who want to join, please warp @ mellina 115 150!",bc_all,0x8A2BE2; sleep2 1000; announce "Dice Event: The Warper would be open for 1 minute",bc_all,0x8A2BE2; sleep2 30000; announce "Dice Event: Last 30 Seconds.",bc_all,0x8A2BE2; sleep2 30000; announce "Dice Event: Warper Closed.",bc_all,0x8A2BE2; disablenpc "Dice Event Warper#dice"; areawarp "ra_temsky",86,149,113,134,"ra_temsky",99,114; donpcevent "DiceEvent::OnDiceStart"; end; } quiz_02,55,90,3 script Got Stuck?#dice 779,{ mes "[ Got Stuck? ]"; mes "Do you wish to go back?"; menu "Yes",-; warp "mellina",115,150; close; } quiz_02,37,80,3 script Box 1 111,{ warp "quiz_02",37,70; close; } quiz_02,49,80,3 script Box 2 111,{ warp "quiz_02",49,70; close; } quiz_02,61,80,3 script Box 3 111,{ warp "quiz_02",61,70; close; } quiz_02,73,80,3 script Box 4 111,{ warp "quiz_02",73,70; close; } quiz_02,37,64,3 script Go Back#1 858,{ warp "quiz_02",55,76; close; } quiz_02,49,64,3 script Go Back#2 858,{ warp "quiz_02",55,76; close; } quiz_02,61,64,3 script Go Back#3 858,{ warp "quiz_02",55,76; close; } quiz_02,73,64,3 script Go Back#4 858,{ warp "quiz_02",55,76; close; } - script DiceEvent -1,{ OnDiceStart: mapannounce "quiz_02","We are about to start the Dice event.",bc_blue; sleep2 1000; mapannounce "quiz_02","Rules are simple:",bc_blue; sleep2 1000; mapannounce "quiz_02","I'm going to pick a number, 1 to 4. Then I'll do a countdown from 5 to 0",bc_blue; sleep2 1000; mapannounce "quiz_02","All you have to do is go to box of the number you want",bc_blue; sleep2 1000; mapannounce "quiz_02","Example, If I get the number 4, All players standing on number 1 to 3 loses.",bc_blue; sleep2 1000; mapannounce "quiz_02","We'll do it again and again until we have 1 player left on this map.",bc_blue; sleep2 2000; mapannounce "quiz_02","Before I forget, you must GO INSIDE THE BOX! because if you're caught standing outside the box you'll be automatically disqualified!",bc_blue; sleep2 2000; mapannounce "quiz_02","That's it.. Now let's get it on!",bc_blue; sleep2 3000; goto L_start; end; L_start: enablenpc "Go Back#1"; enablenpc "Go Back#2"; enablenpc "Go Back#3"; enablenpc "Go Back#4"; if(getmapusers("quiz_02") == 1) goto L_winner; enablenpc "Box 1"; enablenpc "Box 2"; enablenpc "Box 3"; enablenpc "Box 4"; if(getmapusers("quiz_02") == 0) goto L_noone; if(getmapusers("quiz_02") > 1) { set $@number,rand(1,4); sleep2 1000; mapannounce "quiz_02","I'm ready to pick a number. Please go to the box of the number you want! Go go go!",bc_blue; sleep2 20000; mapannounce "quiz_02","5",bc_blue; sleep2 1500; mapannounce "quiz_02","4",bc_blue; sleep2 1500; mapannounce "quiz_02","3",bc_blue; sleep2 1500; mapannounce "quiz_02","2",bc_blue; sleep2 1500; mapannounce "quiz_02","1",bc_blue; disablenpc "Box 1"; disablenpc "Box 2"; disablenpc "Box 3"; disablenpc "Box 4"; disablenpc "Go Back#1"; disablenpc "Go Back#2"; disablenpc "Go Back#3"; disablenpc "Go Back#4"; areawarp "quiz_02",32,95,79,76,"poring_w02",99,70; areawarp "quiz_02",80,85,80,76,"poring_w02",99,70; areawarp "quiz_02",31,85,31,76,"poring_w02",99,70; if(getmapusers("quiz_02") == 0) goto L_noone; sleep2 1000; mapannounce "quiz_02","Time's Up. Winning number is "+$@number+"!",bc_blue; if($@number == 4) goto L_Lose1; if($@number == 3) goto L_Lose2; if($@number == 2) goto L_Lose3; if($@number == 1) goto L_Lose4; end; } L_Lose1: //Edit to where will you warp players that lost areawarp "quiz_02",33,73,41,52,"poring_w02",99,70; areawarp "quiz_02",45,73,53,52,"poring_w02",99,70; areawarp "quiz_02",57,73,65,52,"poring_w02",99,70; set #PVPPoint, #PVPPoint+20; // SETTING PVP POINT goto L_start; end; L_Lose2: //Edit to where will you warp players that lost areawarp "quiz_02",33,73,41,52,"poring_w02",99,70; areawarp "quiz_02",45,73,53,52,"poring_w02",99,70; areawarp "quiz_02",57,73,65,52,"poring_w02",99,70; set #PVPPoint, #PVPPoint+20; // SETTING PVP POINT goto L_start; end; L_Lose3: //Edit to where will you warp players that lost areawarp "quiz_02",33,73,41,52,"poring_w02",99,70; areawarp "quiz_02",57,73,65,52,"poring_w02",99,70; areawarp "quiz_02",69,73,77,52,"poring_w02",99,70; set #PVPPoint, #PVPPoint+20; // SETTING PVP POINT goto L_start; end; L_Lose4: //Edit to where will you warp players that lost areawarp "quiz_02",45,73,53,52,"poring_w02",99,70; areawarp "quiz_02",57,73,65,52,"poring_w02",99,70; areawarp "quiz_02",69,73,77,52,"poring_w02",99,70; set #PVPPoint, #PVPPoint+20; // SETTING PVP POINT goto L_start; end; L_noone: announce "No one won the Dice Event!",bc_all,0x8A2BE2; disablenpc "Claim Your Prize!#dice"; disablenpc "Dice Event Warper#dice"; end; L_winner: enablenpc "Claim Your Prize!#dice"; disablenpc "Dice Event Warper#dice"; end; } quiz_02,55,84,3 script Claim Your Prize!#dice 904,{ mes "Please tell me your name"; next; input .@name$; if(.@name$ != strcharinfo(0)) { mes "Are you sure thats your character name?"; close; } mes "Congrats. You've won."; close2; announce strcharinfo(0)+" won the Dice Event!",bc_all,0x8A2BE2; set #PVPPoint, #PVPPoint+100; // SETTING PVP POINT warp "poring_w02",99,70; disablenpc "Claim Your Prize!#dice"; disablenpc "Dice Event Warper#dice"; close; end; } quiz_02 mapflag nowarp quiz_02 mapflag nowarpto quiz_02 mapflag noskill quiz_02 mapflag noteleport quiz_02 mapflag nomemo quiz_02 mapflag nosave SavePoint quiz_02 mapflag noicewall quiz_02 mapflag noloot
  8. in first lauch map console it will be appear
  9. krisnx

    lolphail

    very sad to hear that I hope you will be patient sir
  10. i think is cant format it again to normal text , if you wanna convert it one by one you can find converter in google why you convert it to normal text ? it not save for database
  11. after you download it , update the data.grf , after finish save the folder game (compress it) , and if you wanna update it put your data.grf again to folder and update it its my way to update data.grf to latest patch
  12. A way to return db passwords md5 login id? He was only following a way that you give? Thnks convert in database ? or change in register for the new id ?
  13. wow . simply web , ilike it 8/10 sir for this theme btw where is the menu ?
  14. and winner need type is name too get the 100 PvP Points and other players get 20 PvP Point if they lose on the dice event can you make me this script sir sandbox //======Name======================================== // Dice Event //======Version===================================== // 1.0 //======Author(s)=================================== // Sandbox //======Comments==================================== // In loving memory of AstralRO //================================================== //Edit to where would you place the warper mellina,109,153,3 script Dice Event Warper#dice 723,{ mes "Do you want to join the Dice Event?"; menu "Yes",-; warp "quiz_02",55,87; close; } - script DiceTrigger -1,{ OnInit: disablenpc "Dice Event Warper#dice"; disablenpc "Claim Your Prize!#dice"; end; OnDiceETrigger: if(agitcheck() == 1) end; enablenpc "Dice Event Warper#dice"; announce "Dice Event: We are going to have a Dice Event",bc_all,0x8A2BE2; sleep2 1000; announce "Dice Event: For those who want to join, please warp @ mellina 115 150!",bc_all,0x8A2BE2; sleep2 1000; announce "Dice Event: The Warper would be open for 1 minute",bc_all,0x8A2BE2; sleep2 30000; announce "Dice Event: Last 30 Seconds.",bc_all,0x8A2BE2; sleep2 30000; announce "Dice Event: Warper Closed.",bc_all,0x8A2BE2; disablenpc "Dice Event Warper#dice"; areawarp "ra_temsky",86,149,113,134,"ra_temsky",99,114; donpcevent "DiceEvent::OnDiceStart"; end; } quiz_02,55,90,3 script Got Stuck?#dice 779,{ mes "[ Got Stuck? ]"; mes "Do you wish to go back?"; menu "Yes",-; warp "mellina",115,150; close; } quiz_02,37,80,3 script Box 1 111,{ warp "quiz_02",37,70; close; } quiz_02,49,80,3 script Box 2 111,{ warp "quiz_02",49,70; close; } quiz_02,61,80,3 script Box 3 111,{ warp "quiz_02",61,70; close; } quiz_02,73,80,3 script Box 4 111,{ warp "quiz_02",73,70; close; } quiz_02,37,64,3 script Go Back#1 858,{ warp "quiz_02",55,76; close; } quiz_02,49,64,3 script Go Back#2 858,{ warp "quiz_02",55,76; close; } quiz_02,61,64,3 script Go Back#3 858,{ warp "quiz_02",55,76; close; } quiz_02,73,64,3 script Go Back#4 858,{ warp "quiz_02",55,76; close; } - script DiceEvent -1,{ OnDiceStart: mapannounce "quiz_02","We are about to start the Dice event.",bc_blue; sleep2 1000; mapannounce "quiz_02","Rules are simple:",bc_blue; sleep2 1000; mapannounce "quiz_02","I'm going to pick a number, 1 to 4. Then I'll do a countdown from 5 to 0",bc_blue; sleep2 1000; mapannounce "quiz_02","All you have to do is go to box of the number you want",bc_blue; sleep2 1000; mapannounce "quiz_02","Example, If I get the number 4, All players standing on number 1 to 3 loses.",bc_blue; sleep2 1000; mapannounce "quiz_02","We'll do it again and again until we have 1 player left on this map.",bc_blue; sleep2 2000; mapannounce "quiz_02","Before I forget, you must GO INSIDE THE BOX! because if you're caught standing outside the box you'll be automatically disqualified!",bc_blue; sleep2 2000; mapannounce "quiz_02","That's it.. Now let's get it on!",bc_blue; sleep2 3000; goto L_start; end; L_start: enablenpc "Go Back#1"; enablenpc "Go Back#2"; enablenpc "Go Back#3"; enablenpc "Go Back#4"; if(getmapusers("quiz_02") == 1) goto L_winner; enablenpc "Box 1"; enablenpc "Box 2"; enablenpc "Box 3"; enablenpc "Box 4"; if(getmapusers("quiz_02") == 0) goto L_noone; if(getmapusers("quiz_02") > 1) { set $@number,rand(1,4); sleep2 1000; mapannounce "quiz_02","I'm ready to pick a number. Please go to the box of the number you want! Go go go!",bc_blue; sleep2 20000; mapannounce "quiz_02","5",bc_blue; sleep2 1500; mapannounce "quiz_02","4",bc_blue; sleep2 1500; mapannounce "quiz_02","3",bc_blue; sleep2 1500; mapannounce "quiz_02","2",bc_blue; sleep2 1500; mapannounce "quiz_02","1",bc_blue; disablenpc "Box 1"; disablenpc "Box 2"; disablenpc "Box 3"; disablenpc "Box 4"; disablenpc "Go Back#1"; disablenpc "Go Back#2"; disablenpc "Go Back#3"; disablenpc "Go Back#4"; areawarp "quiz_02",32,95,79,76,"mellina",115,150; areawarp "quiz_02",80,85,80,76,"mellina",115,150; areawarp "quiz_02",31,85,31,76,"mellina",115,150; if(getmapusers("quiz_02") == 0) goto L_noone; sleep2 1000; mapannounce "quiz_02","Time's Up. Winning number is "+$@number+"!",bc_blue; if($@number == 4) goto L_Lose1; if($@number == 3) goto L_Lose2; if($@number == 2) goto L_Lose3; if($@number == 1) goto L_Lose4; end; } L_Lose1: //Edit to where will you warp players that lost areawarp "quiz_02",33,73,41,52,"mellina",115,150; areawarp "quiz_02",45,73,53,52,"mellina",115,150; areawarp "quiz_02",57,73,65,52,"mellina",115,150; set #PVPPoint, #PVPPoint+20; // SETTING PVP POINT goto L_start; end; L_Lose2: //Edit to where will you warp players that lost areawarp "quiz_02",33,73,41,52,"mellina",115,150; areawarp "quiz_02",45,73,53,52,"mellina",115,150; areawarp "quiz_02",69,73,77,52,"mellina",115,150; set #PVPPoint, #PVPPoint+20; // SETTING PVP POINT goto L_start; end; L_Lose3: //Edit to where will you warp players that lost areawarp "quiz_02",33,73,41,52,"mellina",115,150; areawarp "quiz_02",57,73,65,52,"mellina",115,150; areawarp "quiz_02",69,73,77,52,"mellina",115,150; set #PVPPoint, #PVPPoint+20; // SETTING PVP POINT goto L_start; end; L_Lose4: //Edit to where will you warp players that lost areawarp "quiz_02",45,73,53,52,"mellina",115,150; areawarp "quiz_02",57,73,65,52,"mellina",115,150; areawarp "quiz_02",69,73,77,52,"mellina",115,150; set #PVPPoint, #PVPPoint+20; // SETTING PVP POINT goto L_start; end; L_noone: announce "No one won the Dice Event!",bc_all,0x8A2BE2; disablenpc "Claim Your Prize!#dice"; disablenpc "Dice Event Warper#dice"; end; L_winner: enablenpc "Claim Your Prize!#dice"; disablenpc "Dice Event Warper#dice"; end; } quiz_02,55,84,3 script Claim Your Prize!#dice 904,{ mes "Please tell me your name"; next; input .@name$; if(.@name$ != strcharinfo(0)) { mes "Are you sure thats your character name?"; close; } mes "Congrats. You've won."; close2; announce strcharinfo(0)+" won the Dice Event!",bc_all,0x8A2BE2; set #PVPPoint, #PVPPoint+100; // SETTING PVP POINT warp "prontera",155,182; disablenpc "Claim Your Prize!#dice"; disablenpc "Dice Event Warper#dice"; close; end; } quiz_02 mapflag nowarp quiz_02 mapflag nowarpto quiz_02 mapflag noskill quiz_02 mapflag noteleport quiz_02 mapflag nomemo quiz_02 mapflag nosave SavePoint quiz_02 mapflag noicewall quiz_02 mapflag noloot please correction again @drewxd , this original script from @sandbox and has get prize +20 PVPPoint if lose , and winner must input the name before get reward +100 PVPPoint
  15. maybe your item id or sprite error sir is there a screenshot ?
  16. i dont know maybe it can be update to latest rev why you dont post your question there ?
  17. if you wrong give function in folder src it can be crash .. maybe your function its wrong ..
  18. download sprite in here , and tutorial in here post here again if any error
  19. maybe you can change it on login table
  20. i have this diff patcher sir , and has been try it to patch long time ago
×
×
  • Create New...