Steam installeren
inloggen
|
taal
简体中文 (Chinees, vereenvoudigd)
繁體中文 (Chinees, traditioneel)
日本語 (Japans)
한국어 (Koreaans)
ไทย (Thai)
Български (Bulgaars)
Čeština (Tsjechisch)
Dansk (Deens)
Deutsch (Duits)
English (Engels)
Español-España (Spaans - Spanje)
Español - Latinoamérica (Spaans - Latijns-Amerika)
Ελληνικά (Grieks)
Français (Frans)
Italiano (Italiaans)
Bahasa Indonesia (Indonesisch)
Magyar (Hongaars)
Norsk (Noors)
Polski (Pools)
Português (Portugees - Portugal)
Português - Brasil (Braziliaans-Portugees)
Română (Roemeens)
Русский (Russisch)
Suomi (Fins)
Svenska (Zweeds)
Türkçe (Turks)
Tiếng Việt (Vietnamees)
Українська (Oekraïens)
Een vertaalprobleem melden
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 $@;