home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Black Box 4
/
BlackBox.cdr
/
editors
/
hypsh40b.arj
/
HYPDEVEL.LZH
/
MCHOICE.HYP
< prev
next >
Wrap
Text File
|
1991-04-24
|
3KB
|
209 lines
.REMARK
Multi choice skeleton
This handles the questioning part of CAI only.
Normally there would be instructional frames followed
by questions, with return to the instructions if answers
are incorrect.
Bothe timeout and timing skeletons are provided
.SCRIPT RESET
VT0
VC0
VW0
VF4;Y Number of frames
VO0
VQ4
Va--------;Vb--------;Vc--------
.SCRIPT SETUP
VS&C59
VN~g ~APress space for next question~PZL1x$SF+~K ~E
.REMARK
This script allows 5 seconds to choose an answer
then times out. It tallies timeouts, correct and wrong answers.
It then waits for 5 seconds or key press before next question.
Note .5 second catch for key presses just after the timeout.
.SCRIPT Choose
VR&G500;jbTIMEOUT
vR$\;jnWRONG
VMCORRECT - Well done~g
VC=C+1
JNEXT
LTIMEOUT
VMOut of time
VT=T+1
JPMESS
LWRONG
VW=W+1
VMWrong
LPMESS
VM$M - the answer was number $\~g
LNEXT
ZL1
.SCRIPT Timing
Y&H
VR&K
VT&J;VO=O+T
vR$\;jnWRONG
VMCORRECT - Well done~g
VC=C+1
JNEXT
LWRONG
VW=W+1
VMWrong
LPMESS
VM$M - the answer was number $\~g
LNEXT
ZL1
.
.FRAME Timeout
.TITLE Multiple choice with timeout
Skeleton multi-choice
Scores are maintained for
Correct answers
Wrong answers
Timeouts
And a percentage and rating are given
[ ] ~APress space to start~PF+~K ~E
.FRAME Question 1
.TITLE DESCRIPTION
??QUESTION
1. ANSWER 1
2. ANSWER 2
3. ANSWER 3
4. ANSWER 4
~h1 $M
~h1 Description of correct
~h1 Answer
~h1 $N
~A~PSchoose(?)~E~Q ~H Replace ? with number of correct answer
.
.FRAME Question 2
.TITLE DESCRIPTION
??QUESTION
1. ANSWER 1
2. ANSWER 2
3. ANSWER 3
4. ANSWER 4
~h1 $M
~h1 Description of correct
~h1 Answer
~h1 $N
~A~PSchoose(?)~E~Q ~H Replace ? with number of correct answer
.
.FRAME Report 1
.TITLE How well did you do
Number of questions - $F
Number of correct answers - $C
Number of incorrect answers - $W
Number of timeouts - $T
~A~Psscore~E~Q
[ ] ~APress space to return to main menu~PFMENU~K ~E
.
.SCRIPT score
VP=C*100/F
vP25;jlBAD
vP50;jlAVERAGE
vP75;jlGOOD
VGBrilliant
JDISP
LBAD
VGPretty aweful
JDISP
LAVERAGE
VGAverage
JDISP
LGOOD
VGVery good
LDISP
pYou scored $P percent correct - That's $G
.
.REMARK
Multi choice with timing
.FRAME Timing
.TITLE Multiple choice with timing
This is a skeleton for multichoice with timing
[ ] ~APress space to start~PF+~K ~E
.
.FRAME Q 1
.TITLE Example
Question
1. Answer 1
2. Answer 2
3. Answer 3
~h1 $M
~h1 Description of correct answer
~h1 $N
~A~PSTiming(?)~E~Q ~H replace ? with number of correct one
.
.FRAME Q 2
.TITLE Example
Question
1. Answer 1
2. Answer 2
3. Answer 3
~h1 $M
~h1 Description of correct answer
~h1 $N
~A~PSTiming(?)~E~Q ~H replace ? with number of correct one
.
.FRAME Report 2
.TITLE Timing report
Number of questions $Q
Number correct $C
Number wrong $W
Average response time $A seconds
~A~Pscalc~E~Q
[ ] ~APress space to return to main menu~PFMENU~K ~E
.
.REMARK
Calculate average response in seconds / hundredths
.SCRIPT calc
VA=O/Q
VB=A/100
VA=A-B*100
vA10;alVA0$A
VA$B.$A
y
.