AtNotes Übersicht Willkommen Gast. Bitte einloggen oder registrieren.
26.05.12 - 08:23:04
Übersicht Hilfe Regeln Glossar Suche Einloggen Registrieren
News:
Schnellsuche:
+  Das Notes Forum
|-+  Lotus Notes / Domino Sonstiges
| |-+  Tipps und Tricks (Moderatoren: eknori, fritandr, Glombi, ata)
| | |-+  parametrierbares Random
« vorheriges nächstes »
Seiten: [1] Nach unten Drucken
Autor Thema: parametrierbares Random  (Gelesen 1734 mal)
Driri
Gold Platin u.s.w. member:)
*****
Offline Offline

Geschlecht: Männlich
Beiträge: 6139



WWW
« am: 13.08.05 - 13:28:42 »

Hallo,

nach einer Unterhaltung über Rollenspiele und den damit verbundenen Würfeln (z.B. 2 Würfel mit Werten 1-12 oder so) habe ich mir überlegt, wie man so etwas in Script nachbauen kann.

Daraus ist folgendes Script entstanden, bei dem man die Möglichkeit hat ein Intervall und einen  Wert für die Anzahl Dezimalstellen für eine zu ermittelnde Zufallszahl anzugeben.

Code:
Function Randomizer (Startval As Double, Endval As Double, Roundfactor As Integer) As Double
Randomizer = Round((Rnd*(Endval-Startval))+Startval, Roundfactor)
End Function

War zwar nur als Spielerei gedacht, aber evtl. kanns ja mal jemand brauchen  Wink

Beispiel-DB habe ich angehängt.
Gespeichert

Gruß, Ingo
------------------------------------------------------------
11 Domino-Server (8.5.3 auf i5 und Windows)
2500 Notes 8.0.2, 100 Notes 6.5

IBM Content Manager / Content Collector für Mailarchivierung
ClearSwift Appliance (Anti-Spam, Anti-Virus)
Axceler NOTRIX

iAnywhere MobileOffice 5.7, in Ablösung
ca. 320 Smartphones (SymbianOS)

Lotus Notes Traveler 8.5.3
ca. 300 Smartphones (Android)
Semeaphoros
Gold Platin u.s.w. member:)
*****
Offline Offline

Geschlecht: Männlich
Beiträge: 8152


ho semeaphoros - agr.: der Notesträger


WWW
« Antworten #1 am: 13.08.05 - 17:36:06 »

Ingo, kannst Du mir verraten, wie man mit 2 Würfeln eine 1 werfen kann? Ich kenne da nur eine etwas kreative Möglichkeit .....  Wink
Gespeichert

Jens-B. Augustiny

Beratung und Unterstützung für Notes und Domino Infrastruktur und Anwendungen

Homepage: http://www.ligonet.ch

IBM Certified Advanced Application Developer - Lotus Notes and Domino 7 und 6
IBM Certified Advanced System Administrator - Lotus Notes and Domino 7 und 6
Axel
Moderatoren
Gold Platin u.s.w. member:)
*****
Offline Offline

Geschlecht: Männlich
Beiträge: 8484


It's not a bug, it's Notes


« Antworten #2 am: 15.08.05 - 08:16:13 »

Ingo, kannst Du mir verraten, wie man mit 2 Würfeln eine 1 werfen kann? Ich kenne da nur eine etwas kreative Möglichkeit .....  Wink

Die einfachste Möglichkeit ist es, so zu würfeln, dass einer auf den Boden fällt.  Grin

Oder es sind Spezialwürfel. Die soll es ja bei manchen Spielen geben.

Axel
Gespeichert

Ohne Computer wären wir noch lange nicht hinterm Mond!

Server: 6.5.x; 7.0.x; 8.5.1 auf Win2000/Win2003 (R2) 32/64bit
Clients: 6.5.x bis 8.5.1 dt. und engl. auf W2K und WinXP
Semeaphoros
Gold Platin u.s.w. member:)
*****
Offline Offline

Geschlecht: Männlich
Beiträge: 8152


ho semeaphoros - agr.: der Notesträger


