Jump to content

Kurby

Members
  • Posts

    113
  • Joined

  • Last visited

Everything posted by Kurby

  1. Still errors..? Any idea how to fix this?
  2. I message NPC:Lower to change lower headgears to available headgears in script. I try message "Black Red Aura" and it doesn't change, but I message "None" it changes? crystilia,72,82,4 script Lower 793,{ close; //Prevent them from talking to the NPC OnInit: //Arrays setarray .lowerid[0],19814; setarray .lowername$[0],"Black Red Aura"; //Regular expressions defpattern 1, "([^:]+):.*sNone(.*)", "L_None"; for(set .@i,0; .@i < getarraysize(.lowerid); set .@i, .@i+1) { defpattern 1, "([^:]+):s"+.lowerid[.@i], "L_"+.@i; defpattern 1, "([^:]+):s"+.lowername$[.@i], "L_"+.@i; } activatepset 1; end; //Finished with OnInit //Label for none L_None: if(!isequipped(19807)) end; setlook 3,0; npctalk strcharinfo(0) + " has changed his Dyna Lower Look!"; end; //Label L_.@i ,repeat a label equal your item list (L_? == set .@view_change,? L_0: set .@view_change,0; goto Change_Look; L_1: set .@view_change,1; goto Change_Look; L_2: set .@view_change,2; goto Change_Look; Change_Look: if(!isequipped(19807)) end; //Make sure they have the item equipped setlook 3,getiteminfo(.lowerid[.@view_change],11); // Call viewpoint of item and setlook npctalk strcharinfo(0) + " has changed his Dyna Lower Look!"; end; OnWhisperGlobal: if(!isequipped(19807)) end; if((@whispervar0$ == "None")) setlook 3,0; for ( set .@i, 0; .@i < getarraysize(.@lowerid); set .@i, .@i +1 ) { for ( set .@i, 0; .@i < getarraysize(.@lowername$); set .@i, .@i +1 ) ;{ // Invert Number to String if(@whispervar0$ == .@lower_id$ || @whispervar0$ == .lowername$[.@i]) { setlook 3,getiteminfo(.lowerid[.@i],11); end; } } } } Actually @changelook doesn't work, it changes my equips to none everytime I try typing it or use a script.. Up..
  3. Kurby

    Vit to HP ratio

    Lmfao, actually I did not Should I go change it back to default? Yes you should. Leave it as default (100) and restart your server and check your novice again. Or, remake it. Thanks it worked Would you by any chance know where I can change how many stat points he gets per lvl?
  4. Kurby

    Vit to HP ratio

    Lmfao, actually I did not Should I go change it back to default?
  5. I created a lvl 1 novice not on my GM account and it started out with around 600k HP.. My max HP is 1 million. Why does my novice start out with so much HP? When I reborn he instantly gets max HP, how do I change this..? :/
  6. So.. Like this? phang_cas01,69,34,0,0 monster Barricade 1905,1,7200000,0,0,"#phang_bar01::OnMonsterDie"; phang_cas01,70,34,0,0 monster Barricade 1905,1,7200000,0,0 phang_cas01,71,34,0,0 monster Barricade 1905,1,7200000,0,0 phang_cas01,72,34,0,0 monster Barricade 1905,1,7200000,0,0 phang_cas01,73,34,0,0 monster Barricade 1905,1,7200000,0,0 phang_cas01,63,23,5 script #phang_bar01 -1,{ OnInit: setcell "phang_cas01",69,34,69,34,cell_walkable,0; setcell "phang_cas01",70,34,70,34,cell_walkable,0; setcell "phang_cas01",71,34,71,34,cell_walkable,0; setcell "phang_cas01",72,34,72,34,cell_walkable,0; setcell "phang_cas01",73,34,73,34,cell_walkable,0; end; OnMonsterDie: setcell "phang_cas01",69,34,69,34,cell_walkable,1; setcell "phang_cas01",70,34,70,34,cell_walkable,1; setcell "phang_cas01",71,34,71,34,cell_walkable,1; setcell "phang_cas01",72,34,72,34,cell_walkable,1; setcell "phang_cas01",73,34,73,34,cell_walkable,1; end; } I tried this, but after monsters die I still can't move phang_cas01,69,34,0,0 monster Barricade 1905,1,7200000,0,0,"#phang_bar01::OnMonsterDie"; phang_cas01,70,34,0,0 monster Barricade 1905,1,7200000,0,0 phang_cas01,71,34,0,0 monster Barricade 1905,1,7200000,0,0 phang_cas01,72,34,0,0 monster Barricade 1905,1,7200000,0,0 phang_cas01,73,34,0,0 monster Barricade 1905,1,7200000,0,0 phang_cas01,63,23,5 script #phang_bar01 -1,{ if (.mobs_left==0) goto OnMonsterDie; { OnInit: setcell "phang_cas01",69,34,69,34,cell_walkable,0; setcell "phang_cas01",70,34,70,34,cell_walkable,0; setcell "phang_cas01",71,34,71,34,cell_walkable,0; setcell "phang_cas01",72,34,72,34,cell_walkable,0; setcell "phang_cas01",73,34,73,34,cell_walkable,0; end; OnMonsterDie: setcell "phang_cas01",69,34,69,34,cell_walkable,1; setcell "phang_cas01",70,34,70,34,cell_walkable,1; setcell "phang_cas01",71,34,71,34,cell_walkable,1; setcell "phang_cas01",72,34,72,34,cell_walkable,1; setcell "phang_cas01",73,34,73,34,cell_walkable,1; end; } } This doesn't work either.. Still can't move.. Anyone got any suggestions? phang_cas01,69,34,0,0 monster Barricade 1905,1,7200000,0,0 phang_cas01,70,34,0,0 monster Barricade 1905,1,7200000,0,0 phang_cas01,71,34,0,0 monster Barricade 1905,1,7200000,0,0 phang_cas01,72,34,0,0 monster Barricade 1905,1,7200000,0,0 phang_cas01,73,34,0,0 monster Barricade 1905,1,7200000,0,0 phang_cas01,63,23,5 script BarricadeNPC -1,{ set .Map$,"phang_cas01"; monster .Map$,69,34,"Barricade",1905,1,"BarricadeNPC::OnMonsterDie"; monster .Map$,70,34,"Barricade",1905,1,"BarricadeNPC::OnMonsterDie"; monster .Map$,71,34,"Barricade",1905,1,"BarricadeNPC::OnMonsterDie"; monster .Map$,72,34,"Barricade",1905,1,"BarricadeNPC::OnMonsterDie"; monster .Map$,73,34,"Barricade",1905,1,"BarricadeNPC::OnMonsterDie"; set .mobs_left, 4; OnInit: setcell "phang_cas01",69,34,69,34,cell_walkable,0; setcell "phang_cas01",70,34,70,34,cell_walkable,0; setcell "phang_cas01",71,34,71,34,cell_walkable,0; setcell "phang_cas01",72,34,72,34,cell_walkable,0; setcell "phang_cas01",73,34,73,34,cell_walkable,0; end; OnMonsterDie: set .mobs_left, .mobs_left-1; if (.mobs_left==0) { } else { announce "["+.mobs_left+"/4] Barricades left.",bc_map; setcell "phang_cas01",69,34,69,34,cell_walkable,1; setcell "phang_cas01",70,34,70,34,cell_walkable,1; setcell "phang_cas01",71,34,71,34,cell_walkable,1; setcell "phang_cas01",72,34,72,34,cell_walkable,1; setcell "phang_cas01",73,34,73,34,cell_walkable,1; end; } } Anyone got any ideas? When they die, I still cant walk through.. How do I trigger monster die? How to when all barricades die, trigger walkable cell? Still need to figure out triggering cell_walkable,1; after all barricades die..
  7. I'm using setcell instead, it worked better. Would it work if I triggered monster killed, then goto walkable? I'm not very good with script.. Lol
  8. Well.. Actually now it's like. Setting a different part of the map for the wall? I walk through the barricade and then I can't move any further.. phang_cas01,69,34,0,0 monster Barricade 1905,1,7200000,0,0 phang_cas01,70,34,0,0 monster Barricade 1905,1,7200000,0,0 phang_cas01,71,34,0,0 monster Barricade 1905,1,7200000,0,0 phang_cas01,72,34,0,0 monster Barricade 1905,1,7200000,0,0 phang_cas01,73,34,0,0 monster Barricade 1905,1,7200000,0,0 phang_cas01,69,34,0 script #phang_bar01 -1,{ OnInit: setcell "phang_cas01",69,34,69,34,cell_walkable,0; setwall "phang_cas01",70,34,70,34,cell_walkable,0; setwall "phang_cas01",71,34,71,34,cell_walkable,0; setwall "phang_cas01",72,34,72,34,cell_walkable,0; setwall "phang_cas01",73,34,73,34,cell_walkable,0; end; } Still attempting, but failing.. /Edit: Got my first part done, but I can't walk after I break the barricades? phang_cas01,69,34,0,0 monster Barricade 1905,1,7200000,0,0 phang_cas01,70,34,0,0 monster Barricade 1905,1,7200000,0,0 phang_cas01,71,34,0,0 monster Barricade 1905,1,7200000,0,0 phang_cas01,72,34,0,0 monster Barricade 1905,1,7200000,0,0 phang_cas01,73,34,0,0 monster Barricade 1905,1,7200000,0,0 phang_cas01,63,23,5 script #phang_bar01 -1,{ OnInit: setcell "phang_cas01",69,34,69,34,cell_walkable,0; setcell "phang_cas01",70,34,70,34,cell_walkable,0; setcell "phang_cas01",71,34,71,34,cell_walkable,0; setcell "phang_cas01",72,34,72,34,cell_walkable,0; setcell "phang_cas01",73,34,73,34,cell_walkable,0; end; }
  9. No.. I made all the barricades in a line, so you must break them to get through.. They walk straight through it though. This gives the same effect, I walk through instead of having to break them phang_cas01,69,34,0,0 monster Barricade 1905,1,7200000,0,0 phang_cas01,70,34,0,0 monster Barricade 1905,1,7200000,0,0 phang_cas01,71,34,0,0 monster Barricade 1905,1,7200000,0,0 phang_cas01,72,34,0,0 monster Barricade 1905,1,7200000,0,0 phang_cas01,73,34,0,0 monster Barricade 1905,1,7200000,0,0 phang_cas01,69,34,0 script #phang_bar01 -1,{ OnBarricadeDeploy: setcell "phang_cas01",69,34,69,34,cell_walkable,0; setwall "phang_cas01",70,34,70,34,cell_walkable,0; setwall "phang_cas01",71,34,71,34,cell_walkable,0; setwall "phang_cas01",72,34,72,34,cell_walkable,0; setwall "phang_cas01",73,34,73,34,cell_walkable,0; end; OnBarricadeBreak: setcell "phang_cas01",69,34,69,34,cell_walkable,1; setwall "phang_cas01",70,34,70,34,cell_walkable,1; setwall "phang_cas01",71,34,71,34,cell_walkable,1; setwall "phang_cas01",72,34,72,34,cell_walkable,1; setwall "phang_cas01",73,34,73,34,cell_walkable,1; end; }
  10. So I changed 0's to 1's to set the flag.. =/ https://rathena.svn....pt_commands.txt *setcell "<map name>",<x1>,<y1>,<x2>,<y2>,<type>,<flag>; Each map cell has several 'flags' that specify the properties of that cell. These include terrain properties (walkability, shootability, presence of water), skills (basilica, land protector, ...) and other (NPC nearby, no vending, ...). Each of these can be 'on' or 'off'. Together they define a cell's behavior. This command lets you alter these flags for all map cells in the specified (x1,y1)-(x2,y2) rectangle. The 'flag' can be 0 or 1 (0:clear flag, 1:set flag). The 'type' defines which flag to modify. Possible options include cell_walkable, cell_shootable, cell_basilica. For a full list, see const.txt. Example: setcell "arena",0,0,300,300,cell_basilica,1; setcell "arena",140,140,160,160,cell_basilica,0; setcell "arena",135,135,165,165,cell_walkable,0; setcell "arena",140,140,160,160,cell_walkable,1; This will add a makeshift ring into the center of the map. The ring will be surrounded by a 5-cell wide 'gap' to prevent interference from outside, and the rest of the map will be marked as 'basilica', preventing observers from casting any offensive skills or fighting among themselves. Note that the wall will not be shown nor known client-side, which may cause movement problems. Another example: OnBarricadeDeploy: setcell "schg_cas05",114,51,125,51,cell_walkable,0; end; OnBarricadeBreak: setcell "schg_cas05",114,51,125,51,cell_walkable,1; end; This could be a part of the WoE:SE script, where attackers are not allowed to proceed until all barricades are destroyed. This script would place and remove a nonwalkable row of cells after the barricade mobs. I tried the script you showed, I still walk through them ):
  11. Then end wasn't needed, but now.. I can hit them, but it still walks through them. Thanks for attempting though
  12. Yeah, I attempted to copy that. This code spawns the barricades, and doesn't allow me to run through it, but I can't hit them now? :< phang_cas01,69,34,0,0 monster Barricade 1905,1,7200000,0,0 phang_cas01,70,34,0,0 monster Barricade 1905,1,7200000,0,0 phang_cas01,71,34,0,0 monster Barricade 1905,1,7200000,0,0 phang_cas01,72,34,0,0 monster Barricade 1905,1,7200000,0,0 phang_cas01,73,34,0,0 monster Barricade 1905,1,7200000,0,0 phang_cas01,69,34,0 script #phang_bar01 -1,{ Oninit: setwall "phang_cas01",69,34,8,6,0,"phang_bar01"; end; }
  13. Sorry.. Spawning the monster wasn't the problem. Got a bit confused. I can add the barricade just fine, but I walk straight through it.
  14. I'm trying to make barricades spawn on a map permanently. I follow the guide on the wiki, but the monster doesn't spawn? Any help?
  15. I'm using Neoncube.. Even with thor, it still doesn't work. The files are in my custom.GRF, but when I log into the server the items are still "Unknown Item".. It just doesn't make any sense to me
  16. Could anyone direct me to a tutorial for this? I believe I'm doing it correctly, but the items seem to be "Unknown Items"
  17. Not exactly sure if it's corrupted, lmfao I hope not All I get is this.. Problem signature: Problem Event Name: APPCRASH Application Name: MyRO.exe Application Version: 0.0.0.0 Application Timestamp: 4e41d3a8 Fault Module Name: MyRO.exe Fault Module Version: 0.0.0.0 Fault Module Timestamp: 4e41d3a8 Exception Code: c0000005 Exception Offset: 00289320 OS Version: 6.1.7600.2.0.0.768.3 Locale ID: 1033 Additional Information 1: 0a9e Additional Information 2: 0a9e372d3b4ad19135b953a78882e789 Additional Information 3: 0a9e Additional Information 4: 0a9e372d3b4ad19135b953a78882e789
  18. download ROSeta. It just says it encountered a problem and closes. None of them numbers or whatever, so I'm not exactly sure how I'd use this. Thanks though
  19. Everything is in the GRF, it just doesn't seem to work when I use the GRF. I can use the maps with the GRF though? It just doesn't seem to make any sense to me. By GRF structure do you mean location of where I put the items?
  20. I can add in the item without the patcher, but I'm trying to config the patcher so my friends can get the items too. So I think my client can get more item ids [Data] 0=myRO.grf 1=data.grf 2=rdata.grf 3=sdata.grf 4=koth01.grf
  21. I follow the procedure the way I would without a patcher to create items, just in a separate data folder. I use the GRFBuilder to create a GPF and merge dir to the separate data folder I created. Patchlist is setup correctly, it loads the patch & my custom.GRF has all the files inside it that were in the separate data folder, but I log into the server and my item still says "Unknown Item" I followed the procedure perfectly using maps with the patcher, they all ended up working flawlessly. I don't understand why the items won't work?
  22. I downloaded an Emperium Break NPC script, I looked through the selections in game and chose Enable hourly event. Now I can't click on the NPC to test my break? How do I fix this? I tried redownloading, but it still doesn't work. //===== rAthena Script ======================================= //= Emperium Break Room //===== By: ================================================== //= Masao //===== Current Version: ===================================== //= 1.0 //===== Compatible With: ===================================== //= rAthena SVN //===== Description: ========================================= //= An little Emperium Break Room NPC in which you can test your //= strength and speed against Emperiums. //===== Additional Comments: ================================= //= 1.0 First Version. [Masao] //============================================================ - script EmpBrkRmTm -1,{ OnClock0000: OnClock0200: OnClock0400: OnClock0600: OnClock0800: OnClock1000: OnClock1200: OnClock1400: OnClock1600: OnClock1800: OnClock2000: OnClock2200: if($empbrkrh == 1) { hideoffnpc "Emperium Breaking Room"; } end; OnClock0100: OnClock0300: OnClock0500: OnClock0700: OnClock0900: OnClock1100: OnClock1300: OnClock1500: OnClock1700: OnClock1900: OnClock2100: OnClock2300: if($empbrkrh == 1) { hideonnpc "Emperium Breaking Room"; } end; } prontera,140,180,0 script Emperium Breaking Room 1288,{ if (getgmlevel() >= $empbrk_gm_restriction) goto L_GMCP; L_SM: set .@time,empbrk_record; set .@m,.@time / 60000; set .@s,.@time / 1000; set .@ms,.@time / 10000; set .@empbrk_time,$empbrk_record; set .@empbrk_m,.@empbrk_time / 60000; set .@empbrk_s,.@empbrk_time / 1000; set .@empbrk_ms,.@empbrk_time / 10000; mes .n$; mes "Current record holder is the Player ^5050A0"+$empbrk_master$+"^000000 ."; mes "With an time of ^000080"+.@empbrk_m+"^000000Minutes ^000080"+.@empbrk_s+"^000000Seconds ^000080"+.@empbrk_ms+"^000000Milliseconds until the Emperium got broke."; next; mes .n$; mes "Your Own Record:"; mes "^000080"+.@m+"^000000m ^000080"+.@s+"^000000s ^000080"+.@ms+"^000000ms"; next; mes .n$; mes "Would you like to try to set a new record?"; next; menu "Yes",-,"No",L_C,"Reset Your Record",L_RYR; cleararray .arena$[0],"",4; mes .n$; if (getareausers("pvp_n_4-5",94,128,105,139) || $@empr_occupied[0] > 0){ mes "^B8860BEmperium Room N° 1:^000000 ^FF0000Busy^000000"; }else{ mes "^B8860BEmperium Room N° 1:^000000 ^32CD32Free^000000"; set .arena$[0],"^B8860BEmperium Room N° 1^000000"; } if (getareausers("pvp_n_4-5",60,94,71,105) || $@empr_occupied[1] > 0){ mes "^B8860BEmperium Room N° 2:^000000 ^FF0000Busy^000000"; }else{ mes "^B8860BEmperium Room N° 2:^000000 ^32CD32Free^000000"; set .arena$[1],"^B8860BEmperium Room N° 2^000000"; } if (getareausers("pvp_n_4-5",94,60,105,71) || $@empr_occupied[2] > 0){ mes "^B8860BEmperium Room N° 3:^000000 ^FF0000Busy^000000"; }else{ mes "^B8860BEmperium Room N° 3:^000000 ^32CD32Free^000000"; set .arena$[2],"^B8860BEmperium Room N° 3^000000"; } if (getareausers("pvp_n_4-5",128,94,139,105) || $@empr_occupied[3] > 0){ mes "^B8860BEmperium Room N° 4:^000000 ^FF0000Busy^000000"; }else{ mes "^B8860BEmperium Room N° 4:^000000 ^32CD32Free^000000"; set .arena$[3],"^B8860BEmperium Room N° 4^000000"; } next; switch (select(.arena$[0],.arena$[1],.arena$[2],.arena$[3],"^FF0000Exit^000000")){ case 1: if($@empr_occupied[0] > 0){ mes .n$; mes "Sorry but the Room has been taken."; mes "Please try another Room or come back later."; goto L_SM; } set $@empr_occupied[0],1; set $@empbrk_charid[0],getcharid(0); initnpctimer "EmpBrk#1"; sc_end SC_ALL; warp "pvp_n_4-5",99,128; end; case 2: if($@empr_occupied[1] > 0){ mes .n$; mes "Sorry but the Room has been taken."; mes "Please try another Room or come back later."; goto L_SM; } set $@empr_occupied[1],1; set $@empbrk_charid[1],getcharid(0); initnpctimer "EmpBrk#2"; sc_end SC_ALL; warp "pvp_n_4-5",68,99; end; case 3: if($@empr_occupied[2] > 0){ mes .n$; mes "Sorry but the Room has been taken."; mes "Please try another Room or come back later."; goto L_SM; } set $@empr_occupied[2],1; set $@empbrk_charid[2],getcharid(0); initnpctimer "EmpBrk#3"; sc_end SC_ALL; warp "pvp_n_4-5",100,68; end; case 4: if($@empr_occupied[3] > 0){ mes .n$; mes "Sorry but the Room has been taken."; mes "Please try another Room or come back later."; goto L_SM; } set $@empr_occupied[3],1; set $@empbrk_charid[3],getcharid(0); initnpctimer "EmpBrk#4"; sc_end SC_ALL; warp "pvp_n_4-5",130,99; end; case 5: close; } L_GMCP: mes .n$; mes "Hello "+strcharinfo(0)+","; mes "what can i do for you today?"; next; menu "Standard Menu",L_SM,"Set Prize",-,"Hourly Event",L_HE,"Set GM Control Panel Access Level",L_SGCPL,"Reset Offical Record",L_ROR,"Reset Rooms",L_RR,"Cancel",L_C; L_SP: mes .n$; mes "Allright, what would you like to do?"; next; menu "Set Prize & Amount",-,"Enable / Disable Prize Distribution",L_EDPD,"Cancel",L_C; L_RP: mes .n$; mes "The current gloabl Prize and Amount is: "+$empbrk_amount+"x "+getitemname($empbrk_prize)+""; mes "The current personal Prize and Amount is: "+$empbrk_amountp+"x "+getitemname($empbrk_prizep)+""; next; mes .n$; mes "What would you like to do next?"; next; menu "Set global Prize & Amount",-,"Set personal Prize & Amount",L_SPPA; L_RGP: mes .n$; mes "Ok, then please tell me now which Item you would like to set as global Prize if someone breaks the global Record."; mes "And please remember that only numbers = Item ID's as values are allowed."; next; mes "Insert 0 to cancel."; input .empbrk_prize; next; if(.empbrk_prize <= 0){ next; goto L_SP; } query_sql "SELECT `id` FROM `item_db` WHERE `id` = '"+.empbrk_prize+"'",.id; if(!.id){ mes .n$; mes "I'm sorry but this Item doesn't exist!"; mes "Please try again."; next; goto L_RGP; } mes .n$; mes "Ok, so the Prize will be "+getitemname(.empbrk_prize)+" , is that correct?"; next; menu "No, that's wrong!",L_RGP,"Yes, that's correct!",-; L_RGA: mes .n$; mes "Good! Now please tell me how many pieces of this prize the new Emperium break Champion should get,"; mes "but remember for security reasons you can't enter a higher value than 100."; next; mes "Insert 0 to cancel."; input .empbrk_amount; next; if(.empbrk_amount <= 0){ next; goto L_SP; } if(.empbrk_amount >= 100){ mes .n$; mes "I'm sorry but the entered Value exceeds the allowed amount!"; mes "Please try again."; next; goto L_RGA; } mes .n$; mes "Ok, so the Amount of the Prize that will be given is "+.empbrk_amount+" , is that correct?"; next; menu "No, that's wrong!",L_RGA,"Yes, that's correct!",-; mes .n$; mes "Great! So the Prize "+getitemname(.empbrk_prize)+" will be given away with an amount of "+.empbrk_amount+" to the one who breaks the current global Emperium Breack Record, is that correct?"; next; menu "No, that's wrong!",L_SP,"Yes, that's correct!",-; mes .n$; mes "Allright, it's all set!"; set $empbrk_prize,.empbrk_prize; set $empbrk_amount,.empbrk_amount; next; goto L_GMCP; L_SPPA: mes .n$; mes "Ok, then please tell me now which Item you would like to set as personal Prize if someone breaks his personal Record."; mes "And please remember that only numbers = Item ID's as values are allowed."; next; mes "Insert 0 to cancel."; input .empbrk_prizep; next; if(.empbrk_prizep <= 0){ next; goto L_SP; } query_sql "SELECT `id` FROM `item_db` WHERE `id` = '"+.empbrk_prizep+"'",.idp; if(!.idp){ mes .n$; mes "I'm sorry but this Item doesn't exist!"; mes "Please try again."; next; goto L_SPPA; } mes .n$; mes "Ok, so the Prize will be "+getitemname(.empbrk_prizep)+" , is that correct?"; next; menu "No, that's wrong!",L_SPPA,"Yes, that's correct!",-; L_RPA: mes .n$; mes "Good! Now please tell me how many pieces of this prize the new Player should get,"; mes "but remember for security reasons you can't enter a higher value than 100."; next; mes "Insert 0 to cancel."; input .empbrk_amountp; next; if(.empbrk_amountp <= 0){ next; goto L_SP; } if(.empbrk_amountp >= 100){ mes .n$; mes "I'm sorry but the entered Value exceeds the allowed amount!"; mes "Please try again."; next; goto L_RPA; } mes .n$; mes "Ok, so the Amount of the Prize that will be given is "+.empbrk_amountp+" , is that correct?"; next; menu "No, that's wrong!",L_RPA,"Yes, that's correct!",-; mes .n$; mes "Great! So the Prize "+getitemname(.empbrk_prizep)+" will be given away with an amount of "+.empbrk_amountp+" if someone breaks his personal Record, is that correct?"; next; menu "No, that's wrong!",L_SPPA,"Yes, that's correct!",-; mes .n$; mes "Allright, it's all set!"; set $empbrk_prizep,.empbrk_prizep; set $empbrk_amountp,.empbrk_amountp; next; goto L_GMCP; L_EDPD: mes .n$; mes "What would you like to do?"; next; menu "Disable global Prize Distribution",-,"Enable global Prize Distribution",L_EGPD,"Disable personal Prize Distribution",L_DPPD,"Enable personal Prize Distribution",L_EPPD,"Cancel",L_C; if($empbrk_przdg == 0){ mes .n$; mes "Global Prize Distribution is already disabled!"; next; goto L_EDPD; } mes .n$; mes "Global Prize Distribution has been disabled!"; set $empbrk_przdg,0; next; goto L_GMCP; L_EGPD: if($empbrk_przdg == 1){ mes .n$; mes "Global Prize Distribution is already enabled!"; next; goto L_EDPD; } mes .n$; mes "Global Prize Distribution has been enabled!"; set $empbrk_przdg,1; next; goto L_GMCP; L_DPPD: if($empbrk_przdp == 0){ mes .n$; mes "Personal Prize Distribution is already disabled!"; next; goto L_EDPD; } mes .n$; mes "Personal Prize Distribution has been disabled!"; set $empbrk_przdp,0; next; goto L_GMCP; L_EPPD: if($empbrk_przdp == 1){ mes .n$; mes "Personal Prize Distribution is already enabled!"; next; goto L_EDPD; } mes .n$; mes "Personal Prize Distribution has been enabled!"; set $empbrk_przdp,1; next; goto L_GMCP; L_HE: mes .n$; mes "What would you like to do?"; next; menu "Disable Hourly Event",-,"Enable Hourly Event",L_EHE,"Cancel",L_C; if($empbrkrh == 0){ mes .n$; mes "Hourly Event already is disabled!"; next; goto L_HE; } mes .n$; mes "Hourly Event has been disabled!"; hideoffnpc "Emperium Breaking Room"; set $empbrkh,0; next; goto L_GMCP; L_EHE: if($empbrkh == 1){ mes .n$; mes "Hourly Event already is enabled!"; next; goto L_HE; } mes .n$; mes "Hourly Event has been enabled!"; mapwarp "pvp_n_4-5","prontera",155,180; stopnpctimer "EmpBrk#1"; stopnpctimer "EmpBrk#2"; stopnpctimer "EmpBrk#3"; stopnpctimer "EmpBrk#4"; killmonster "pvp_n_4-5","EmpBrk#1::OnEmpBrk"; killmonster "pvp_n_4-5","EmpBrk#2::OnEmpBrk"; killmonster "pvp_n_4-5","EmpBrk#3::OnEmpBrk"; killmonster "pvp_n_4-5","EmpBrk#4::OnEmpBrk"; cleararray $@empbrkr_occupied[0],0,4; hideonnpc "Emperium Breaking Room"; set $empbrkh,1; next; goto L_GMCP; L_SGCPL: mes .n$; mes "What would you like to do?"; next; menu "Set GM Control Panel Acces Level",-,"Cancel",L_C; mes .n$; mes "Allright, please insert now the GM Level at which Players / GM's should be able to enter the GM Control Panel."; next; mes .n$; mes "Please note that the GM Level can't be lower than 40 and can't be above 99 as well for security reasons."; input .gmcp; next; if(.gmcp <= 40 || .gmcp >= 99){ mes .n$; mes "I'm sorry but you inserted an invalid Level!"; next; goto L_SGCPL; } mes .n$; mes "Allright, the new GM Control Panel access Level will be "+.gmcp+" , is that correct?"; next; menu "No, that's wrong!",L_SGCPL,"Yes, that's correct!",-; mes .n$; mes "Great! It all has been set, so the new GM Control Panel Access Level will be "+.gmcp+" ."; set $empbrk_gm_restriction,.gmcp; next; goto L_GMCP; L_RYR: mes .n$; mes "Are you sure you want to reset your record?"; next; menu "Yes",-,"No",L_C; mes .n$; mes "Your personal Record has been reset."; set empbrk_record,0; close; L_ROR: mes .n$; mes "Are you sure you want to reset the official Record?"; next; menu "No",L_GMCP,"Yes",-; mes .n$; mes "It's done."; set $empbrk_record,0; set $empbrk_master$,""; next; goto L_GMCP; L_RR: mes .n$; mes "Are you sure you want to reset the Emperium Breaking Rooms?"; next; menu "No",L_GMCP,"Yes",-; mes "Rooms have been reset."; mapwarp "pvp_n_4-5","prontera",155,180; stopnpctimer "EmpBrk#1"; stopnpctimer "EmpBrk#2"; stopnpctimer "EmpBrk#3"; stopnpctimer "EmpBrk#4"; killmonster "pvp_n_4-5","EmpBrk#1::OnEmpBrk"; killmonster "pvp_n_4-5","EmpBrk#2::OnEmpBrk"; killmonster "pvp_n_4-5","EmpBrk#3::OnEmpBrk"; killmonster "pvp_n_4-5","EmpBrk#4::OnEmpBrk"; cleararray $@empbrkr_occupied[0],0,4; next; goto L_GMCP; L_C: mes .n$; mes "Bye!"; close; OnInit: set .n$,"[Emperium Breaking Room]"; if(!$empbrk_gm_restriction){ set $empbrk_gm_restriction,40; } if($empbrkh == 1){ hideonnpc "Emperium Breaking Room"; } end; } - script EmpBrk#1 -1,{ OnTimer5000: areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"Get ready to break the Emperium!",bc_area; end; OnTimer8000: areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"5",bc_area; end; OnTimer9000: areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"4",bc_area; end; OnTimer10000: areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"3",bc_area; end; OnTimer11000: areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"2",bc_area; end; OnTimer12000: areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"1",bc_area; end; OnTimer13000: areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"GO!!!",bc_area; monster "pvp_n_4-5",.xe,.ye,"Emperium",1288,1,"EmpBrk#1::OnEmpBrk"; end; OnTimer600000: warpchar "prontera",155,180,$@empbrk_charid[0]; killmonster "pvp_n_4-5","EmpBrk#1::OnEmpBrk"; set $@empr_occupied[0],0; stopnpctimer; end; OnEmpBrk: stopnpctimer; set .current_time,getnpctimer(0,"EmpBrk#1"); set .new_time,.current_time - 13000; if (.new_time < empbrk_record || empbrk_record == 0) { areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"New Own Record!!!",bc_area; if($empbrk_przdp == 1){ getitem $empbrk_prizep,$empbrk_amountp; } set empbrk_record,.new_time; } if (.new_time < $empbrk_record || $empbrk_record == 0) { announce strcharinfo(0)+" is now the new No. 1 Emperium Breaker!!",bc_all; if($empbrk_przdg == 1){ getitem $empbrk_prize,$empbrk_amount; } set $empbrk_record,.new_time; set $empbrk_master$,strcharinfo(0); } set .m,.new_time / 60000; set .s,.new_time / 1000; set .ms,.new_time / 10000; set $@empr_occupied[0],0; areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"Your time is "+.m+"m "+.s+"s "+.ms+"ms",bc_area; warpchar "prontera",155,180,$@empbrk_charid[0]; end; OnInit: set .x1,94; set .y1,128; set .x2,105; set .y2,139; set .xe,100; set .ye,134; end; } pvp_n_4-5,99,125,0 script EmpBrk#1_touch -1,3,1,{ OnTouch: mes "[Emperium Breaking Room]"; mes "You're not allowed to exit your square!"; close2; stopnpctimer "EmpBrk#1"; warp "prontera",155,180; killmonster "pvp_n_4-5","EmpBrk#1::OnEmpBrk"; set $@empr_occupied[0],0; end; } - script EmpBrk#2 -1,{ OnTimer5000: areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"Get ready to break the Emperium!",bc_area; end; OnTimer8000: areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"5",bc_area; end; OnTimer9000: areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"4",bc_area; end; OnTimer10000: areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"3",bc_area; end; OnTimer11000: areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"2",bc_area; end; OnTimer12000: areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"1",bc_area; end; OnTimer13000: areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"GO!!!",bc_area; monster "pvp_n_4-5",.xe,.ye,"Emperium",1288,1,"EmpBrk#2::OnEmpBrk"; end; OnTimer600000: warpchar "prontera",155,180,$@empbrk_charid[1]; killmonster "pvp_n_4-5","EmpBrk#2::OnEmpBrk"; set $@empr_occupied[1],0; stopnpctimer; end; OnEmpBrk: stopnpctimer; set .current_time,getnpctimer(0,"EmpBrk#2"); set .new_time,.current_time - 13000; if (.new_time < empbrk_record || empbrk_record == 0) { areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"New Own Record!!!",bc_area; if($empbrk_przdp == 1){ getitem $empbrk_prizep,$empbrk_amountp; } set empbrk_record,.new_time; } if (.new_time < $empbrk_record || $empbrk_record == 0) { announce strcharinfo(0)+" is now the new No. 1 Emperium Breaker!!",bc_all; if($empbrk_przdg == 1){ getitem $empbrk_prize,$empbrk_amount; } set $empbrk_record,.new_time; set $empbrk_master$,strcharinfo(0); } set .m,.new_time / 60000; set .s,.new_time / 1000; set .ms,.new_time / 10000; areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"Your time is "+.m+"m "+.s+"s "+.ms+"ms",bc_area; warpchar "prontera",155,180,$@empbrk_charid[1]; set $@empr_occupied[1],0; end; OnInit: set .x1,60; set .y1,94; set .x2,71; set .y2,105; set .xe,65; set .ye,99; end; } pvp_n_4-5,74,99,0 script EmpBrk#2_touch -1,1,3,{ OnTouch: mes "[Emperium Breaking Room]"; mes "You're not allowed to exit your square!"; close2; stopnpctimer "EmpBrk#2"; warp "prontera",155,180; killmonster "pvp_n_4-5","EmpBrk#2::OnEmpBrk"; set $@empr_occupied[1],0; end; } - script EmpBrk#3 -1,{ OnTimer5000: areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"Get ready to break the Emperium!",bc_area; end; OnTimer8000: areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"5",bc_area; end; OnTimer9000: areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"4",bc_area; end; OnTimer10000: areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"3",bc_area; end; OnTimer11000: areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"2",bc_area; end; OnTimer12000: areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"1",bc_area; end; OnTimer13000: areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"GO!!!",bc_area; monster "pvp_n_4-5",.xe,.ye,"Emperium",1288,1,"EmpBrk#3::OnEmpBrk"; end; OnTimer600000: warpchar "prontera",155,180,$@empbrk_charid[2]; killmonster "pvp_n_4-5","EmpBrk#3::OnEmpBrk"; set $@empr_occupied[2],0; stopnpctimer; end; OnEmpBrk: stopnpctimer; set .current_time,getnpctimer(0,"EmpBrk#3"); set .new_time,.current_time - 13000; if (.new_time < empbrk_record || empbrk_record == 0) { areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"New Own Record!!!",bc_area; if($empbrk_przdp == 1){ getitem $empbrk_prizep,$empbrk_amountp; } set empbrk_record,.new_time; } if (.new_time < $empbrk_record || $empbrk_record == 0) { announce strcharinfo(0)+" is now the new No. 1 Emperium Breaker!!",bc_all; if($empbrk_przdg == 1){ getitem $empbrk_prize,$empbrk_amount; } set $empbrk_record,.new_time; set $empbrk_master$,strcharinfo(0); } set .m,.new_time / 60000; set .s,.new_time / 1000; set .ms,.new_time / 10000; areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"Your time is "+.m+"m "+.s+"s "+.ms+"ms",bc_area; warpchar "prontera",155,180,$@empbrk_charid[2]; set $@empr_occupied[2],0; end; OnInit: set .x1,94; set .y1,60; set .x2,105; set .y2,71; set .xe,99; set .ye,65; end; } pvp_n_4-5,100,74,0 script EmpBrk#3_touch -1,3,1,{ OnTouch: mes "[Emperium Breaking Room]"; mes "You're not allowed to exit your square!"; close2; stopnpctimer "EmpBrk#3"; warp "prontera",155,180; killmonster "pvp_n_4-5","EmpBrk#3::OnEmpBrk"; set $@empr_occupied[2],0; end; } - script EmpBrk#4 -1,{ OnTimer5000: areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"Get ready to break the Emperium!",bc_area; end; OnTimer8000: areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"5",bc_area; end; OnTimer9000: areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"4",bc_area; end; OnTimer10000: areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"3",bc_area; end; OnTimer11000: areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"2",bc_area; end; OnTimer12000: areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"1",bc_area; end; OnTimer13000: areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"GO!!!",bc_area; monster "pvp_n_4-5",.xe,.ye,"Emperium",1288,1,"EmpBrk#4::OnEmpBrk"; end; OnTimer600000: warpchar "prontera",155,180,$@empbrk_charid[3]; killmonster "pvp_n_4-5","EmpBrk#4::OnEmpBrk"; set $@empr_occupied[3],0; stopnpctimer; end; OnEmpBrk: stopnpctimer; set .current_time,getnpctimer(0,"EmpBrk#4"); set .new_time,.current_time - 13000; if (.new_time < empbrk_record || empbrk_record == 0) { areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"New Own Record!!!",bc_area; if($empbrk_przdp == 1){ getitem $empbrk_prizep,$empbrk_amountp; } set empbrk_record,.new_time; } if (.new_time < $empbrk_record || $empbrk_record == 0) { announce strcharinfo(0)+" is now the new No. 1 Emperium Breaker!!",bc_all; if($empbrk_przdg == 1){ getitem $empbrk_prize,$empbrk_amount; } set $empbrk_record,.new_time; set $empbrk_master$,strcharinfo(0); } set .m,.new_time / 60000; set .s,.new_time / 1000; set .ms,.new_time / 10000; areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"Your time is "+.m+"m "+.s+"s "+.ms+"ms",bc_area; warpchar "prontera",155,180,$@empbrk_charid[3]; set $@empr_occupied[3],0; end; OnInit: set .x1,128; set .y1,94; set .x2,139; set .y2,105; set .xe,134; set .ye,99; end; } pvp_n_4-5,125,100,0 script EmpBrk#4_touch -1,1,3,{ OnTouch: mes "[Emperium Breaking Room]"; mes "You're not allowed to exit your square!"; close2; stopnpctimer "EmpBrk#4"; warp "prontera",155,180; killmonster "pvp_n_4-5","EmpBrk#4::OnEmpBrk"; set $@empr_occupied[3],0; end; } pvp_n_4-5 mapflag nowarp pvp_n_4-5 mapflag nowarpto pvp_n_4-5 mapflag notrade pvp_n_4-5 mapflag nochat pvp_n_4-5 mapflag nocommand pvp_n_4-5 mapflag novending pvp_n_4-5 mapflag gvg_castle pvp_n_4-5 mapflag nobranch pvp_n_4-5 mapflag noicewall pvp_n_4-5 mapflag noloot pvp_n_4-5 mapflag nomemo pvp_n_4-5 mapflag nosave pvp_n_4-5 mapflag noreturn
  23. I tried warping into a few different maps such as, bossnia, pvp_n_3-3,etc They all gave me a client error, why does this happen? How can I fix this? Thanks
×
×
  • Create New...