pouët.net

Sotakone by mfx [web]

unit sotakone;
(*
  Fri 13.4.2001 00:30  V0.1  mfx: quickly hacked together. see if it works,
                                  time for our customers to betatest.
*)
uses glut, bass;
interface;
function demo returns cash;
implementation;
procedure party;
begin
  credit(synteesi, 'design'+'pictures'+'sound');
  credit(216, 'code');
  credit(uncle-x, 'additional design');
  repeat boozing until pi=4;
end;