File:
[LON-CAPA] /
capa /
capa51 /
GUITools /
ideas /
of5tool /
Nof5_all
Revision
1.1.1.1 (vendor branch):
download - view:
text,
annotated -
select for diffs
Tue Sep 28 21:26:14 1999 UTC (25 years, 1 month ago) by
albertel
Branches:
capa,
MAIN
CVS tags:
version_2_9_X,
version_2_9_99_0,
version_2_9_1,
version_2_9_0,
version_2_8_X,
version_2_8_99_1,
version_2_8_99_0,
version_2_8_2,
version_2_8_1,
version_2_8_0,
version_2_7_X,
version_2_7_99_1,
version_2_7_99_0,
version_2_7_1,
version_2_7_0,
version_2_6_X,
version_2_6_99_1,
version_2_6_99_0,
version_2_6_3,
version_2_6_2,
version_2_6_1,
version_2_6_0,
version_2_5_X,
version_2_5_99_1,
version_2_5_99_0,
version_2_5_2,
version_2_5_1,
version_2_5_0,
version_2_4_X,
version_2_4_99_0,
version_2_4_2,
version_2_4_1,
version_2_4_0,
version_2_3_X,
version_2_3_99_0,
version_2_3_2,
version_2_3_1,
version_2_3_0,
version_2_2_X,
version_2_2_99_1,
version_2_2_99_0,
version_2_2_2,
version_2_2_1,
version_2_2_0,
version_2_1_X,
version_2_1_99_3,
version_2_1_99_2,
version_2_1_99_1,
version_2_1_99_0,
version_2_1_3,
version_2_1_2,
version_2_1_1,
version_2_1_0,
version_2_12_X,
version_2_11_X,
version_2_11_5_msu,
version_2_11_5,
version_2_11_4_uiuc,
version_2_11_4_msu,
version_2_11_4,
version_2_11_3_uiuc,
version_2_11_3_msu,
version_2_11_3,
version_2_11_2_uiuc,
version_2_11_2_msu,
version_2_11_2_educog,
version_2_11_2,
version_2_11_1,
version_2_11_0_RC3,
version_2_11_0_RC2,
version_2_11_0_RC1,
version_2_11_0,
version_2_10_X,
version_2_10_1,
version_2_10_0_RC2,
version_2_10_0_RC1,
version_2_10_0,
version_2_0_X,
version_2_0_99_1,
version_2_0_2,
version_2_0_1,
version_2_0_0,
version_1_99_3,
version_1_99_2,
version_1_99_1_tmcc,
version_1_99_1,
version_1_99_0_tmcc,
version_1_99_0,
version_1_3_X,
version_1_3_3,
version_1_3_2,
version_1_3_1,
version_1_3_0,
version_1_2_X,
version_1_2_99_1,
version_1_2_99_0,
version_1_2_1,
version_1_2_0,
version_1_1_X,
version_1_1_99_5,
version_1_1_99_4,
version_1_1_99_3,
version_1_1_99_2,
version_1_1_99_1,
version_1_1_99_0,
version_1_1_3,
version_1_1_2,
version_1_1_1,
version_1_1_0,
version_1_0_99_3,
version_1_0_99_2,
version_1_0_99_1,
version_1_0_99,
version_1_0_3,
version_1_0_2,
version_1_0_1,
version_1_0_0,
version_0_99_5,
version_0_99_4,
version_0_99_3,
version_0_99_2,
version_0_99_1,
version_0_99_0,
version_0_6_2,
version_0_6,
version_0_5_1,
version_0_5,
version_0_4,
version5-1-2-first_release,
start,
stable_2002_spring,
stable_2002_july,
stable_2002_april,
stable_2001_fall,
release_5-1-3,
loncapaMITrelate_1,
language_hyphenation_merge,
language_hyphenation,
conference_2003,
bz6209-base,
bz6209,
STABLE,
HEAD,
GCI_3,
GCI_2,
GCI_1,
CAPA_5-1-6,
CAPA_5-1-5,
CAPA_5-1-4_RC1,
BZ4492-merge,
BZ4492-feature_horizontal_radioresponse,
BZ4492-feature_Support_horizontal_radioresponse,
BZ4492-Support_horizontal_radioresponse
Created directory structure
//**************************************
/LET prob_val=2
//HIN No Hint unless you un-comment this text to make it into a hint.
//EXP No Explanation unless you un-comment this text and write something.
/IMP "../Tools/Problem#"
// ../CAPA/MCTools/Nof5 Select N correct of 5 Statements
This is the TEXT of problem here. (Give ALL correct answers, i.e., B, AC, BCD...)
// set a1a = 1 for a correct variation, and 2 for incorrect, etc..
// ALL variations for at least one statement must always be correct!
//----------------------------------------
/LET s1a="Statement 1 variation a"
/LET s1b="Statement 1 variation b"
/LET s1c="Statement 1 variation c"
/LET s1d="Statement 1 variation d"
/LET mix1=random(1,1,1)
/LET a1a=26
/LET a1b=26
/LET a1c=26
/LET a1d=26
//
/LET s2a="Statement 2 variation a"
/LET s2b="Statement 2 variation b"
/LET s2c="Statement 2 variation c"
/LET s2d="Statement 2 variation d"
/LET mix2=random(1,1,1)
/LET a2a=26
/LET a2b=26
/LET a2c=26
/LET a2d=26
//
/LET s3a="Statement 3 variation a"
/LET s3b="Statement 3 variation b"
/LET s3c="Statement 3 variation c"
/LET s3d="Statement 3 variation d"
/LET mix3=random(1,1,1)
/LET a3a=26
/LET a3b=26
/LET a3c=26
/LET a3d=26
//
/LET s4a="Statement 4 variation a"
/LET s4b="Statement 4 variation b"
/LET s4c="Statement 4 variation c"
/LET s4d="Statement 4 variation d"
/LET mix4=random(1,1,1)
/LET a4a=26
/LET a4b=26
/LET a4c=26
/LET a4d=26
//
/LET s5a="Statement 5 variation a"
/LET s5b="Statement 5 variation b"
/LET s5c="Statement 5 variation c"
/LET s5d="Statement 5 variation d"
/LET mix5=random(1,1,1)
/LET a5a=26
/LET a5b=26
/LET a5c=26
/LET a5d=26
//
//This is the auxilary file for the Nof5 tool, it maps and scrambles the
//statements and answers
//
/LET m=choose(mix1,s1a,s1b,s1c,s1d)
/LET a=choose(mix1,a1a,a1b,a1c,a1d)
/LET n=choose(mix2,s2a,s2b,s2c,s2d)
/LET b=choose(mix2,a2a,a2b,a2c,a2d)
/LET o=choose(mix3,s3a,s3b,s3c,s3d)
/LET c=choose(mix3,a3a,a3b,a3c,a3d)
/LET p=choose(mix4,s4a,s4b,s4c,s4d)
/LET d=choose(mix4,a4a,a4b,a4c,a4d)
/LET q=choose(mix5,s5a,s5b,s5c,s5d)
/LET e=choose(mix5,a5a,a5b,a5c,a5d)
/LET seed=random(1,300,1)
/MAP(seed;M1,M2,M3,M4,M5;m,n,o,p,q)
/LET it=tex("\item[] ","")
/DIS(tex("\begin{choicelist}",""))
/DIS(it) A) /DIS (M1)
/DIS(it) B) /DIS (M2)
/DIS(it) C) /DIS (M3)
/DIS(it) D) /DIS (M4)
/DIS(it) E) /DIS (M5)
/DIS(tex("\end{choicelist}",""))
/MAP(seed;b1,b2,b3,b4,b5;a,b,c,d,e)
/LET NM1=b1*(b1==1)+1
/LET NM2=b2*(b2==1)+1
/LET NM3=b3*(b3==1)+1
/LET NM4=b4*(b4==1)+1
/LET NM5=b5*(b5==1)+1
/LET lett1=choose(NM1,"","A")
/LET lett2=choose(NM2,"","B")
/LET lett3=choose(NM3,"","C")
/LET lett4=choose(NM4,"","D")
/LET lett5=choose(NM5,"","E")
/LET Nof5right=lett1+lett2+lett3+lett4+lett5
//*************************************************************************
/DIS(stdline)
/ANS(Nof5right,wgt=prob_val,str=mc)
//**************************************
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>