help with subs

[ever_boy_]

I did this sub:

Code: Select all

macro qqq {
	$i = 0
	log @eval(&playerExists)
}
sub playerExists {
	if ($::players{$::playersID[$::i]}) {
		return 1;
	} else {
		return 0;
	}
}

It works just fine if I manually set $::playersID[#number].
But if I set it to [$::i], where $i is given from my macro It always returns 1, even when $i = unexisting ID
So it seems my sub is working, but it's not getting the $i value from my macro, and I just can't figure out why...

Also, I'd like to know if I can set a variable to 'empty'/undefined value inside a macro.

[EternalHarvest]

Macro variables aren't imported into "main" module where macro subs reside. You need to fetch them from where macro plugin stores them.

[iMikeLance]

Try this:
$Macro::Data::varStack{'variable_name'}
or
$Macro::Data::varStack{'i'}

[ever_boy_]

thank you both, now it works:

Code: Select all

sub playerExists {
	if ($::players{$::playersID[$::Macro::Data::varStack{i}]}) {
		return 1;
	} else {
		return 0;
	}
}

Just one thing, why is it that using eval I can set the var like this:
@eval($::char->{'party'}{'users'}{$::partyUsersID[$sacerID]}{'pos'}{'y'})

while inside a sub it should be used with $macro::data:varstack

Ain't it all perl just the same?

[EternalHarvest]

Macro plugin distorts your code in @eval. That's why you usually see that $:: nonsense here, too - and you don't need to write like that in normal Perl.