Google
 

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
     ...