spieleprogrammierer.de - Forum und Wiki zur Spieleprogrammierung und Spieleentwicklung

Quellcode

function onTimer1( interval )
  if( sound.valid ) then
    -- Instanz des Sounds erzeugen
    soundInst = sound:createInstance();
    if( soundInst.valid ) then
      -- Sound an das Zielobjekt koppeln und abspielen.
      soundInst:attachTo( target );
      soundInst:play();

      -- Der Sound soll leiser und tiefer werden, während er abgespielt wird.
      -- Der erste Parameter ist jeweils der Zielwert, der zweite die Geschwindigkeit,
      -- mit der der Übergang stattfinden soll.
      soundInst:setVolumeTarget( 0.25, 5.0 );
      soundInst:setPitchTarget( 0.25, 5.0 );
    end
  end

  -- Ziel blinken lassen
  target.visible = not target.visible;
  n = n + 1;
  
  if( n == 10 ) then
    -- Die Kamera soll das Power-Up beobachten.
    level.cameraTarget = powerUp1;

  elseif( n == 15 ) then
    -- Text erzeugen und Power-Up verschwinden lassen
    level:addText( "Weg ist es!", powerUp1.position, Vec4f( 1, 0, 0, 1 ), 2, 5 );
    powerUp1:kill();

  elseif( n == 20 ) then
    -- Die Kamera soll zum Zielobjekt schwenken.
    level.cameraTarget = target;

  elseif( n == 30 ) then
    -- Die Kamera soll zurück zum Spieler schwenken.
    level.cameraTarget = player;

    -- Der Timer wird beendet, wenn die Funktion false zurückliefert.
    return false;
  end

  return true;
end

function onTimer2( interval )
  -- Der Laser soll seine Drehrichtung ändern.
  rotatingLaser.angularVelocity = -rotatingLaser.angularVelocity;
  return true;
end

function onTimer3( interval )
  -- Gravitationsvektor um 90° drehen
  print( "*** Gravitation dreht sich! ***" );
  gravityAngle = gravityAngle + math.pi / 2;
  level.gravity = 8 * Vec2f( math.sin( gravityAngle ), math.cos( gravityAngle ) );
  return true;
end

function onCollision( obj1, obj2 )
  -- Objekte können leider nicht mit dem ==-Operator auf Gleichheit überprüft werden.
  -- Dazu gibt es aber die Funktion "areEqual".
  if areEqual( obj1, player ) and areEqual( obj2, trigger ) then
    -- Text anzeigen
    level:addText( "Lichtschranke!", obj1.position, Vec4f( 0, 1, 1, 1 ), 2, 5 );

    -- Die Funktion "toPlayer" castet das Objekt zum Typ "Player",
    -- denn sonst fehlen die Attribute "score" und "health".
    -- Natürlich könnte man auch direkt mit der "player"-Variablen arbeiten.
    -- Dies hier ist nur zu Demonstrationszwecken.
    local p = toPlayer( obj1 );
    p.score = p.score + 1;
    p.health = p.health * 2;

    -- Die "Lichtschranke" soll verschwinden.
    obj2:kill();

    -- Callback wieder austragen
    p.collisionCallback = nil;
  end
end

function myThreadProc1()
  print( "Thread 1 gestartet" );
  print( "Hallo Welt!" );
  sleep( 1 );
  print( "Dieser Level heisst " .. level.name );
  sleep( 1 );
  print( "Er ist vom Typ " .. level.type );
  sleep( 1 );
  local p = player.position;
  print( "Der Spieler ist auf Position " .. p.x .. ", " .. p.y );
  sleep( 1 );
  player.position = Vec2f( 5, 25 );
  local p = player.position;
  print( "Jetzt ist er auf Position " .. p.x .. ", " .. p.y );
  sleep( 1 );
  local p = target.position;
  print( "Das Ziel ist auf Position " .. p.x .. ", " .. p.y );
  sleep( 1 );
  print( "Gesundheit des Ziels ist " .. target.health );
  sleep( 1 );
  print( "Der Treibstoff des Spielers ist " .. player.fuel );
  sleep( 1 );
  print( "Thread 1 beendet sich" );
end

function myThreadProc2()
  print( "Thread 2 gestartet" );
  sleep( 10 );
  while player ~= nil do
    local p = player.position;
    print( "Spielerposition: " .. p.x .. ", " .. p.y );
    sleep( 5 );
  end
  print( "Thread 2 beendet sich" );
end

n = 0;
gravityAngle = 0;

-- einen 3D-Sound als Sample (nicht als Stream) laden, der zur Soundgruppe "SFX" gehört
sound = loadSound( "data\\notify.ogg", "SFX", "Sample", "3D" );

-- Alle 0.5 Sekunden soll "onTimer1" aufgerufen werden.
-- Als Parameter erhält die Funktion das Zeitintervall, also hier 0.5.
-- Der Rückgabewert der Funktion bestimmt, ob der Timer weiterlaufen soll (true) oder nicht (false).
level:addTimerCallback( onTimer1, 0.5 );

-- "onTimer2" soll alle 5.2, 7.7 und 11.3 Sekunden aufgerufen werden.
level:addTimerCallback( onTimer2, 5.2 );
level:addTimerCallback( onTimer2, 7.7 );
level:addTimerCallback( onTimer2, 11.3 );

-- "onTimer3" soll alle 10 Sekunden aufgerufen werden.
level:addTimerCallback( onTimer3, 10 );

-- Wenn der Spieler mit einem Objekt kollidiert, soll "onCollision" aufgerufen werden.
-- Diese Funktion erhält als Parameter die beiden Objekte, die kollidiert sind, wobei der erste
-- Parameter das Objekt ist, für das die Callback-Funktion angegeben wurde (also hier "player").
player.collisionCallback = onCollision;

-- Zwei Threads starten, die die Funktionen "myThreadProc1" und "myThreadProc2" ausführen.
-- Die Kontrolle geht beim Starten eines Threads sofort an ihn über.
-- Ein Thread läuft immer so lange, bis er mit "sleep" schlafen gelegt wird.
-- Dies ist preemptive Multi-Threading, wie man es von Betriebssystemen her kennt, wo der Scheduler
-- dafür sorgt, dass jeder Thread an die Reihe kommt!
runThread( myThreadProc1 );
runThread( myThreadProc2 );

-- Einen kleinen Text an der Position des Spielers ausgeben, Farbe grün (R, G, B, A).
-- Die Größe des Texts ist 2, und er bleibt für 10 Sekunden sichtbar.
level:addText( "Hallo vom Script!", player.position, Vec4f( 0, 1, 0, 1 ), 2, 10 );