If you want to play Athena Royale for yourself, it's completely free within Fortnite Creative mode. if(getequipid(EQI_COSTUME_HEAD_TOP) != 0) delequip EQI_COSTUME_HEAD_TOP; if(getequipid(EQI_COSTUME_HEAD_MID) != 0) delequip EQI_COSTUME_HEAD_MID; if(getequipid(EQI_COSTUME_HEAD_LOW) != 0) delequip EQI_COSTUME_HEAD_LOW; for ( set . "; mes "Are you sure you want to claim "+@zeny+"Z for $"+@total+"? @i] == Bound_Account) continue; // Ignore equipped Costume Top + Middle + Lower Headgear. set . @p+"]")))); getitem 12007,1; // 1x Oridecon Arrow Quiver, getitem 13200,1; // 1x Cartridge = 500 Bullets, getitem 13202,1; // 1x Blood Cartridge = 500 Surplus Bloody Shells, // Depending on the class, they will recieve Armor, Shield, Garment and Shoes, if(.BR_StartWeapon) // Check for Two-Handed Weapons, if(BR_WeaponType != 3 || BR_WeaponType != 5) {, if(BR_WeaponType != 16 || BR_WeaponType != 11) {. @e+"]")); if(getd(".weap_"+.@bclass+"["+(. @BR_ID); set .@x2,getvariableofnpc(getd(".zone_"+.@BR_ID+"["+(.@z+2)+"]"),"BR_Arena#"+. Removed truncate() in a query since eAthena. Aug 16th, 2021. @l + 1), if(getd(".BR_PTY_Total_"+.@BR_ID+"["+. getitem2 BR_EQ_ID[.@g],BR_EQ_AM[.@g],BR_EQ_IFY[.@g],BR_EQ_REF[.@g],BR_EQ_ATT[.@g],BR_EQ_C1[.@g],BR_EQ_C2[.@g],BR_EQ_C3[.@g],BR_EQ_C4[. makeitem .heal[.@h],.heal[.@h+1],.@map$,rand((.@x-.@m),(.@x+.@m)),rand((.@y-.@m),(.@y+. @enchant3 - "+getarraysize(. @BR_ID) != 0) {. @enchant1 - "+getarraysize(. setarray BR_EQ_ID[.@s],@inventorylist_id[. @w + 1), if(getarraysize(getd(".BR_PTY_"+getd(".BR_PTY_Total_"+.@BR_ID+"["+. @s,4; // Define first Card Slot for first Enchant, for ( set . @i]; setarray .@opt_p5[.@c],@inventorylist_option_parameter5[. @pty_ct; copyarray .@pty_cid[0],$@partymembercid[0],. @rmin4)+", "+getarraysize(. @e+"]"))); else // Count how many max slots the equipment has available. @o,1; . @atcmd_parameters$[0],"3") == 1 || compare(. Athena Royale GUI: Sep 19th, 2021 : Never: 708: 0: None - @i]; setarray .@opt_ct[.@c],.@opt_ct[. "- "+.arena$[. @s <= getd(".loot_box_"+. @x2 >= (getd(".area_"+. Login Sign up. getmapxy(.@map$,.@x,. Fair use is a use permitted by copyright statute that might otherwise be infringing. Thanks For The Support!,-Bugxie @atcmd_parameters$[0],"18") == 1 || compare(. @BR_ID)-1)+"]"),cell_landprotector,0; setd(".z_"+.@BR_ID),getd(".z_"+. mes "The Battle Royale Arena was not started yet. But respect the order and values! @i]; setarray .@opt_v3[.@c],@inventorylist_option_value3[. @atcmd_parameters$[0],"2") == 1 || compare(. @w,0; . @i]; setarray .@c3[.@c],@inventorylist_card3[. @p < . @l]; setarray BR_EQ_EQUIP[.@s],@inventorylist_equip[. @atcmd_parameters$[0],"11") == 1 || compare(. 13% FOR RAINBOW NO GOLD PETS NEEDED! setarray . : ---island royale UPDATED AIMBOT SCRIPT 2021-X_CHANGE = 0.1 The change in camera angle on the X axis upon moving 1 pixel on 0.36 sensitivity.Y_CHANGE = 0.13 The change in camera angle on the Y axis upon moving 1 pixel on 0.36 sensitivity.MOUSE_OFFSET = Vector2.new(0, 0) The offset (in pixels) of where the script should think the mouse is.USE_RIGHT_CLICK = true Whether or not to still use right click for locking on.USE_LEFT_CLICK = false Whether or not to use left click for locking on.AIM_KEY = Enum.KeyCode.E Enum.Keycode for the key to press when you want to lock onto someone.NO_HUMANOIDS = false Whether or not to check for Humanoids in the characters. @BRZ_Start) { // Zone Damage Tick Delay until first zone has been displayed, if(checkcell(strnpcinfo(4),.@x,. @z+3)+"]")); for ( set . @t+2)+"]")+", Y2["+(. @t,0; . @e+5)+"]")); if(getd(".weap_"+.@bclass+"["+(. @cards[0],4591,4590,4592,4061,4410,4451; // Ambernite, High Orc, Horn, Khalitzburg Knight, Ogretooth, Thara Frog. @BR_ID+"[2]") - getd(".last_zone_size_"+. It features an unpatched aimbot script with a no contest script. Hunter x Athena Script GUI Roblox has auto farm stamina, strength, speed, and auto push-ups. @BR_ID); set .@y2,getd(".zone_"+.@BR_ID+"["+(. @p <= .arena_size; set .@p,. donpcevent "#BRZ"+.@BR_ID+"-"+. @BR_ID+"[3]")); if(checkcell(strnpcinfo(4),.@x,. attachrid(getcharid(3,strcharinfo(0,getd("$@BR_RegQ"+.@id+"["+. @t+3)+"]"); for ( set . @q + 1) {. @BR_ID+"[0]"),36,80,356,326; // - Takes effect if the setting for a specific arena is not set, if(getd(".last_zone_size_"+. set .@er,getd(".weap_"+.@bclass+"["+(. @BR_ID+"[0]"),112,47,335,316; setarray getd(".area_"+. @c],1; // Quick Check if Random Options are on the current Item, set .@c,. @BR_ID)); set .@l,. "; mes "Level Requirement: "+. @min_l || BaseLevel > . @t+"] = "+getd(".zone_"+.@BR_ID+"["+. waitingroom "Battle Royale - Inactive",0; donpcevent strnpcinfo(0)+"::OnWaitingRoom"; for ( set . setd(".@c"+.@s),.@cards[rand(getarraysize(. 35 min ago @pty_ct; set .@p,. @OptParam; getitem2 .@id[.@e],1,1,.@ref[.@e],0,.@c1[.@e],.@c2[.@e],.@c3[.@e],.@c4[. @i+5],"Battle Royale#BR_NPC")); setd(".Timer_"+.@id),getd(".Timer_"+. "; mes "The reward for participating are "+getitemname($@BR_RewID)+"'s, the total amount what you can gain is affected by Kills and your Placement. @BR_ID)*1000); // Timer until the Zone actually moves, // Removing the cell_landprotector flag from the current zone of the until next zone. set . todo-related-topics-headline . @p,0; . @d,0; . setarray .@opt_id3[.@c],@inventorylist_option_id3[. Pastebin . @l]; delitem2 @inventorylist_id[.@l],@inventorylist_amount[.@l],1,@inventorylist_refine[.@l],0,@inventorylist_card1[.@l],@inventorylist_card2[.@l],@inventorylist_card3[.@l],@inventorylist_card4[. // > .loot_box = How many loot boxes are available? @l]; setarray BR_EQ_C4[.@s],@inventorylist_card4[. @g,0; . @BR_ID) - getd(".last_zone_size_"+.@BR_ID),getd(".@zone_c_y_"+. @i+1]); mes " > Maximum players: "+atoi(.arena$[. @m1,6,0xFF0000; // Right Middle, viewpoint 1,getd(".zone_"+.@BR_ID+"["+(getd(".z_"+.@BR_ID)+2)+"]"),getd(".zone_"+.@BR_ID+"["+(getd(".z_"+. //= Thanks to Skotlex for implementing escape_sql. @BR_ID+"[0]"),137,47,267,209; setarray getd(".area_"+. | 14.50 KB, JSON | @p + 1), if(isloggedin(.@pty_aid[.@p],.@pty_cid[. Probably contains bugs/security, //= 1.1 - Added a check for whether the account exists when, //= adding a donator. @y,BL_NPC,strnpcinfo(0)); // For makeitem, set . | 13.16 KB, JSON | Its for the Game Roblox Athena: Battle Royale! deletearray getd(".BR_PTY_"+getcharid(1)+"[0]"),getarraysize(getd(".BR_PTY_"+getcharid(1))); attachrid(. local flytoggle = false. You can claim as much as "+@maxzeny+"Z. "Duo":"Squad")+" has placed rank "+. @y2 >= (getd(".area_"+. @l]; else if(getarg(0) == 2) { // Drop Item (makeitem usage), set . You'll just need the Athena Royale creative code: 3206-9524-5936. @rpar2); deletearray .@rand3,getarraysize(. "; query_sql "SELECT `amount`,`claimed` FROM `donate` WHERE `account_id` = "+getcharid(3), @amount$, @claimed$; query_sql "SELECT "+@amount$+" - "+@claimed$, @value$; query_sql "SELECT '"+@value$+"' > 0", @enough; mes "Sorry, you do not have enough to make a claim. // Note: You can increase this value, but you also need to add more duplicates to match it; Search for "duplicate(BR_LootBox)", // > .downed_slots = How many slots of NPC Duplicates are for downed players available? Logs, //= will appear in the "npclog" table. @cards[0],4236,4290,4160,4319,4417,4107; // Alligator, Gazeti, GC109, Greatest General, Ifrit, Mantis. "; query_sql "SELECT `donate_item_db`.`id` FROM `donate_item_db` LEFT JOIN `item_db` ON `donate_item_db`.`id` = `item_db`.`id` LEFT JOIN `item_db2` ON `donate_item_db`.`id` = `item_db2`.`id` WHERE `item_db`.`name_english` = '"+escape_sql(@itemname$)+"' || `item_db`.`name_japanese` = '"+escape_sql(@itemname$)+"' || `item_db2`.`name_english` = '"+escape_sql(@itemname$)+"' || `item_db2`.`name_japanese` = '"+escape_sql(@itemname$)+"'", @iid; mes "You have specified to delete "+@itemname$+" from the database. @o,1; . @BR_ID+"[0]"),66,81,362,274; setarray getd(".area_"+. mes "I will now store every equipment except your Costume Headgears for you, if you didn't do that already! @OptParam; delitem3 @inventorylist_id[.@l],@inventorylist_amount[.@l],1,@inventorylist_refine[.@l],0,@inventorylist_card1[.@l],@inventorylist_card2[.@l],@inventorylist_card3[.@l],@inventorylist_card4[.@l],.@OptID,.@OptVal,. @BR_ID))+" seconds. // > [3] = Refine > 1= Yes/0= No (Refine Amount is Random), // > [6] = Cards > 1= Yes/0= No (Card Amount is Random), // > [11] = Random Enchantments > 1= Yes/0= No, // > [12] = Random Options > 1= Yes/0= No (Random), // Note: 1 Equip = 15 Values! @BR_ID)/60 > 1)?"s":""):getd(".zone_time_"+. @BR_ID)); set .@t,. @atcmd_parameters$[0],"Prontera") == 1), else if(compare(. @BR_ID)); set .@w,. @es <= . (The script automatically sets NO_HUMANOIDS to true for Phantom Forces though. @c4; makeitem 12007,1,.@map$,rand((.@x-.@m),(.@x+.@m)),rand((.@y-.@m),(.@y+. @BR_ID)); set .@p,. @atcmd_parameters$[0],"9") == 1 || compare(. @rmin1); deletearray .@rmax1,getarraysize(. @p + 1) {. See \"Restricted Skills\" for more info. @i] != 0) {. @id) == 1 && . @c < getarraysize(getd("$@BR_RegQ"+. @o)); deletearray getd("BR_EQ_OPT_VAL"+.@o+"[0]"),getarraysize(getd("BR_EQ_OPT_VAL"+. "Aldebaran","2","15","50",""+.m_level,"0". @c) {. @e+"]"); setarray .@OptVal[getarraysize(.@OptVal)],getd(".@opt_v"+.@o+"["+. @BR_ID); BR_ZoneEffect(.@x1,.@y1,.@x2,.@y2,atoi(charat(strnpcinfo(2),5)),. "s":"")+" to register! @atcmd_parameters$[0],"7") == 1 || compare(. "; mes "The placement will counted when you die or win the match. @y; movenpc "#BRZ"+getarg(5)+"-"+getarg(4),getarg(2),. mes "You have to choose your starter weapon before starting/joining an arena. @es + 1) {, if(!getd(".@c"+. @p + 1). Added logmes for GM operations. Updated and fixed 5 scripts and 3 unofficial scripts and removed 1 sc, Learn more about bidirectional Unicode characters, //===== rAthena Script =======================================, //===== By ===================================================, //===== Version ==============================================, //= 1.1 - Revamped the Win code to actually support duo and squad, // and added a custom event of OnPCDieEvent for all arenas, // - Revamped Loot Boxes to have more loot and give equipment based on class, // - Changed Reward item to Gold Coin (7720), // - Added Taekwon Classes and Summoner to the job list, // - Added Star Emperor/Soul Reaper and Summoner Skills to Restricted Skills, // - Fixed a bug related to the Arena Mode (Solo, Duo and Squad), // - Added allowed skills for Soul Emperor/Soul Reaper/Rebellion/Kagerou&Oboro and Summoner, // as well as changed some restricted skill of other classes, // - Added the "Downed" feature, which allows party members to revive other members, // - Added a way to use global configs instead of the same values for each area, // - Added a config to make it to a Event, GM controlled, // - Changed Arena Menu to be able to join only an active Battle Royale and for GM controlled Arenas, // - Added @brstart command for GM's, usable when '.Arena_Event' is active, // - Modified the BR Arena Shop to use .br_shop array as item list, //===== Tested With ==========================================, //= GIT Hash: 47c471e3d0e7997ae605ebf45760349f3b25d365, //===== Description ==========================================, //= 20 Arenas to choose from (expandable), //= Loot Boxes with easy setup (Loot drops on the floor), //= Solo, Duo or Squad Types available (random every Day, if not set otherwise), //= Item Restriction to equipped Costumes (Top/Middle/Lower Headgear), //= Battle Royale Shop (Costumes) to spend your hard earned Gold Coins ($@BR_RewID), //= The items of dead players will drop around them, //= Give starting weapon on spawn (.BR_StartWeapon), //= Give starting armor on spawn (.BR_StartArmor), //= Restricted Skills, see 'db/import/skill_nocast_db.txt', //= Save whole Inventory at Arena Start/Join or manually beforehand to prevent "cheating", //= Restore saved Inventory after Match or manually at the NPC, //= Either GM controlled or Player controlled (Default), //===== Comments =============================================, //= Inspired by Battle Royale Games like PUBG. @e+10)+"]"); if(getd(".weap_"+.@bclass+"["+(. @e,1; . @p*6-4]); waitingroom .arena$[. @BR_ID))+" seconds. set .@r,rand(getarraysize(getd(".@rand"+. @id))+"]"),getcharid(0); announce "[Battle Royale - "+.arena$[. "; query_sql "UPDATE `donate` SET `claimed` = `claimed` + "+@total+" WHERE `account_id` = "+getcharid(3); query_sql "SELECT IFNULL((SELECT SUM(amount) FROM `donate`),0)", @total$; mes "Our fund is at a total of $"+@total$; menu "More info",L_INFO,"Make a claim",L_CHECK,"Statistics",L_STATS; query_sql "SHOW VARIABLES LIKE 'version'", @version, @valule$; query_sql "SELECT '"+@valule$+"' >= '5.0.8'", @version; menu "Add/Remove Donation",L_GM2,"Add/Remove Items",L_ITEM,"(Re)Set Exchange Rate",L_RATE,"Test Script",L_START; menu "Add a donation",L_DONATE,"Remove a donation",L_REMOVE,"View all donations",L_VIEWALL,"Return to main menu",L_GM; menu "Add an item",L_NEWITEM,"Remove an item",L_DELITEM,"View all items",L_ALLITEMS,"Return to main menu",L_GM; query_sql "SELECT `id` FROM `item_db` WHERE `name_english` = '"+escape_sql(@itemname$)+"' || `name_japanese` = '"+escape_sql(@itemname$)+"' UNION SELECT `id` FROM `item_db2` WHERE `name_english` = '"+escape_sql(@itemname$)+"' || `name_japanese` = '"+escape_sql(@itemname$)+"'", @iid; query_sql "SELECT 1 FROM `donate_item_db` WHERE `id` = "+@iid, @check; mes "Please enter the cost of each "+@itemname$+":"; if(@version) query_sql "SELECT CAST('"+escape_sql(@cost$)+"' AS DECIMAL)", @cost$; query_sql "SELECT '"+escape_sql(@cost$)+"' > 0", @valid; mes "You have specified that donators can claim "+@itemname$+"s for $"+@cost$+" each.