vroman/edivc
SHA256
1
0
Fork 0
Code Issues Pull requests Actions Packages Projects Releases Wiki Activity

a ver si consigo ke rule el robots...

Browse source
This commit is contained in:
Gabriel Lorenzo 2003-03-06 14:27:55 +00:00
parent 2e4b2fe4a7
commit 53079637e4
4 changed files with 14 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
ediv/bin/ROBOTS.PRG
View file

@ -56,8 +56,7 @@ BEGIN
loop loop
// fade_on(); // fade_on();
// prota=protag(rand(0,39)*8,rand(0,24)*8); // prota=protag(rand(0,39)*8,rand(0,24)*8);
protag(rand(0,39)*8,rand(0,24)*8); protag(rand(0,39)*8,rand(0,24)*8);
debug_procesos();
for(i=1;i<=num_robots;i++) for(i=1;i<=num_robots;i++)
loop loop
x=rand(0,39); x=rand(0,39);
@ -88,6 +87,7 @@ BEGIN
end end
end end
end end
debug_procesos();
graph=0; graph=0;
protax=prota.x; protax=prota.x;
protay=prota.y; protay=prota.y;
@ -190,11 +190,11 @@ BEGIN
mueve_robots(); mueve_robots();
end end
end end
debug_procesos(); // debug_procesos();
signal(prota,s_kill); signal(prota,s_kill);
debug_procesos(); // debug_procesos();
signal(type robot,s_kill); signal(type robot,s_kill);
debug_procesos(); // debug_procesos();
muertos=0; muertos=0;
cogido=0; cogido=0;
ya=0; ya=0;
@ -210,6 +210,7 @@ PRIVATE
coge_robot; coge_robot;
BEGIN BEGIN
// debug_procesos();
prota=id; prota=id;
graph=imagenes[imagen]; graph=imagenes[imagen];
timer[1]=0; timer[1]=0;
@ -281,6 +282,7 @@ PRIVATE
esp_frame; esp_frame;
BEGIN BEGIN
debug_procesos();
robots[num]=id; robots[num]=id;
graph=imagenes[imagen]; graph=imagenes[imagen];
loop loop

5
ediv/src/stub/inte.c
View file

@ -158,7 +158,7 @@ int interprete()
//printf("Proceso %d - Estado: %d\n",procs_s[proc_orden[proceso_actual]].id,mem[procs_s[proc_orden[proceso_actual]].id+_status]); //printf("Proceso %d - Estado: %d\n",procs_s[proc_orden[proceso_actual]].id,mem[procs_s[proc_orden[proceso_actual]].id+_status]);
if(mem[procs_s[proc_orden[proceso_actual]].id+_status]==1) { if(mem[procs_s[proc_orden[proceso_actual]].id+_status]==1) {
mem[procs_s[proc_orden[proceso_actual]].id+_status]=0; mem[procs_s[proc_orden[proceso_actual]].id+_status]=0;
//assert(0); assert(0);
lista_quita(proceso_actual); lista_quita(proceso_actual);
proceso_actual--; proceso_actual--;
} }
@ -347,8 +347,9 @@ int proceso( int num, int padre )
sp-=cpas; sp-=cpas;
break; break;
case ltyp://32 case ltyp://32
if ( procs_s[num_proc].tipo != 0 ) if ( procs_s[num_proc].tipo != 0 ) {
critical_error(3); // redefinición del tipo de proceso critical_error(3); // redefinición del tipo de proceso
}
procs_s[num_proc].id = (mem[2] + ( num_proc * iloc_len ))|1; procs_s[num_proc].id = (mem[2] + ( num_proc * iloc_len ))|1;
if(procs_s[num_proc].id>imem_max-iloc_len) critical_error(8); // demasiados procesos en ejecución if(procs_s[num_proc].id>imem_max-iloc_len) critical_error(8); // demasiados procesos en ejecución
memcpy(&mem[procs_s[num_proc].id],&mem[iloc],iloc_pub_len<<2); memcpy(&mem[procs_s[num_proc].id],&mem[iloc],iloc_pub_len<<2);

BIN
ediv/src/visual c/ediv_ws.suo
View file

Binary file not shown.

4
ediv/src/visual c/stub/stub.vcproj
View file

@ -29,6 +29,7 @@
BasicRuntimeChecks="3" BasicRuntimeChecks="3"
RuntimeLibrary="2" RuntimeLibrary="2"
UsePrecompiledHeader="0" UsePrecompiledHeader="0"
BrowseInformation="1"
WarningLevel="3" WarningLevel="3"
Detect64BitPortabilityProblems="FALSE" Detect64BitPortabilityProblems="FALSE"
DebugInformationFormat="4"/> DebugInformationFormat="4"/>
@ -41,6 +42,9 @@
LinkIncremental="2" LinkIncremental="2"
GenerateDebugInformation="TRUE" GenerateDebugInformation="TRUE"
ProgramDatabaseFile="$(OutDir)/stub.pdb" ProgramDatabaseFile="$(OutDir)/stub.pdb"
GenerateMapFile="TRUE"
MapExports="TRUE"
MapLines="TRUE"
SubSystem="2" SubSystem="2"
TargetMachine="1"/> TargetMachine="1"/>
<Tool <Tool