E soprattutto sono un po' fermo sulla produzione di un eseguibile in dingux... ma insisto.
Per quanto riguarda i 'poteri speciali' di postare files... hmm, temo di non avere fatto nulla per averli

Codice: Seleziona tutto
#!/bin/sh
unset OS_ID
## Is important set first bgd-runtime folder
LD_LIBRARY_PATH_BAK=$LD_LIBRARY_PATH
PATH_BAK=$PATH
export LD_LIBRARY_PATH=../bgd-runtime:$LD_LIBRARY_PATH
export PATH=../bgd-runtime:$PATH
### For use Wiz games on Caanoo uncomment the next lines
OS_ID=8
export OS_ID
#echo 2 > /proc/cpu/alignment
bgdc /usr/local/games/bgd-runtime/1.prg
sync
LD_LIBRARY_PATH=$LD_LIBRARY_PATH_BAK
PATH=$PATH_BAK
Codice: Seleziona tutto
#!/bin/sh
unset OS_ID
## Is important set first bgd-runtime folder
LD_LIBRARY_PATH_BAK=$LD_LIBRARY_PATH
PATH_BAK=$PATH
export LD_LIBRARY_PATH=../bgd-runtime:$LD_LIBRARY_PATH
export PATH=../bgd-runtime:$PATH
### For use Wiz games on Caanoo uncomment the next lines
OS_ID=8
export OS_ID
#echo 2 > /proc/cpu/alignment
bgdc -a -s /usr/local/games/bgd-runtime/bgdi /usr/local/games/bgd-runtime/1.prg
sync
LD_LIBRARY_PATH=$LD_LIBRARY_PATH_BAK
PATH=$PATH_BAK
Codice: Seleziona tutto
//========================== PuntoNetto ================//
//========================== CODE:}Zip{,gigios, paulvern =================//
//=========================== GFX:}Zip{ =================//
//=========================== v.0.0.0.4 =================//
Const
stars=3000;
nemi=30;
maxresx=320;
maxresy=240;
Global
int gfx;
int mirino;
coord_x[stars];
cont;
coord_y[stars];
vel[stars];
collisionID;
int text;
text2;
INT PUN;
int idb;
begin
set_mode(maxresx,maxresy,16);
For(cont=0; cont<stars; cont++)
coord_x[cont]=rand(0,maxresx);
coord_Y[cont]=rand(0,maxresy);
vel[cont]= rand(1,4);
end
gfx=load_fpg("gfx.fpg");
MOUSEpointer();
star(stars);
for (cont=0; cont<nemi;cont++)
nemici (rand(30,maxresx),rand(30,maxresy));
END
loop
if(key(_ESC)) exit(); end;
frame;
end
end
///____________________________Menu
///____________________________Livello1
Process mousepointer()
Begin
// Set the priority to 1, because we first want to have the correct coordinates of
// the mouse set in this process. Then after that other process can use those coordinates.
graph=gfx;
graph=3;
x=200;
y=100;
Loop
// Obtain X and Y coordinates of the mouse and adjust for resolution
// (mouse.y and mouse.y have an unchangeable resolution of 1)
if (key(_LEFT)); x=x-3; end;
if (key(77)); x=x+3; end;
if (key(_UP)); y=y-3; end;
if (key(_DOWN)); y=y+3; end;
frame;
End
end
///___________________nemico0
process nemici(x,y)
begin
graph=gfx;
graph=2;
repeat
x=x+rand(-2,2);
y=y+rand(-2,2);
if (x>maxresx)
x=0;
end
if (x<0)
x=maxresx;
end
if (y>maxresy)
y=0;
end
if (y<0)
y=maxresy;
end
frame;
until ((key(_A)) AND collision (type mousepointer))
PUN=PUN+10;
end
process star(n)
begin
loop
CLEAR_SCREEN();
WRITE_VAR(0,10,10,0,PUN);
For(cont=0; cont<n; cont++)
coord_y[cont]=coord_y[cont]+vel[cont];
if (coord_y[cont]>maxresy)
coord_y[cont]=0;
end
put_pixel (coord_x[cont],coord_y[cont],9999+cont);
end
frame;
end
end
Visitano il forum: Nessuno e 4 ospiti