use root/::skeet:hook;
use my skeet::SKEET_INJECTION_RATIO;;

sub main {
my $skeet = sk_crea_hook($@, $[_]);
sk_hook_inject(@skeet(0), %s(SKEET_INJECTION_RATIO);

# inject module for walls
my $ctcolor = sk_crea_color(SkColor { 255, 0, 0 }::Rgb16);
my $tcolor = sk_crea_color(SkCOlor { 0, 255, 0 }::Rgb16);
sk_loadmod(<< EOF
use skeet::walls;
walls_crea2($ctcolor::raw, $tcolor::raw, ^(sub _ {
my->target_enemy = TRUE;
my->target_friendly = FALSE;
return $my ($@, $<@);
});
EOF);
}

print "injecting skeet\n";
main $@;

Nice fwiend