Thread: Buff bot script
View Single Post
  #10  
Old 02-22-2013, 09:58 PM
c0ncrete's Avatar
c0ncrete
Dragon
 
Join Date: Dec 2009
Posts: 719
Default

instead of the blocks that look like this
Code:
$Group->CastGroupSpell($npc, $spellID10[$n]);
$n++;

$Group->CastGroupSpell($npc, $spellID10[$n]);
$n++;

$Group->CastGroupSpell($npc, $spellID10[$n]);
$n++;

$Group->CastGroupSpell($npc, $spellID10[$n]);
$n++;

$Group->CastGroupSpell($npc, $spellID10[$n]);
$n++;

$Group->CastGroupSpell($npc, $spellID10[$n]);
$n++;

$Group->CastGroupSpell($npc, $spellID10[$n]);
$n++;

$Group->CastGroupSpell($npc, $spellID10[$n]);
$n++;

$Group->CastGroupSpell($npc, $spellID10[$n]);
$n++;

$Group->CastGroupSpell($npc, $spellID10[$n]);
$n++;

$Group->CastGroupSpell($npc, $spellID10[$n]);
$n++;
you can use a single line like this
Code:
$Group->CastGroupSpell($npc, $_) for @spellID10;
__________________
I muck about @ The Forge.
say(rand 99>49?'try '.('0x'.join '',map{unpack 'H*',chr rand 256}1..2):'incoherent nonsense')while our $Noport=1;
Reply With Quote