Ergebnis der Suchanfrage

• Forum: Programmieren allgemein

  Re: Skatblatt darstellen durch Random?

   
    by himitsu, 11. Nov 2009
  Wieso?
  Ich seh es nur nicht ein, daß man für jeden Piepselkram gleich mit Objektkanonen rumballern muß. :tongue:
  
  OK, wenn ihr es so wollt ... man kann auch jeden Integer, Byte, Boolean und String einzeln in Klassen verpacken,
  aber dann sind die Programme gleich 200-mal größer und langsamer.
• Forum: Programmieren allgemein

  Re: Skatblatt darstellen durch Random?

   
    by himitsu, 11. Nov 2009
  ach ja, auf das aktuelle Problem zurückgebaut, kommt z.B. sowas bei raus:
  Type TBlatt = Set of 0..31;
  
  Const cKarte: Array of String = ('7', '8', '9', '10', 'Bube', 'Dame', 'Koenig', 'As');
  
  Function Ziehe(Var Blatt: TBlatt): Integer;
  Var i, i2: Integer;
  
  Begin
  If Blatt = Then Raise Exception.Create('keine Karten vorhanden');
• Forum: Programmieren allgemein

  Re: Skatblatt darstellen durch Random?

   
    by himitsu, 11. Nov 2009
  Type
  TSkatKarte = (
  skKaro7, skKaro8, skKaro9, skKaro10, skKaroBube, skKaroDame, skKaroKoenig, skKaroAs,
  skHerz7, skHerz8, skHerz9, skHerz10, skHerzBube, skHerzDame, skHerzKoenig, skrzAs,
  skPik7, skPik8, skPik9, skPik10, skPikBube, skPikDame, skPikKoenig, skPikAs,
  skKreuz7, skKreuz8, skKreuz9, skKreuz10, skKreuzBube, skKreuzDame, skKreuzKoenig,...
• Forum: Programmieren allgemein

  Re: Skatblatt darstellen durch Random?

   
    by himitsu, 10. Nov 2009
  man kann auch das Boolean-Array performant machen und sogar so lösen, daß kein Zug wiederholt werden muß und dieses teilweise sogar performanter, als mit einer rießigen Liste.
  
  das Ziehen:
  - man zähle alle "freien" Karten (a)
  - x = Random(a)
  - nun nehme man einfach die x-te freie Karte davon
  - und vergesse nicht sie zu markieren
• Forum: Programmieren allgemein

  Re: Skatblatt darstellen durch Random?

   
    by himitsu, 10. Nov 2009
  Wenn du jede Zahl 4 Mal zuläßt, dann kann es immernoch passieren, daß eine Farbe mehrfach vorkommt.
  
  Nimm dir einfach ein Boolean-Array mit 32 Feldern (je Karte inkl. Farbe ein Feld) und wenn eine Karte gezogen wurde, dann wird diese darin markiert.
  
  Wenn du nun eine neue Karte ziehen willst, dann wähle per Zufall irgendeine der 32 Karten aus,
  schaue in dem Array, ob sie noch frei ist
  und...
• Forum: Programmieren allgemein

  Re: Skatblatt darstellen durch Random?

   
    by himitsu, 9. Nov 2009
  Random(32)
  0 bis 31
  
  entspricht Trunc(Random * 32)
  
  jetzt würde jede Zahl einer der 32 Karten entsprechen
  
  oder du machst Random(8) und Random(4)
  das Erste wäre jetzt die Karte und das Andere die Farbe