1 STOP ST*P 3 EXPT EX* 4 ECHO EC* 5 NOECHO NOEC* 6 LECHO LEC* 7 LOAD L* 9 VARS VA* 10 COMMANDS C*M* 11 SHORT SH* 12 VSHORT V*SH* 13 LONG L*G 15 REPEAT R*P* 16 NORPT N*R*P* 17 SAVEBIN S*V*B* 18 SAVECARD S*V*C* 21 XPRINT X*PR* 22 NOXPRINT N*X* @END SCHIZGAME-- IT HELPS YOU THINK IN AT LEAST TWO DIFFERENT WAYS! DEVELOPED BY RICHARD H. NUSSLOCH, MARCH,1974 FROM THE EXPER-SIM SCHIZOPHRENIA SIMULATION WRITTEN BY DAVID MALIN, SEPTEMBER, 1970 AND MODIFIED BY ROBERT L. STOUT, JANUARY 1973. @END OF MODEL ID LINES NOVER=500 NGRP=500 NDEF=20 ECHO @END OF GSC STRING /INDEX (I*X*) 1, EXT KWD (SCHIZ(S*Z*)1, NONSCHIZ(N*)2) SCHIZ/ /REL(R*L*) 2, EXT KWD (UNREL(UN*,U*R*)=1, AUNTUNCL(A*U*,U*)=2, COUSIN(CO*)=3, SIBLING(SI*,S*B*)=4, IDTWIN(I*T*,ID*)=6, FRATTWIN(F*T*)=5, PARENT(P*)=7, CHILD(CH*)=8, NIECNEPH(N*E*)=9) UNREL/ /ADOPT (A*D*) 3, EXT KWD (BIO(B)=1, BIOSEP(B*S*)=2, ADOPTED(A*D*)=3) BIO/ /DIAG (D*G*) 4, EXT KWD (PSYCHO(P*,ST*)=1, SCHIZOID(S*Z*)=2) PSYCHO/ /SEXI (S*I*) 5, EXT KWD (MALE(M*)=1, FEMALE(F*)=2, RANDOM(R*)=0) RANDOM/ /SEXS (S*S*) 6, EXT KWD (MALE(M*)=1, FEMALE(F*)=2, RANDOM(R*)=0) RANDOM/ /METHOD (M*) 7 EXT KI (BOTHKNOW(B*)=1; DBLBLIND(D*)=2) BOTHKNOW (1,2)/ /ORGTYPE (O*) 8 EXT KWD (UNIV(U*)=1;RESEARCH(R*)=2;HOSPITAL(H*)=3) UNIV/ /SAMPLE(SA*, S*M*, S*P*) 9 EXT KWD (BINOMIAL(BI*)=1; BERNOULI(BE*)=2; PASCAL(P*)=3) BINOMIAL/ /EXMENTER(E*) 10 EXT KWD (NAIVE(N*)=1; CAUTIOUS(C*)=2; SOPHIS(S*)=3) NAIVE/ /COSTS(C*) 11 EXT KWD (ALL(A*)=1 ESTIMATE(E*)=2 TOTAL(T*)=3) ESTIMATE/ @END ADOPT=(AD), REL=(FRAT,IDTWIN)/ REL=(IDT), SEXI=(M), SEXS=(F)/ REL=(IDT), SEXI=(F), SEXS=(M)/ @END @END OF VCWS STRING @END OF DEFAULT STATISTICS STRING ...