Moogle
.
If you look at the code and what has changed for the waiting part I'm sure it wouldn't be that hard to add what you want 
 After all, that's the idea of learning programming 
.
				
			PROGRAM bal;
GLOBAL
speedo = 10;
radius = 10;
BEGIN
set_mode(m320x240);
graph = new_map(20,20,8);
map_clear(0,graph,10);
x = 160; y=120;
loop
  advance(speedo);
  if(x>(320-radius) or x<(0+radius))
    angle = -angle + 180000;
  end
  
  if(y>(240-radius) or y<(0+radius))
    angle = -angle;
  end
  if(key(_enter))
    angle = rand(0,360)*1000;
  end
  
  frame;
end
END
	thats right...If you look at the code and what has changed for the waiting part I'm sure it wouldn't be that hard to add what you wantAfter all, that's the idea of learning programming
.
The bouncing principle is very easy, incoming angle = outgoing angle, you may need to be a little more specific what you want to know.
Code:PROGRAM bal; GLOBAL speedo = 10; radius = 10; BEGIN set_mode(m320x240); graph = new_map(20,20,8); map_clear(0,graph,10); x = 160; y=120; loop advance(speedo); if(x>(320-radius) or x<(0+radius)) angle = -angle + 180000; end if(y>(240-radius) or y<(0+radius)) angle = -angle; end if(key(_enter)) angle = rand(0,360)*1000; end frame; end END
while(key(__A))
  //expand
  frame;
end
	if(key(__A))
  //expand
end
	//If pressed the A button, give room to expand to 150%
if(key(__a)))
  expandTo = 150;
end
//If expand does not equal expandTo, go towards equality
if(expand > expandTo)
  expand -=5;
else
  if(expand < expandTo)
    expand += 5;
  end
end
//If expand is maximal, it must be equal to expandTo, so expandTo can be 
//set back to 100 to shrink the size again
if(expand == 150)
  expandTo = 100;
end
//And make sure the size grows as expand does(or do something else)
size = expand;
	Quiest posted on Apr 1 2005 at 06:20 AM said:Have some bmps or pngs in a directory, start FPGEdit,click on new, change to that directory and just pull the bmps/pngs from the upper half of FPGEdit to the lower half.
And don`t forget to safe the FPG.
(btw, if you didn`t know, you can change the language to english, click on utilidades -> configurar FPGEdit -> Cambiar lenguaje del programa)
if (BPushed==0)
   if (COLLISION(type(bulletblack))
    return;
   END           
END
if (BPushed==1) 
 if (COLLISION(type(bulletwhite))
  return;
 end      
END
	
	