Skip to content

Poison Hail: fix ants blocking ramps #124

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Open
wants to merge 1 commit into
base: dev
Choose a base branch
from
Open

Poison Hail: fix ants blocking ramps #124

Show file tree
Hide file tree
Changes from all commits
Commits
Show all changes
1 commit
Select commit
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
130 changes: 73 additions & 57 deletions ai/antics.txt
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -2,9 +2,7 @@ extern void object::Attack( )
{
int list[], i; // liste des objets cherchés
object target; // info sur la cible
point center; // coordonnées du centre de la zone
point lastPos; // dernière position (pr test si bloquée)
float distCent; // rayon de la zone
float r; // valeur aléatoire

errmode(0); // ne stoppe pas si erreur
Expand Down Expand Up @@ -38,79 +36,97 @@ extern void object::Attack( )
list[i++] = Subber;
list[i++] = Me;

center.x = cmdline(0); // prend les coordonnée
center.y = cmdline(1); // du centre de la zone
center.z = 0; // à patrouiller
distCent = cmdline(2); // rayon de la zone
point center(cmdline(0), cmdline(1), 0);
float maxDist = cmdline(2);
float minDist = cmdline(3);

lastPos = position; // initialise
motor(1,1); // en avant toute
while ( true ) // répère à l'infini
{
target = radar(list, 0, 360, 0, 40);
if (target == null or topo(position)<0)// pas de cible à proximité
{ // ou pieds dans l'eau
if (distance2d(position, center) > distCent or topo(position)<0)
{ // si la fourmi est en dehors de la zone
motor(0, 0); //s'arrête
wait(0.5); //marque un arrêt
motor (-0.5, -0.5);//recule lentement
wait (1.5); //attend qu'ait reculé
turn(direction(center));
motor (1, 1); //puis en avant toute
do
if (distance2d(position, center) < minDist)
{
if (radar(TargetBot, 0, 360, 0, 30) != null)
{
BeScared();
continue;
}
point awayFromCenter(
position.x + (position.x - center.x),
position.y + (position.y - center.y)
);
turn(direction(awayFromCenter));
motor(1, 1);
lastPos = position;
wait(1);
if (distance2d(lastPos, position) < 0.2)
{
turn(rand()*360-180);
motor(1,1);
wait(1);
}
}
else if (target != null and topo(position) >= 0)
{
if (radar(TargetBot, 0, 360, 0, 30) != null)
{
BeScared();
continue;
}
turn(direction(target.position));
fire(target.position);
}
else if (distance2d(position, center) > maxDist or topo(position)<0)
{ // si la fourmi est en dehors de la zone
motor(0, 0); //s'arrête
wait(0.5); //marque un arrêt
motor (-0.5, -0.5);//recule lentement
wait (1.5); //attend qu'ait reculé
turn(direction(center));
motor (1, 1); //puis en avant toute
do
{
if (radar(TargetBot, 0, 360, 0, 30) != null)
{
if (radar(TargetBot, 0, 360, 0, 30) != null)
{
BeScared();
break;
}
lastPos = position;
wait(1); //tant que pas dans la zone
if (distance2d(lastPos, position) < 0.2)
{ //si elle est bloquée par obstacle
turn(rand()*360-180);
motor(1,1);
wait(1);
turn(direction(center));
}
BeScared();
break;
}
while (distance2d(position, center) > distCent or topo(position)<0);
}
else
{ //si elle est bien dans la zone
lastPos = position;
wait(1); //tant que pas dans la zone
if (distance2d(lastPos, position) < 0.2)
{ //si elle est bloquée par obstacle
turn(rand()*360-180);
motor(1,1);
wait(1);
turn(direction(center));
}
r = rand();
if (r > 0.6)
{ //dans un cas sur dix
motor (1, 0.5);// tourne à droite
wait(rand()*3);// pendant un moment
motor (1, 1); // puis tout droit
}
if (r < 0.4)
{ //dans un cas sur dix
motor (0.5, 1);// tourne à gauche
wait(rand()*3);// pendant un moment
motor (1, 1); // puis tout droit
}
lastPos = position;
wait(1); //attend un moment
}
while (distance2d(position, center) > maxDist or topo(position)<0);
}
else
{ // si cible à proximité
if (radar(TargetBot, 0, 360, 0, 30) != null)
{
BeScared();
continue;
{ //si elle est bien dans la zone
if (distance2d(lastPos, position) < 0.2)
{ //si elle est bloquée par obstacle
turn(rand()*360-180);
motor(1,1);
wait(1);
}
turn(direction(target.position));
fire(target.position); // tourne vers la cible
r = rand();
if (r > 0.6)
{ //dans un cas sur dix
motor (1, 0.5);// tourne à droite
wait(rand()*3);// pendant un moment
motor (1, 1); // puis tout droit
}
if (r < 0.4)
{ //dans un cas sur dix
motor (0.5, 1);// tourne à gauche
wait(rand()*3);// pendant un moment
motor (1, 1); // puis tout droit
}
lastPos = position;
wait(1); //attend un moment
}
}
}
Expand Down
15 changes: 5 additions & 10 deletions levels/missions/chapter009/level002/scene.txt
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -41,16 +41,11 @@ CreateObject pos= 0.00;-2.00 dir=0.5 type=KeyA

CreateObject pos=46;-87 dir=0.0 type=KeyB

//CreateObject pos= 24; 4 cmdline= 24; 4; 29; -2 dir=0.0 type=AlienAnt script1="ant08.txt" run=1
//CreateObject pos= 23;-16 cmdline= 23;-16; 22;-22 dir=0.0 type=AlienAnt script1="ant08.txt" run=1
//CreateObject pos= 27;-40 cmdline= 27;-40; 34;-42 dir=0.0 type=AlienAnt script1="ant08.txt" run=1
//CreateObject pos=-13;-31 cmdline=-13;-31;-19;-39 dir=0.0 type=AlienAnt script1="ant08.txt" run=1
//CreateObject pos=-29; -8 cmdline=-29; -8;-29; 1 dir=0.0 type=AlienAnt script1="ant08.txt" run=1
CreateObject pos= 24; 4 cmdline= 0; 0; 70 dir=0.0 type=AlienAnt script1="antics.txt" run=1
CreateObject pos= 23;-16 cmdline= 0; 0; 70 dir=0.0 type=AlienAnt script1="antics.txt" run=1
CreateObject pos= 27;-40 cmdline= 0; 0; 70 dir=0.0 type=AlienAnt script1="antics.txt" run=1
CreateObject pos=-13;-31 cmdline= 0; 0; 70 dir=0.0 type=AlienAnt script1="antics.txt" run=1
CreateObject pos=-29; -8 cmdline= 0; 0; 70 dir=0.0 type=AlienAnt script1="antics.txt" run=1
CreateObject pos= 24; 4 cmdline= 0; 0; 70; 25 dir=0.0 type=AlienAnt script1="antics.txt" run=1
CreateObject pos= 23;-16 cmdline= 0; 0; 70; 25 dir=0.0 type=AlienAnt script1="antics.txt" run=1
CreateObject pos= 27;-40 cmdline= 0; 0; 70; 25 dir=0.0 type=AlienAnt script1="antics.txt" run=1
CreateObject pos=-13;-31 cmdline= 0; 0; 70; 25 dir=0.0 type=AlienAnt script1="antics.txt" run=1
CreateObject pos=-29; -8 cmdline= 0; 0; 70; 25 dir=0.0 type=AlienAnt script1="antics.txt" run=1

CreateLight dir= 0.0;-1.0; 0.0 color= 0.63; 0.63; 0.63 type=Terrain
CreateLight dir= 1.0; 0.0;-1.0 color=-0.70;-0.70;-0.70 type=Terrain
Expand Down
15 changes: 5 additions & 10 deletions levels/plus/chapter009/level002/scene.txt
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -41,16 +41,11 @@ CreateObject pos= 0.00;-2.00 dir=0.5 type=KeyA

CreateObject pos=46;-87 dir=0.0 type=KeyB

//CreateObject pos= 24; 4 cmdline= 24; 4; 29; -2 dir=0.0 type=AlienAnt script1="ant08.txt" run=1
//CreateObject pos= 23;-16 cmdline= 23;-16; 22;-22 dir=0.0 type=AlienAnt script1="ant08.txt" run=1
//CreateObject pos= 27;-40 cmdline= 27;-40; 34;-42 dir=0.0 type=AlienAnt script1="ant08.txt" run=1
//CreateObject pos=-13;-31 cmdline=-13;-31;-19;-39 dir=0.0 type=AlienAnt script1="ant08.txt" run=1
//CreateObject pos=-29; -8 cmdline=-29; -8;-29; 1 dir=0.0 type=AlienAnt script1="ant08.txt" run=1
CreateObject pos= 24; 4 cmdline= 0; 0; 70 dir=0.0 type=AlienAnt script1="antics.txt" run=1
CreateObject pos= 23;-16 cmdline= 0; 0; 70 dir=0.0 type=AlienAnt script1="antics.txt" run=1
CreateObject pos= 27;-40 cmdline= 0; 0; 70 dir=0.0 type=AlienAnt script1="antics.txt" run=1
CreateObject pos=-13;-31 cmdline= 0; 0; 70 dir=0.0 type=AlienAnt script1="antics.txt" run=1
CreateObject pos=-29; -8 cmdline= 0; 0; 70 dir=0.0 type=AlienAnt script1="antics.txt" run=1
CreateObject pos= 24; 4 cmdline= 0; 0; 70; 25 dir=0.0 type=AlienAnt script1="antics.txt" run=1
CreateObject pos= 23;-16 cmdline= 0; 0; 70; 25 dir=0.0 type=AlienAnt script1="antics.txt" run=1
CreateObject pos= 27;-40 cmdline= 0; 0; 70; 25 dir=0.0 type=AlienAnt script1="antics.txt" run=1
CreateObject pos=-13;-31 cmdline= 0; 0; 70; 25 dir=0.0 type=AlienAnt script1="antics.txt" run=1
CreateObject pos=-29; -8 cmdline= 0; 0; 70; 25 dir=0.0 type=AlienAnt script1="antics.txt" run=1

CreateLight dir= 0.0;-1.0; 0.0 color= 0.63; 0.63; 0.63 type=Terrain
CreateLight dir= 1.0; 0.0;-1.0 color=-0.70;-0.70;-0.70 type=Terrain
Expand Down
Loading