Trailing-Edge
-
PDP-10 Archives
-
decuslib10-06
-
43,50365/shgm.dat
There is 1 other file named shgm.dat in the archive. Click here to see a list.
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
...