[Tiptoi] Zufall per Schleife reagiert "nicht ordentlich" ?

[kvmob]

Okay, ich sehe gerade, dass das zweite oid Random aufrufen sollte, das ist sicherlich ein Fehler.

Trotzdem bleibt es beim sehr langsamen Durchlauf von seed. Der Buchstabe l wird bei mir etwa ein mal pro Sekunde ausgegeben. Da wird es dann schwer überhaupt je die Zufallszahl zwei am Ende zu erreichen.

Wie lang ist denn normalerweise die Leer.mp3 (bzw. l in meinen Beispiel) in der seed Schleife bei euch? Weniger als 0,01 Sekunden?
-- 
Diese Nachricht wurde von meinem Android Mobiltelefon mit 1&1 Mail gesendet.



"Karsten Voß" <karsten_voss at online.de>schrieb:

Hallo zusammen,

wie einige andere auch, versuche ich gerade eine Zufallskomponente in 
mein Projekt (ich arbeite an der Umsetzung eines Spiels aus meiner 
frühren Jugend, war eines der ersten elektronischen Spiele) einzuarbeiten.

Ich hatte es bislang mit der Variante "eng gepackte OIDs versucht", 
wollte aber nicht nur Zufallszahlen von 1 bis 6 haben, sondern 1-20.
Das wurde etwas aufwändiger (wenn auch noch erträglich), daher versuche 
ich mich nun an der "Schleifen " Fassung (die aus dem Olchi Spiel).

Die brachte bei mir allerdings fast keine brauchbaren Ergebnisse, 
Betonung liegt auf mir (oder meinem neuen Player Stift)

Der Stift scheint gar nicht zu reagieren, oder extrem langsam. Um dies 
zu analysieren habe ich in den Programmtext ein paar Kontroll PLAY 
eingebaut.
Am Ende sagt der Stift aktuell nicht eins oder zwei oder drei...(was er 
gemäß Programmtext eigentlich sollte)
Auch habe mittlerweile die leer.mp3 extrem verkürzt. Wie schnell zählt 
dieser Programmcode denn normalerweise durch?
Kann das am neuen Stift liegen? Habe ich den Origincode zu stark oder 
falsch verändert?

Ich habe den Programm Text wie folgt aktuell in der Anwendung (ein 
gedrucktes OID startet per jump zunächst auf "seed", ein zweites ruft 
dann "zahl" auf):

seed:
- $n<768? $n+=1 P(l) J(seed)
- $n>767? $n:=1 P(z1) J(seed)

random:
- $n*=202 $n%=769 J(zahl)
- P(RND)

zahl: # 0-5
- P(ZAAL)
- $zahl:=$n $zahl-=1 $zahl/=128
- $zahl==0? P(z1)
- $zahl==1? P(z2)
- $zahl==2? P(z3)
- $zahl==3? P(z4)
- $zahl==4? P(z5)
- $zahl==5? P(z6)
- $zahl==6? P(z7)
- $zahl>5? P(fehler)

speak:
fehler: "fehler"
l: "l"
RND: "random"
ZAAL: "Zaal"
z1: "eins"
z2: "zwei"
z3: "drei"
z4: "vier"
z5: "fuenf"
z6: "sechs"
z7: "sieben"


-- 
tiptoi mailing list
tiptoi at lists.nomeata.de
https://lists.nomeata.de/mailman/listinfo/tiptoi

-------------- nächster Teil --------------
Ein Dateianhang mit HTML-Daten wurde abgetrennt...
URL: <https://lists.nomeata.de/pipermail/tiptoi/attachments/20151214/75081737/attachment.htm>