TVerwaltung ----------- -Weltraum: TWeltraum -Clients: Array of TClient -Spielmodus: enumeration -Aktionen: Array[1..maxspieler,1..5] of enumeration -Datenpaket als interne Variable ------------------------------------------------ ->init ->Client_aufnehmen ->Client_abmelden ->Datenpaket_verschicken ->Datenpaket_erstellen ->Schritt_ausführen (procedure Schritt_berechnen von TWeltraum ausführen) (Aktionen werden übergeben) ############################################################################### Tweltraum -spieler: array of Tspieler -Versorgungsdecks: array of versorgungsdeck -Meteoriten: array of tMeteorit -Powerup. array of TPowerup -Grafik-ID -Länge :integer -Breite :integer -Statistik --------------------- -init -Statistik_ausgeben -Schritt_berechnen -bewegen -Kollisionsabfrage -Statistik_aktualisieren ############################################################################### TRaumschiff -Schaden :real -Schild :real -Grafik-ID :integer -Waffen: array[1...max] of Twaffe -v_x :real -v_y :real -vmax :real -Pos_x :real -Pos_y :real -Powerup: array[1...max] of TPowerup ------------------------------------------- -init -Bewegung -Schiessen -Powerup_anwenden -Reparatur -Schaden_erleiden ############################################################################### TSpieler -------- -Name: String -Raumschiff: TRaumschiff -Erfahrung: Integer -Geld: Integer -Skills: Record -Statistik: Record -ID: Integer -LastVersorgungszeit: Integer -Zustandsvariable: enumeration -------------------------------------------- ->init ->Erfahrung_aendern ->Geld_aendern ->Schiff_aendern ->Waffen_aendern ############################################################################### TVersorgungsdeck ---------------- -Grafik-ID: Integer -Pos_x: Real -Pos_y: Real -Länge: Integer -Breite: Integer -Array of TRaumschiff -Array of TWaffe ----------------------------------- ->init ############################################################################### TPowerup -------- -Pos_x: Real _Pos_y: Real -Länge: Integer -Breite: Integer -Upgrade: enumeration -Wert: Integer ------------------------------------- ->init ############################################################################### TMeteorit --------- -v_x: Real -v_y: Real -Pos_x: Real -Pos_y: Real -Schaden: Real -Länge: Integer -Breite: Integer -Grafik-ID: Integer ---------------------------------- ->init ->Bewegung ->Schaden_erleiden ############################################################################### TGrafik -Grafiken:array[1..may] of record(noch benennen) ############################################################################## TWaffe -Schadenswert :real -Preis :real -Anspruch :integer -Grafik-ID :integer -Geschosse: array of TGeschoss (dynamic) -Name :string ----------------------------------------------- -init -Geschoss_erschafen ############################################################## TGeschoss -v_x :real -v_y :real -pos_x :real -pos_y :real -Länge :integer -Breite :integer -------------------------------- -init -Bewegung