Getting Started
Rules
Character Mover
Optimization Guide
EZ Wiki
EZ Guide
Magelo
Zone List
Spell Recipes
T10.5 Spell Recipes
Crafting Recipes
Donate
EZ Player Discord
EZ Server Files
EZ Client Downloads
Custom UF MiniMap
Custom UF Inventory
EQEmulator Home
Allakhazam Home
UFMissingFilesList
TwitchTV
sub EVENT_SAY {my $Cx = $client->GetX();my $Cy = $client->GetY();my $Cz = $client->GetZ();my $space = "_";my $soloinst = "solo";my $sologlob = "$name$space$soloinst$space$zonesn"; if($text=~/Create Solo/i && !defined $qglobals{$sologlob}) { plugin::SendToInstance("solo", "$zonesn", 0, $Cx, $Cy, $Cz, "solo", 86400); } if($text=~/#raidall/i) { my $instid = $qglobals->{$sologlob}; quest::AssignRaidToInstance($instid); $client->Message(15,"$instid is the ID"); } if($text=~/^#raidzone /i) { $string2 = "$text"; $leadername = str_replace('#raidzone ','',$string2); my $stupid = "$leadername$space$soloinst$space$zonesn"; my $instid = $qglobals->{"$stupid"}; $client->Message(15, "$instid is this $stupid"); quest::MovePCInstance($zoneid, $instid, $Cx, $Cy, $Cz); }}sub str_replace { my $replace_this = shift; my $with_this = shift; my $string = shift; my $length = length($string); my $target = length($replace_this); for(my $i=0; $i<$length - $target + 1; $i++) { if(substr($string,$i,$target) eq $replace_this) { $string = substr($string,0,$i) . $with_this . substr($string,$i+$target); return $string; #Comment this if you what a global replace } } return $string;}