home *** CD-ROM | disk | FTP | other *** search
/ M.u.C.S. Disc 2000 / MUCS2000.iso / sigisoft / lotto / lotto.doc < prev    next >
Text File  |  1997-10-18  |  2KB  |  45 lines
  1. '                     Informationen zum Programm          Datum 08.06.1989
  2. '                           Lottosimulation
  3. '
  4. ' ------------------------------------------------------------------------
  5. ' (c) 1999 by Siegfried Hübner, Obere Vorstadt 21, 91575 Windsbach
  6. ' ------------------------------------------------------------------------
  7. '
  8. ' Dieses Programm ist frei kopierbar (Public Domain), und sollte deshalb
  9. ' so oft wie möglich weiterkopiert werden.
  10. '
  11. ' Das Programm Lotto-Simulation entstand bei mir durch einen Zufall.
  12. ' Eigentlich wollte ich eine etwas andere Version von Schiffe versenken
  13. ' schreiben. Als ich gerade eine Routine zum Verstecken meiner Schiffe
  14. ' geschrieben hatte, machte ich mir Gedanken über das Verstecken der
  15. ' Schiffe des Computers.
  16. '
  17. ' Durch ein wenig herumexperimentieren mit den Point Befehl und der
  18. ' Zufallszahl kamm ich auf folgende Idee.
  19. '
  20. ' Mit der Point Abfrage müsste sich doch auch ein Lotto Programm
  21. ' schreiben lassen. Gedacht getan auf einmal entstand das folgende Programm.
  22. '
  23. ' Damit der Computer auch die gleiche Anzahl der Zahlen ermittelt und
  24. ' keine Zahl zweimal, habe ich die Abfrage mit den Point Befehl abgefragt.
  25. '
  26. ' Ist dann das Feld schon mit einer Farbe besetzt, berechnet der Computer
  27. ' einfach eine neue Zufallszahl.
  28. '
  29. ' Dieses Programm läuft auf einen sw Monitor und auch auf einen Farb-
  30. ' monitor in der mittleren Auflösung.
  31. '
  32. ' Dieses Programm wurde in GFA Basic Version 2.0 geschrieben, und dürfte
  33. ' auch für Programmieranfänger interesant sein.
  34. '
  35. ' Eine etwas Andere Idee ein Lottoprogramm zu schreiben.
  36. '
  37. ' Ich wünsche Ihnen viel Lotto-Glück mit diesm kurzen Lottoprogramm
  38. ' Natürlich kann ich keine Garantie für einen Lottogewinn übernehmen.
  39. ' Sollte Ihnen dennoch einmal mit meinen Lottoprogramm der gro₧e Lotto-
  40. ' gewinn begegnen. Dann denken Sie bitte an mich.
  41. '
  42. ' Viel Spa₧ mit diesm Programm wünscht Ihnen
  43. '
  44. '                                                Siegfried Hübner
  45.