Directory of image this file is from
This file as a plain text file

\PRINTC$(9)\I(Z)=39\GOSUB 2000
4419 RETURN
4420 PRINTC$(10)\I(Z)=11\GOSUB 2000
4421 RETURN
30000 C=0\D=0
30002 FOR I=1 TO 39
30004 IF L(I)<>1 THEN 30006\C=C+1\A$(C)=G$(I)
30006 IF L(I)<>2 THEN 30007\D=D+1\B$(D)=G$(I)
30007 NEXT I\PRINT \PRINT
30008 PRINT N$(1);" OWNED THE FOLLOWING PROPERTY"
30009 FOR I=1 TO C\PRINTA$(I)\NEXT I
30010 PRINT "AND HAD";M(1);"DOLLARS AT THE END OF THE GAME"
30011 PRINT N$(2);" OWNED THE FOLLOWING PROPERTY"
30012 FOR I=1 TO D\PRINT B$(I)\NEXT I
30013 PRINT "AND HAD";M(2);"DOLLARS AT THE END OF THE GAME"
30020 END