Tipps und Ratschläge für Spiel & für effizientes Programmieren

[Danny92]

Okay hier ist die vom Sound entschlackte Projektdatei. Lediglich deshalb war sie über 50 MB groß (das hier keine falschen Eindrücke entstehen , bei mir wurde der Link auch unsicher gemeldet ) Deswegen hier noch einmal.

[HolgerX]

Hmm..

OK, dann fange ich hier mal an:

Nur mal Unit1 überflogen...

Delphi-Quellcode:

var
  Form1: TForm1;
  feldgroesse: byte = 10;
  blinkcount: byte = 0;
  a,b,schiffsindex,KIschiffindex,schussfeld: TPoint;
  shipplayer,shipki: TFlotte;
  spielstatus: byte = 0;
  letterissetted: boolean = false;
  firstpointissetted: boolean = false;
  completekoordinate: boolean = false;
  spielbeendetundverloren: boolean = false;
  schwierigkeitsgrad: byte = 1;
  playerfirst: boolean = true;
  vabwechselnd: boolean = false;
  vkischusssichtbar: boolean = false;
  playerIsPlaying: boolean = false;
  playerhasshot: boolean = false;
  mitGitter: boolean = true;
  BASS_Init: TBASS_Init;
  BASS_StreamCreateFile: TBASS_StreamCreateFile;
  BASS_ChannelIsActive: TBASS_ChannelIsActive;
  BASS_ChannelPlay: TBASS_ChannelPlay;
  BASS_ChannelStop: TBASS_ChannelStop;
  BASS_Free: TBASS_Free;
  expindex: integer = 0;
  backgroundmusic,strs: HStream;
  flottengroesse: array[1..5] of integer;
  wasserindex: integer = 0;
  demoisactive: boolean = false;
  demoabort: boolean = false;

implementation

-> Vermeide 'Globale' Variablen soweit wie möglich, eigentlich sollte hier nur

Delphi-Quellcode:

var
  Form1: TForm1;

stehen und sonst keine weiteren..
-> Die Meisten Variablen werden 'nur' in diesem Formular verwendet und sollten somit (mit 'F' davor) in den private-Bereich der Form.
-> Die ganzen BASS-Sachen packst Du in eine eigene Unit, der Übersicht wegen, wobei, wofür ist denn die 'bass.pas' dar?

So.. Nur mal den Anfang gemacht..

[Danny92]

Okay danke das ist doch schon mal was. Ich werd' da weiter dran arbeiten und mich um effizieteren Gebrauch der Variablen kümmern. Womöglich hab ich dann halt mehr Parameter, und den Rest schieb ich in den private-Bereich. Aber ich fürchte das wird nicht das Problem sein für die hohe CPU-Auslastung oder?
Die Bass.pas hab ich nur am Anfang gebraucht, wie ich die Bass.dll in der Ressource noch nicht reingepackt hab, bzw. sie noch nicht zu verwenden gewusst hatte. Damit gebe ich eben Hintergrundmusik und einige Soundeffekte wieder, die bei Schiffe versenken ja ganz nett sind.