WWW
« Antworten #3 am: 15.08.05 - 08:50:34 »

Spezialwürfel, bei dem ein Würfel eine leere Fläche trägt Smiley ... da wird dann die elektronische Nachbildung etwas komplizierter ...... Wink
Gespeichert

Jens-B. Augustiny

Beratung und Unterstützung für Notes und Domino Infrastruktur und Anwendungen

Homepage: http://www.ligonet.ch

IBM Certified Advanced Application Developer - Lotus Notes and Domino 7 und 6
IBM Certified Advanced System Administrator - Lotus Notes and Domino 7 und 6
Driri
Gold Platin u.s.w. member:)
*****
Offline Offline

Geschlecht: Männlich
Beiträge: 6139



WWW
« Antworten #4 am: 15.08.05 - 09:59:41 »

Hmm, mißverständlich ausgedrückt fürchte ich.  Roll Eyes

Was ich meinte, waren 2 Würfel mit je 1-12 Punkten (1W12 für die Rollenspieler). Also ein Bereich von 2-24.

Also nix mogeln oder so  Wink
Gespeichert

Gruß, Ingo
------------------------------------------------------------
11 Domino-Server (8.5.3 auf i5 und Windows)
2500 Notes 8.0.2, 100 Notes 6.5

IBM Content Manager / Content Collector für Mailarchivierung
ClearSwift Appliance (Anti-Spam, Anti-Virus)
Axceler NOTRIX

iAnywhere MobileOffice 5.7, in Ablösung
ca. 320 Smartphones (SymbianOS)

Lotus Notes Traveler 8.5.3
ca. 300 Smartphones (Android)
Semeaphoros
Gold Platin u.s.w. member:)
*****
Offline Offline

Geschlecht: Männlich
Beiträge: 8152


ho semeaphoros - agr.: der Notesträger


WWW
« Antworten #5 am: 15.08.05 - 10:29:50 »

Ah, zwei Dodekaeder also ........  Grin
Gespeichert

Jens-B. Augustiny

Beratung und Unterstützung für Notes und Domino Infrastruktur und Anwendungen

Homepage: http://www.ligonet.ch

IBM Certified Advanced Application Developer - Lotus Notes and Domino 7 und 6
IBM Certified Advanced System Administrator - Lotus Notes and Domino 7 und 6
Driri
Gold Platin u.s.w. member:)
*****
Offline Offline

Geschlecht: Männlich
Beiträge: 6139



WWW
« Antworten #6 am: 15.08.05 - 10:32:07 »

Äääh, wenn Du das sagst  Wink
Gespeichert

Gruß, Ingo
------------------------------------------------------------
11 Domino-Server (8.5.3 auf i5 und Windows)
2500 Notes 8.0.2, 100 Notes 6.5

IBM Content Manager / Content Collector für Mailarchivierung
ClearSwift Appliance (Anti-Spam, Anti-Virus)
Axceler NOTRIX

iAnywhere MobileOffice 5.7, in Ablösung
ca. 320 Smartphones (SymbianOS)

Lotus Notes Traveler 8.5.3
ca. 300 Smartphones (Android)
DaWutz
Senior Mitglied
****
Offline Offline

Geschlecht: Männlich
Beiträge: 253


« Antworten #7 am: 15.08.05 - 10:32:34 »

Jo... die gibts bis W30... allerdings ist das dann wirklich schoin fast eine Kugel.
Gespeichert

Grüße aus Bonn,

Daniel!

Domino 6.5.3 auf Win2k
Clients ab 6.01 CF2

>>... es ist mir scheißegal wer Dein Vater ist! Solange ich hier angele, wird NICHT über´s Wasser gelaufen!! <<
Seiten: [1] Nach oben Drucken 
« vorheriges nächstes »
Gehe zu:  


Einloggen mit Benutzername, Passwort und Sitzungslänge

Powered by MySQL Powered by PHP Powered by SMF 1.1.16 | SMF © 2006, Simple Machines Prüfe XHTML 1.0 Prüfe CSS
Impressum Atnotes.de - Powered by Syslords Solutions - Datenschutz | Partner: Tinte / Toner günstig