[TI83] random numer genereren met stop toets werkt niet

Pagina: 1
Acties:

  • MewBie
  • Registratie: April 2002
  • Laatst online: 01-09 23:54
Ik wil voor mn wiskunde een proggrammatje maken voor statistiek en kans berekening wat gewoon random nummers maakt.

de nummers zelf maken lukt wel maar ik wil er ook een toets in hebben waarmee je het programmatje stopt (de clear toets bijv.) maar die krijg ik er niet in, in de handleiding staat wel hoe dat werkt maar zoals het daar staat werkt het niet in combinatie met de getallen generator :( .

dit is wat ik al heb

om de nummers te maken
code:
1
2
3
4
5
6
program: randomnr
:Lbl AA
:randInt(0,9)->R
:Disp R
:Pause
:Goto AA

nu wil ik zorgen dat het programmatje stopt als ik op de clear (toetscode 45 voor getKey) knop druk het programmatje stopt.

Wie o wie kan mij helpen?

bij voorbaat dank

Please leave a message after the beep.
*beeeeep*


  • Rickbv
  • Registratie: September 2000
  • Laatst online: 11:16
Wat ik er nog van weet (tis al een tijdje vakantie ;) ), moet je ongeveer het volgende gebruiken:

getkey->K
while K=0
getkey->K
if K=45
STOP
END

Ik zelf vind het nogal een ranzige methode eigenlijk, want je rekendoos blijft maar bezig met dat loopje, en ik heb het idee dat dat nogal wat power zuipt...

  • eamelink
  • Registratie: Juni 2001
  • Niet online

eamelink

Droptikkels

Die K=0 moet je niet doen, maar daar K!=45 van maken, want getkey() wordt nooit nul, omdat hij altijd de laatste waarde blijft retourneren.

Voor zover ik het nog weet ;)

  • Osiris
  • Registratie: Januari 2000
  • Niet online
Zoek ff met Google naar het proggie Chaos en prog 1337 in ASM!!!

Z80-Assembler is superkewl :D

Één aanrader: gebruik wel een emulator, want anders mag je heel vaak je batterijen eruit halen etc :)

En goeie tuts zijn te vinden onder de naam "asmguru" zeer kewl allemaal :)

En voor het overpompen naar je rekenmachine heb je een kabeltje nodig na mijn weten...

Of je ASM ook kunt overtypen (dus op je emu kijken hoe het er daar in staat en dat allemaal precies overtikken) weet ik niet...

  • Kanarie
  • Registratie: Oktober 2000
  • Nu online

Kanarie

תֹ֙הוּ֙ וָבֹ֔הוּ

Zo moet ie het doen....

code:
1
2
3
4
5
6
7
8
9
10
11
Lbl AA
randInt(0,9)->R
Disp R
0->K
Lbl GK
GetKey->K
If K=105
Goto AA
If K=45
Stop
Goto GK

[ Voor 0% gewijzigd door Kanarie op 08-08-2002 13:36 . Reden: verbeterd ]

We're trapped in the belly of this horrible machine. And the machine is bleeding to death.


  • MewBie
  • Registratie: April 2002
  • Laatst online: 01-09 23:54
THW Arie schreef op 08 augustus 2002 @ 13:29:
Zo moet ie het doen....

code:
1
2
3
4
5
6
7
8
9
10
11
Lbl AA
randInt(0,9)->R
Disp R
0->K
Lbl GK
GetKey->K
If K=105
Goto AA
If K=45
Stop
Goto GK
als ik het zo doe krijg ik alleen maar done in beeld en geen getal :(

Please leave a message after the beep.
*beeeeep*

Pagina: 1