$ od -c -N 50000 [eris]<Lisp>KOTO>demos>SOLITAIRE.DCOM!1
0000000 ( F I L E C R E A T E D " 6
0000020 - A u g - 8 5 0 0 : 0 5 : 0 2
0000040 " ( " c o m p i l e d o n
0000060 " { E R I S } < L I S P U S E
0000100 R S > S O L I T A I R E . ; 4 )
0000120 " 5 - A u g - 8 5 2 3 : 0
0000140 7 : 5 1 " \r r e c o m p i l e
0000160 d c h a n g e s : D E A L D
0000200 E C K M O V E C A R D D O M
0000220 O V E U P C A R D N X T C A
0000240 R D P O S T V A L U E S H O
0000260 W C A R D S T A C K S O L O
0000300 H I S T i n \r " I N T E R L
0000320 I S P - D 5 - A u g - 8 5
0000340 . . . " d a t e d " 5 - A
0000360 u g - 8 5 2 0 : 4 8 : 3 4 " )
0000400 \r ( F I L E C R E A T E D "
0000420 6 - A u g - 8 5 0 0 : 0 4 : 4
0000440 3 " { E R I S } < L I S P U S
0000460 E R S > S O L I T A I R E . ; 4
0000500 2 2 2 7 1 c h a n g e s t
0000520 o : ( F N S S O L O D E A
0000540 L D E C K \r M O V E C A R D
0000560 D O M O V E U P C A R D N X
0000600 T C A R D P O S T V A L U E
0000620 S H O W C A R D S T A C K H I
0000640 S T ) ( V A R S S O L I T A
0000660 I R E C O M S ) p r e v i o u
0000700 s d a t e : \r " 5 - A u g
0000720 - 8 5 2 3 : 5 6 : 4 0 " { E
0000740 R I S } < L I S P U S E R S > S
0000760 O L I T A I R E . ; 3 ) \r C A R
0001000 D I M A G E D 1 \r ( P 2 R
0001020 A N K B M P 1 S U I T B M
0001040 P 0 B M I 0 C F
0001060 3 S p a d e s B i t s F 4
0001100 C l u b s B i t s F 5 1
0001120 0 B i t s F 6 D i a m o n
0001140 d s B i t s F 7 H e a r t
0001160 s B i t s ) \0 360 003 005 \0 001 l 036 l
0001200 - \n \0 \0 @ 006 \0 \0 311 \0 d j 360 223 277 S
0001220 260 034 d k 360 223 277 T 260 024 d l 002 360 222 277
0001240 V 211 l 003 360 222 W 016 202 \b \0 \0 @ 006 \0 \0
0001260 311 002 l \n 360 222 U 260 6 @ 006 \0 \0 311 002 d
0001300 l \r 360 224 277 l K 260 033 d l \f 360 223 277 l
0001320 Q 217 l \v 360 222 l J 210 @ 006 \0 \0 311 002 l
0001340 0 330 g \0 \0 l 022 \n \0 \0 \n \0 \0 021 003 002
0001360 h d d H h d d d g \0 \0 g \0 \0 n 377
0001400 377 \r \v \0 \0 h d d H k d l 034 l + g
0001420 \0 \0 g \0 \0 j \r \v \0 \0 I j d H l 002
0001440 l h d g \0 \0 g \0 \0 \r \n \0 \0 J j
0001460 d H l 036 J 006 \0 \0 310 004 331 l 002 333 l -
0001500 J 006 \0 \0 310 003 331 l 002 333 h d g \0 \0 g
0001520 \0 \0 \r \n \0 \0 I j d H l 021 l 003 h d
0001540 g \0 \0 g \0 \0 \r \n \0 \0 H 020 \0 ( 3 5
0001560 4 Q B I T B L T 3 3 0 Q B
0001600 I T B L T 2 6 0 Q B I T B L
0001620 T 2 3 4 Q B I T B L T 2 0
0001640 7 Q B I T B L T 1 5 7 Q G
0001660 E T C H A R B I T M A P 1 5 4
0001700 Q F O N T C R E A T E 5 6 Q
0001720 S H O U L D N T 6 B I T M
0001740 A P C R E A T E ) \r ( 3 5 0 Q
0001760 R E P L A C E 3 4 5 Q I N P
0002000 U T 3 2 4 Q R E P L A C E
0002020 3 2 1 Q I N P U T 3 0 6 Q
0002040 B I T M A P 2 7 2 Q B I T M
0002060 A P 2 5 4 Q R E P L A C E
0002100 2 5 1 Q I N P U T 2 2 7 Q
0002120 R E P L A C E 2 2 4 Q T E X
0002140 T U R E 2 0 0 Q R E P L A C
0002160 E 1 7 5 Q T E X T U R E 1
0002200 4 7 Q H E L V E T I C A 1 3
0002220 7 Q C A R D 7 7 Q C A R D
0002240 6 2 Q C A R D 1 2 Q C A
0002260 R D ) \r N I L \r C O U N T C A R
0002300 D S D 1 \r ( P 1 S ) \0 !
0002320 003 \0 \0 \0 l 003 j d 021 003 002 I H 361 263 024
0002340 J I \t \0 \0 006 \0 \0 311 002 330 272 I k 330 Y
0002360 260 354 J 020 \0 ( 2 0 Q T O P S U I
0002400 T S T A C K ) \r ( 2 3 Q C A R
0002420 D ) \r N I L \r C R E A T E H A N
0002440 D D 1 \r ( P 1 I I 0
0002460 F ) \0 = 005 \0 \0 001 h l 4 @ 021 2 004
0002500 I d H 361 262 032 277 J 022 l Z l - l 024 j
0002520 h 032 032 032 032 032 032 \t \0 \0 \t \0 \0 020 \t \0
0002540 \0 274 K 265 \r L h 032 [ 272 I k 330 Y 260 323
0002560 L & 273 260 367 \0 ( 4 7 Q G E T C A
0002600 R D 4 3 Q F L I P S T A C K
0002620 4 0 Q S H O W C A R D S T A
0002640 C K ) \r N I L \r N I L \r C R E A
0002660 T E S T A C K D 1 \r ( P 5
0002700 J P 1 I I 0 N ) \0
0002720 Z 006 \0 \0 001 h @ d d k 331 332 l 002 333 k
0002740 330 021 B 005 k ] H 361 263 035 I \t \0 \0 274 K
0002760 265 020 L h 032 [ 272 I k 330 271 M k 330 260 347
0003000 L & 273 260 364 J 022 @ l 004 332 k 331 l 036 332
0003020 n 001 357 j o \0 \0 \0 \t \0 \0 l - 352 j 330
0003040 h 032 032 032 032 032 032 \t \0 \0 \t \0 \0 020 \0 (
0003060 1 2 7 Q F L I P S T A C K 1
0003100 2 4 Q S H O W C A R D S T A C
0003120 K 1 0 5 Q F M I N U S 3 0
0003140 Q G E T C A R D ) \r N I L \r (
0003160 1 0 2 Q . 6 6 7 ) \r D E A L D
0003200 E C K D 1 \r ( P 0 I I
0003220 0 R E D E A L F 1 S O L
0003240 O W F 2 S O L I T A I R E
0003260 W I N D O W ) \0 211 001 002 \0 001 @ 225
0003300 ` \0 \0 005 006 243 \b \0 \0 277 Q 265 6 R c 002
0003320 265 1 l l @ n 003 300 n 002 243 h 032 032 032
0003340 032 o \0 \0 \0 \n \0 \0 c 004 c 002 g \0 \0 l
0003360 022 \n \0 \0 Q \n \0 \0 277 n 004 @ Q \n \0 \0
0003400 277 \t \0 \0 l 004 g \0 \0 ` \0 \0 037 d j 024
0003420 002 277 j \f \0 \0 027 \0 \0 l \a g \0 \0 \n \0
0003440 \0 027 \0 \0 021 020 \0 k X l \a 363 256 ` \0 \0
0003460 H d \t \0 \0 * 277 H k 324 260 356 023 l 035 \t
0003500 \0 \0 027 \0 \0 020 \0 ( 2 0 3 Q C R E
0003520 A T E H A N D 1 6 6 Q C R E
0003540 A T E S T A C K 1 4 2 Q A R
0003560 R A Y 1 2 7 Q A R R A Y 1
0003600 0 5 Q C L E A R W 1 0 1 Q
0003620 D S P T E X T U R E 7 1 Q D
0003640 S P F O N T 6 5 Q F O N T C
0003660 R E A T E 5 1 Q C R E A T E
0003700 W 1 2 Q S H U F F L E D E C
0003720 K ) \r ( 2 0 6 Q H A N D 1 6
0003740 1 Q S T A C K S 1 4 5 Q S
0003760 T A C K S 1 3 7 Q P O I N T
0004000 E R 1 3 2 Q S U I T S T A C
0004020 K S 1 1 5 Q 004 003 C A R D T Y
0004040 P E # 1 1 2 Q P O I N T E R
0004060 6 0 Q H E L V E T I C A 4
0004100 D E C K ) \r ( 4 6 Q " J u
0004120 s t w a i t i n g P a t i e
0004140 n t l y . . . " ) \r F L I P S T
0004160 A C K D 1 \r ( I 0 H ) \0
0004200 020 \0 \0 \0 001 @ 002 001 264 \v @ d \t \0 \0 \n
0004220 \0 \0 @ 020 \0 ( 1 4 Q P U S H C A
0004240 R D 1 1 Q N X T C A R D ) \r
0004260 N I L \r N I L \r G E T C A R D
0004300 D 1 \r ( P 0 C I 0 I )
0004320 \0 ; 001 \0 \0 001 ` \0 \0 @ ( 021 001 \0 H
0004340 006 \0 \0 311 004 263 033 H 006 \0 \0 H \t \0 \0 024
0004360 004 277 H 006 \0 \0 l 036 l - \n \0 \0 024 006 277
0004400 H 006 \0 \0 H 006 \0 \0 h 024 \n 277 h 024 \b H
0004420 020 \0 ( 4 5 Q B I T M A P C R E
0004440 A T E 2 7 Q C A R D I M A G
0004460 E ) \r ( 6 0 Q C A R D 5 4 Q
0004500 C A R D 3 6 Q C A R D 2
0004520 3 Q C A R D 1 3 Q C A R D
0004540 2 D E C K ) \r N I L \r G O O
0004560 D M O V E ? D 1 \r ( L ( 1
0004600 B O T 0 T O P ) ) \0 4 \0 \0
0004620 \0 002 @ 265 \f A 006 \0 \0 311 002 l \r 360 020 006
0004640 \0 \0 311 002 A 006 \0 \0 311 002 k 330 360 264 027 l
0004660 002 @ 006 \0 \0 311 \0 361 l 002 A 006 \0 \0 311 \0
0004700 361 360 h 360 020 \0 N I L \r ( 5 3 Q C
0004720 A R D 4 2 Q C A R D 2 5 Q
0004740 C A R D 1 7 Q C A R D 6
0004760 C A R D ) \r N I L \r H T O S ?
0005000 D 1 \r ( I 0 H ) \0 \r \0 \0
0005020 \0 001 @ 001 001 264 \b @ 001 001 \t \0 \0 020 \0 (
0005040 1 2 Q S E A R C H S T A C K S
0005060 ) \r N I L \r N I L \r M O V E C A
0005100 R D D 1 \r ( I 2 Y I 1
0005120 X I 0 C F 0 S O L
0005140 O W ) \0 i \0 001 \0 003 @ 006 \0 \0 311 \b
0005160 262 " @ 006 \0 \0 311 004 @ 006 \0 \0 311 \b @ 006
0005200 \0 \0 311 \n A B @ 006 \0 \0 311 006 \r 006 \0 \0
0005220 260 1 P A B @ 006 \0 \0 311 006 h d d d g
0005240 \0 \0 g \0 \0 \r \n \0 \0 277 @ 006 \0 \0 311 004
0005260 h d P A B h d g \0 \0 g \0 \0 \r \n \0
0005300 \0 277 @ 006 \0 \0 A 024 \b @ 006 \0 \0 B 024 \n
0005320 @ 020 \0 ( 1 2 6 Q B K B I T B L
0005340 T 7 6 Q B K B I T B L T 4
0005360 5 Q D O M O V E ) \r ( 1 4 2 Q
0005400 C A R D 1 3 3 Q C A R D
0005420 1 2 2 Q R E P L A C E 1 1 7
0005440 Q I N P U T 1 0 3 Q C A R
0005460 D 7 2 Q R E P L A C E 6 7
0005500 Q I N P U T 5 6 Q C A R D
0005520 3 7 Q C A R D 2 7 Q C A
0005540 R D 2 1 Q C A R D 1 3 Q
0005560 C A R D 3 C A R D ) \r ( ) \r
0005600 D O M O V E D 1 \r ( P 1 1 Q
0005620 O L D L O W P 1 0 Q O L
0005640 D L E F T P 7 Y F C P
0005660 6 X F C P 4 X F P P
0005700 3 X W P P 2 Y F P P
0005720 1 Y W P P 0 N I 5
0005740 S A V E I 4 N Y I 3
0005760 N X I 2 B O T T O M I
0006000 1 L E F T I 0 I M A G E
0006020 F 1 2 Q S O L O W ) \0 300
0006040 \n 001 \0 006 021 ` 005 C A 331 \t \0 \0 D B 331
0006060 \t \0 \0 275 d M 361 241 277 M ` \0 \0 k 331 330
0006100 ` \0 \0 333 X C A 331 H 333 [ C A 331 H 334
0006120 \ D B 331 H 333 Y D B 331 H 334 Z j d 021
0006140 " \t A d C 360 227 277 B D 360 221 h 020 A _
0006160 020 277 B _ 022 277 A K N L 324 ^ H 333 N H
0006200 334 276 324 324 b 002 277 B I O 016 J 324 _ 016 H
0006220 333 O 016 H 334 _ 016 277 324 324 b 004 277 E j d
0006240 W 024 O 020 O 022 l 036 l - g \0 \0 g \0 \0
0006260 \r \n \0 \0 277 W 024 A B E j d l 036 l -
0006300 g \0 \0 g \0 \0 \r \n \0 \0 277 @ j d W 024
0006320 A B l 036 l - g \0 \0 g \0 \0 \r \n \0 \0
0006340 277 260 201 \0 ( 2 7 3 Q B K B I T B
0006360 L T 2 4 5 Q B K B I T B L T
0006400 2 1 7 Q B K B I T B L T 1
0006420 6 Q A B S 1 0 Q A B S ) \r
0006440 ( 2 6 7 Q R E P L A C E 2 6
0006460 4 Q I N P U T 2 4 1 Q R E
0006500 P L A C E 2 3 6 Q I N P U T
0006520 2 1 3 Q R E P L A C E 2 1
0006540 0 Q I N P U T 3 6 Q M a x
0006560 C a r d M o v e 3 0 Q M a x
0006600 C a r d M o v e ) \r ( ) \r M O V
0006620 E H S D 1 \r ( I 1 S N I
0006640 0 H ) \0 033 \0 \0 \0 002 A d 262 027
0006660 @ 001 001 @ d 001 002 030 277 \n \0 \0 @ 001 001 243
0006700 @ \t \0 \0 A 020 \0 ( 2 7 Q F L I P
0006720 S T A C K 1 7 Q P U S H C A
0006740 R D ) \r N I L \r N I L \r M O V E
0006760 S D 1 \r ( I 1 S 2 I 0
0007000 S 1 ) \0 024 \0 \0 \0 002 A 264 021 @ 001
0007020 h A \v \0 \0 @ h 030 @ \t \0 \0 A 020 \0 (
0007040 2 0 Q F L I P S T A C K 1 1
0007060 Q M O V E S 1 ) \r N I L \r N I
0007100 L \r M O V E S 1 D 1 \r ( I 2
0007120 S 2 I 1 P I 0 L )
0007140 \0 031 \0 \0 \0 003 @ d 262 025 002 @ 001 B \v
0007160 \0 \0 @ 001 A \n \0 \0 B @ 001 \n \0 \0 020 \0
0007200 ( 2 6 Q P U S H C A R D 2 0
0007220 Q U P C A R D 1 2 Q M O V
0007240 E S 1 ) \r N I L \r N I L \r U P C
0007260 A R D D 1 \r ( P 0 D Y I
0007300 1 Y I 0 X F 1 S
0007320 O L O W ) \0 200 001 001 \0 002 A 264 } @
0007340 006 \0 \0 311 \n A 006 \0 \0 311 \n 331 021 001 \0 @
0007360 006 \0 \0 311 006 j d A 006 \0 \0 311 006 j H l
0007400 036 l - H 331 g \0 \0 g \0 \0 \r \n \0 \0 Q
0007420 @ 006 \0 \0 311 \b @ 006 \0 \0 311 \n @ 006 \0 \0
0007440 311 006 j d l 036 l - H 331 g \0 \0 g \0 \0
0007460 \r \n \0 \0 @ 006 \0 \0 311 004 j d Q @ 006 \0
0007500 \0 311 \b @ 006 \0 \0 311 \n l 036 l - H 331 g
0007520 \0 \0 g \0 \0 \r \n \0 \0 h 020 \0 ( 1 7 4
0007540 Q B K B I T B L T 1 2 7 Q
0007560 B K B I T B L T 6 2 Q B K B
0007600 I T B L T ) \r ( 1 7 0 Q R E P
0007620 L A C E 1 6 5 Q I N P U T
0007640 1 5 2 Q C A R D 1 4 4 Q C
0007660 A R D 1 3 3 Q C A R D 1 2
0007700 3 Q R E P L A C E 1 2 0 Q
0007720 I N P U T 1 0 3 Q C A R D
0007740 7 5 Q C A R D 6 7 Q C A R
0007760 D 5 6 Q R E P L A C E 5 3
0010000 Q I N P U T 3 6 Q C A R D
0010020 2 6 Q C A R D 1 4 Q C A
0010040 R D 6 C A R D ) \r ( ) \r M O
0010060 V E S S S D 1 \r ( P 1 S T
0010100 S P 0 T S I 0 S F
0010120 2 G A M E V A L U E ) \0 ]
0010140 002 001 \0 001 @ 001 001 021 021 001 H d 262 S 006 \0
0010160 \0 311 002 H 006 \0 \0 311 \0 Y \t \0 \0 006 \0 \0
0010200 311 002 k 330 360 264 : ` \0 \0 I @ 001 001 @ d
0010220 001 002 030 277 I k 330 l 264 332 ` \0 \0 l \a (
0010240 002 002 002 001 l Z 330 \v \0 \0 * 277 @ 001 001 244
0010260 @ \t \0 \0 277 R l 005 330 c 004 \t \0 \0 i 020
0010300 \0 ( 1 3 1 Q P O S T V A L U E
0010320 1 1 7 Q F L I P S T A C K
0010340 1 0 5 Q M O V E C A R D 3 0
0010360 Q T O P S U I T S T A C K ) \r
0010400 ( 7 0 Q S T A C K S 4 5 Q
0010420 S U I T S T A C K S 3 3 Q C
0010440 A R D 2 2 Q C A R D 1 4 Q
0010460 C A R D ) \r N I L \r N X T C A
0010500 R D D 1 \r ( I 0 S F 0
0010520 S O L O W ) \0 v \0 001 \0 001 @ 002
0010540 001 001 @ 002 @ 002 001 002 030 277 @ 002 001 263 e h
0010560 d d P @ 002 002 001 @ 002 002 002 001 @ 001 232 @
0010600 002 002 002 002 002 001 l - 330 200 j 330 l 036 j @
0010620 002 002 002 002 002 001 331 g \0 \0 g \0 \0 h P \n
0010640 \0 \0 \r \v \0 \0 277 h d d P @ 002 002 001 @
0010660 002 002 002 001 @ 001 226 @ 002 002 002 002 001 201 l 036
0010700 l - g \0 \0 g \0 \0 h P \n \0 \0 \r \v \0
0010720 \0 277 020 \0 ( 1 6 2 Q B K B I T B
0010740 L T 1 5 6 Q D S P T E X T U
0010760 R E 1 0 7 Q B K B I T B L T
0011000 1 0 3 Q D S P T E X T U R E
0011020 ) \r ( 1 5 1 Q R E P L A C E
0011040 1 4 6 Q T E X T U R E 7 6 Q
0011060 R E P L A C E 7 3 Q T E X
0011100 T U R E ) \r ( ) \r P U S H C A R
0011120 D D 1 \r ( I 1 C I 0
0011140 S ) \0 ; \0 \0 \0 002 A @ 002 002 002 002 001
0011160 @ d 001 227 001 001 006 \0 \0 311 \b 202 002 002 001 330
0011200 @ 002 002 002 002 002 001 @ d 001 227 001 001 006 \0 \0
0011220 311 \n 203 002 002 002 001 330 \v \0 \0 @ A @ 001 032
0011240 030 001 020 \0 ( 6 1 Q M O V E C A R
0011260 D ) \r ( 4 6 Q C A R D 1 7 Q
0011300 C A R D ) \r N I L \r P O S T V
0011320 A L U E D 1 \r ( I 0 V F
0011340 0 S O L O W ) \0 237 \0 001 \0 001
0011360 n 001 364 l 8 P \v \0 \0 g \0 \0 l 022 \n \0
0011400 \0 P \n \0 \0 h d d P h P \n \0 \0 h P
0011420 \n \0 \0 h P \n \0 \0 006 \0 \0 310 023 331 l 310
0011440 h P \n \0 \0 006 \0 \0 310 024 g \0 \0 g \0 \0
0011460 h P \n \0 \0 \r \v \0 \0 g \0 \0 P \n \0 \0
0011500 j @ 361 262 031 o \0 \0 \0 P \n \0 \0 277 j @
0011520 331 P \n \0 \0 277 o \0 \0 \0 260 037 @ j 360 263
0011540 ) @ 005 003 265 037 o \0 \0 \0 P \n \0 \0 277 @
0011560 P \n \0 \0 277 o \0 \0 \0 P \n \0 \0 277 P \n
0011600 \0 \0 020 \t \0 \0 262 340 o \0 \0 \0 260 355 \0 (
0011620 2 2 5 Q \ F Z E R O P 2 2 1
0011640 Q D S P O P E R A T I O N 2
0011660 1 4 Q P R I N 1 2 0 3 Q P
0011700 R I N 1 1 7 5 Q P R I N 1
0011720 1 4 4 Q P R I N 1 1 3 4 Q
0011740 P R I N 1 1 1 7 Q D S P O P
0011760 E R A T I O N 1 1 0 Q B K B
0012000 I T B L T 1 0 4 Q D S P T E
0012020 X T U R E 6 4 Q D S P F O N
0012040 T 4 7 Q D S P F O N T 4 2
0012060 Q D S P Y P O S I T I O N 3
0012100 5 Q D S P X P O S I T I O N
0012120 2 4 Q D S P F O N T 2 0 Q
0012140 F O N T C R E A T E 1 0 Q M
0012160 O V E T O ) \r ( 1 1 3 Q P A I
0012200 N T 7 7 Q R E P L A C E 7
0012220 4 Q T E X T U R E 6 7 Q F
0012240 O N T D E S C R I P T O R 5 2
0012260 Q F O N T D E S C R I P T O R
0012300 1 3 Q H E L V E T I C A ) \r
0012320 ( 2 3 3 Q " D e a d e v e
0012340 n ! " 2 1 0 Q "
0012360 " 1 7 1 Q " A h e a d b y
0012400 $ " 1 5 1 Q " " 1
0012420 3 0 Q " D o w n b y $ " )
0012440 \r S E A R C H S T A C K S D 1
0012460 \r ( P 0 I I 0 K ) \0
0012500 $ 001 \0 \0 001 021 020 \0 k X l \a 361 263 031 `
0012520 \0 \0 H ( 001 001 @ \n \0 \0 225 ` \0 \0 H (
0012540 020 H k 330 260 345 h 020 \0 ( 2 4 Q G O
0012560 O D M O V E ? ) \r ( 3 0 Q S T
0012600 A C K S 1 4 Q S T A C K S )
0012620 \r N I L \r S H O W C A R D S T A
0012640 C K D 1 \r ( I 0 S F 0
0012660 S O L O W ) \0 K \0 001 \0 001 @ d
0012700 002 001 262 E 277 h d d P @ 002 002 001 @ 002 002
0012720 002 001 l 036 l - g \0 \0 g \0 \0 n 377 377 \r
0012740 \v \0 \0 277 h d d P @ 002 002 001 k 330 @ 002
0012760 002 002 001 k 330 l 034 l + g \0 \0 g \0 \0 n
0013000 314 3 \r \v \0 \0 @ 020 \0 ( 1 0 7 Q B
0013020 K B I T B L T 4 4 Q B K B I
0013040 T B L T ) \r ( 1 0 0 Q R E P L
0013060 A C E 7 5 Q T E X T U R E
0013100 3 5 Q R E P L A C E 3 2 Q
0013120 T E X T U R E ) \r ( ) \r S H U F
0013140 F L E D E C K D 1 \r ( P 5
0013160 Y P 4 I P 3 R P
0013200 2 I P 1 S ) \0 ~ 006 \0 \0
0013220 \0 g \0 \0 \t \0 \0 226 ` \0 \0 005 006 263 D l
0013240 4 g \0 \0 \n \0 \0 027 \0 \0 277 l 003 j d 021
0013260 023 003 I H 361 263 + k [ l \r 361 263 036 ` \0
0013300 \0 J k 330 Z ` \0 \0 037 d I 024 \0 277 d K
0013320 024 002 277 * 277 K k 330 260 340 I k 330 Y 260 325
0013340 023 021 005 k \ l 4 361 221 h 020 k l 4 \n
0013360 \0 \0 275 ` \0 \0 L ` \0 \0 M ( ` \0 \0 M
0013400 ` \0 \0 L ( * 277 * 277 L k 330 260 331 \0 (
0013420 1 4 0 Q R A N D 2 5 Q A R
0013440 R A Y 5 B O U N D P ) \r ( 1
0013460 6 1 Q D E C K 1 5 5 Q D E
0013500 C K 1 5 0 Q D E C K 1 4 4
0013520 Q D E C K 6 6 Q 004 003 C A R
0013540 D T Y P E # 5 7 Q D E C K
0013560 3 0 Q D E C K 2 2 Q P O I
0013600 N T E R 1 1 Q D E C K 2
0013620 D E C K ) \r N I L \r S O L I T A
0013640 I R E D 1 \r ( P 2 I P
0013660 0 G A M E V A L U E I 0
0013700 R E P L A Y ) \0 202 003 \0 \0 001 @ \t
0013720 \0 \0 m 316 021 001 \0 H \t \0 \0 277 k l \a 021
0013740 002 002 I J 361 263 036 ` \0 \0 J ( ` \0 \0 J
0013760 ( \t \0 \0 \n \0 \0 224 J 265 \v i 206 J k 331
0014000 272 260 341 h 022 263 = ` \0 \0 \t \0 \0 263 5 `
0014020 \0 \0 d \t \0 \0 \n \0 \0 263 ) 021 020 002 k Z
0014040 l \a 361 263 025 ` \0 \0 J ( \t \0 \0 224 J 265
0014060 \n i 205 J k 330 260 351 h 022 246 ` \0 \0 \t \0
0014100 \0 227 ` \0 \0 \t \0 \0 260 223 023 \b \0 \0 020 \0
0014120 ( 1 7 7 Q C O U N T C A R D S
0014140 1 7 1 Q D I S M I S S 1 6
0014160 2 Q F L I P S T A C K 1 3 6
0014200 Q M O V E S S S 1 1 2 Q M
0014220 O V E H S 1 0 7 Q H T O S ?
0014240 7 6 Q M O V E S S S 5 0 Q
0014260 M O V E S 4 5 Q S T O S ?
0014300 1 4 Q P O S T V A L U E 3
0014320 D E A L D E C K ) \r ( 1 6 6 Q
0014340 W a i t B e t w e e n M o v e
0014360 s 1 5 7 Q H A N D 1 3 1 Q
0014400 S T A C K S 1 0 3 Q H A N
0014420 D 7 3 Q H A N D 4 0 Q S
0014440 T A C K S 3 3 Q S T A C K S
0014460 ) \r N I L \r S T O S ? D 1 \r (
0014500 I 0 S N ) \0 & \0 \0 \0 001 @ 001
0014520 264 " @ d 002 001 263 024 001 \t \0 \0 001 006 \0 \0
0014540 311 002 l \r 360 h 360 264 \v @ 001 \t \0 \0 001 \t
0014560 \0 \0 020 \0 ( 4 3 Q S E A R C H S
0014600 T A C K S 3 7 Q L A S T 1
0014620 5 Q L A S T ) \r ( 2 1 Q C A
0014640 R D ) \r N I L \r T O P S U I T S
0014660 T A C K D 1 \r ( L ( 0 I )
0014700 ) \0 \a \0 \0 \0 001 ` \0 \0 @ ( 020 \0 N
0014720 I L \r ( 2 S U I T S T A C K S
0014740 ) \r N I L \r S O L O D 1 \r ( P
0014760 2 X I 0 S O L O W )
0015000 \0 g 003 \0 \0 001 g \0 \0 \t \0 \0 262 " ` \0
0015020 \0 005 006 262 033 l 4 j 021 002 001 I H 363 254 `
0015040 \0 \0 I j * 277 I k 324 Y 260 362 023 215 l 5
0015060 g \0 \0 j d \f \0 \0 027 \0 \0 277 021 020 002 \b
0015100 \0 \0 272 n 004 260 \t \0 \0 277 ` \0 \0 J ` \0
0015120 \0 J ( k 330 * 277 ` \0 \0 @ o \0 \0 \0 \v
0015140 \0 \0 277 n 004 260 \t \0 \0 277 260 325 \0 ( 1 4
0015160 2 Q D I S M I S S 1 3 3 Q
0015200 H I S T 1 0 2 Q D I S M I S
0015220 S 7 3 Q S O L I T A I R E
0015240 6 1 Q A R R A Y 5 B O U N
0015260 D P ) \r ( 1 2 3 Q S O L O R E
0015300 S U L T S 1 1 2 Q S O L O R
0015320 E S U L T S 1 0 6 Q S O L O
0015340 R E S U L T S 6 4 Q S O L O
0015360 R E S U L T S 5 4 Q F I X P
0015400 3 3 Q S O L O R E S U L T S
0015420 1 2 Q S O L O R E S U L T S
0015440 2 S O L O R E S U L T S ) \r
0015460 ( 1 3 0 Q " N u m b e r o
0015500 f c a r d s u p " ) \r H I S
0015520 T D 1 \r ( P 3 I P 1
0015540 V S P 0 H S I 2 L
0015560 I 1 D S I 0 A F 4
0015600 S O L O W ) \0 354 004 001 \0 003 h d
0015620 d T j d A g \0 \0 \n \0 \0 A g \0 \0 \n
0015640 \0 \0 g \0 \0 g \0 \0 j \r \v \0 \0 A g \0
0015660 \0 \n \0 \0 l ( 331 @ \t \0 \0 333 A g \0 \0
0015700 \n \0 \0 l ( 331 @ \t \0 \0 333 021 002 001 @ \t
0015720 \0 \0 @ \t \0 \0 k 331 330 @ \t \0 \0 021 002 003
0015740 K J 363 264 p 023 023 h d d A l 024 d A g
0015760 \0 \0 \n \0 \0 l ( 331 l 002 g \0 \0 g \0 \0
0016000 n 377 377 \r \v \0 \0 h d d A l 024 d l 002
0016020 A g \0 \0 \n \0 \0 l ( 331 g \0 \0 g \0 \0
0016040 n 377 377 \r \v \0 \0 g \0 \0 l \f \n \0 \0 A
0016060 \n \0 \0 A g \0 \0 \n \0 \0 B h A \n \0 \0
0016100 \n \0 \0 l 024 330 331 l \b A \v \0 \0 B A \n
0016120 \0 \0 020 d d A K H 332 l 024 330 l 024 H I
0016140 @ K ( 332 g \0 \0 g \0 \0 n Z Z \r \v \0
0016160 \0 277 K k 324 [ 261 377 k \0 ( 3 4 2 Q
0016200 B K B I T B L T 3 0 3 Q P R
0016220 I N 1 2 7 6 Q M O V E T O
0016240 2 6 4 Q S T R I N G W I D T H
0016260 2 6 1 Q D S P F O N T 2 5
0016300 3 Q G E T W I N D O W P R O P
0016320 2 4 4 Q D S P F O N T 2 4
0016340 0 Q F O N T C R E A T E 2 3
0016360 0 Q B K B I T B L T 2 1 0 Q
0016400 G E T W I N D O W P R O P 1
0016420 7 0 Q B K B I T B L T 1 4 6
0016440 Q G E T W I N D O W P R O P
0016460 1 1 6 Q A R R A Y O R I G 1
0016500 0 7 Q A R R A Y O R I G 1 0
0016520 3 Q A R R A Y S I Z E 7 3 Q
0016540 A R R A Y M A X 6 4 Q G E
0016560 T W I N D O W P R O P 5 4 Q
0016600 A R R A Y S I Z E 4 5 Q G E
0016620 T W I N D O W P R O P 3 6 Q
0016640 B K B I T B L T 2 3 Q G E T
0016660 W I N D O W P R O P 1 4 Q G
0016700 E T W I N D O W P R O P ) \r ( 3
0016720 3 3 Q R E P L A C E 3 3 0 Q
0016740 T E X T U R E 2 5 0 Q W I
0016760 D T H 2 3 3 Q H E L V E T I
0017000 C A 2 2 1 Q R E P L A C E
0017020 2 1 6 Q T E X T U R E 2 0 5
0017040 Q H E I G H T 1 6 1 Q R E
0017060 P L A C E 1 5 6 Q T E X T U
0017100 R E 1 4 3 Q W I D T H 6 1
0017120 Q H E I G H T 4 2 Q W I D
0017140 T H 3 1 Q R E P L A C E 2
0017160 6 Q T E X T U R E 2 0 Q H
0017200 E I G H T 1 1 Q W I D T H )
0017220 \r ( ) \r A R R A Y M A X D 1 \r
0017240 ( I 0 A ) \0 , 003 \0 \0 001 @ \t
0017260 \0 \0 @ \t \0 \0 k 331 330 @ \t \0 \0 j 021 003
0017300 002 I H 361 263 023 J @ I ( 375 363 223 @ I (
0017320 272 I k 330 Y 260 355 J 020 \0 ( 1 6 Q A
0017340 R R A Y O R I G 7 A R R A Y
0017360 O R I G 3 A R R A Y S I Z E
0017400 ) \r N I L \r N I L \r S H O W C O
0017420 N F I G D 1 \r ( P 1 I )
0017440 \0 _ 002 \0 \0 \0 o \0 \0 \0 \t \0 \0 277 l \n
0017460 \t \0 \0 l 003 j 021 002 001 I d H 363 262 034 023
0017500 \b \0 \0 021 020 001 k Y l \a 363 262 # 023 ` \0
0017520 \0 o \0 \0 \0 \n \0 \0 020 \t \0 \0 \t \0 \0 \t
0017540 \0 \0 277 k \t \0 \0 277 I k 324 Y 260 316 ` \0
0017560 \0 I ( o \0 \0 \0 I \n \0 \0 \n \0 \0 277 I
0017600 k 324 260 305 \0 ( 1 2 7 Q P R I N T
0017620 C A R D S T A C K 1 2 4 Q C
0017640 O N C A T 1 0 0 Q S P A C E
0017660 S 7 3 Q P R I N 1 7 0 Q
0017700 C A R D N A M E 6 5 Q T O P
0017720 S U I T S T A C K 6 1 Q P R
0017740 I N T C A R D S T A C K 3 4 Q
0017760 T E R P R I 1 4 Q T A B
0020000 6 P R I N 1 ) \r ( 1 1 2 Q S
0020020 T A C K S 5 2 Q H A N D ) \r
0020040 ( 1 2 0 Q " S t a c k "
0020060 5 6 Q " H a n d " 3 " S u
0020100 i t s : " ) \r P R I N T C A R
0020120 D S T A C K D 1 \r ( P 0 J
0020140 I 1 S I 0 X ) \0 G
0020160 001 \0 \0 002 A \t \0 \0 277 o \0 \0 \0 \t \0 \0
0020200 277 l \n \t \0 \0 277 o \0 \0 \0 @ 002 001 \t \0
0020220 \0 \n \0 \0 277 o \0 \0 \0 \t \0 \0 @ 001 260 025
0020240 d 001 021 001 \0 H \t \0 \0 \t \0 \0 277 k \t \0
0020260 \0 023 002 003 265 354 \b \0 \0 020 \0 ( 1 0 4 Q
0020300 T E R P R I 7 4 Q S P A C
0020320 E S 6 7 Q P R I N 1 6 4 Q
0020340 C A R D N A M E 4 7 Q P R
0020360 I N 1 3 7 Q P R I N T N U M
0020400 3 4 Q L E N G T H 2 1 Q
0020420 T A B 1 3 Q P R I N 1 3
0020440 P R I N 1 ) \r N I L \r ( 4 4 Q
0020460 " d o w n . U p : " 2
0020500 6 Q ( F I X 2 ) 1 0 Q "
0020520 : " ) \r C A R D N A M E D 1 \r
0020540 ( I 0 C ) \0 210 001 \0 \0 001 @ 006
0020560 \0 \0 311 002 021 001 \0 H j 360 265 \v H 005 003 264
0020600 006 H \t \0 \0 022 224 o \0 \0 \0 020 @ 006 \0 \0
0020620 311 \0 d j 360 225 277 g \0 \0 260 ! d k 360 225
0020640 277 g \0 \0 260 027 d l 002 360 224 277 g \0 \0 212
0020660 l 003 360 223 g \0 \0 202 \b \0 \0 @ 006 \0 \0 311
0020700 002 d k 360 225 277 g \0 \0 260 % d l \v 360 225
0020720 277 g \0 \0 260 032 d l \f 360 224 277 g \0 \0 215
0020740 l \r 360 223 g \0 \0 205 @ 006 \0 \0 311 002 h 032
0020760 032 \t \0 \0 020 \0 ( 2 0 5 Q P A C K
0021000 1 1 4 Q S H O U L D N T 2
0021020 6 Q \ F Z E R O P ) \r ( 1 7 5
0021040 Q C A R D 1 7 0 Q K 1 6
0021060 0 Q Q 1 4 5 Q J 1 3 2 Q
0021100 A 1 2 0 Q C A R D 1 1 0
0021120 Q H 1 0 0 Q D 6 5 Q C
0021140 5 3 Q S 4 1 Q C A R D
0021160 3 C A R D ) \r ( 3 4 Q " N
0021200 o n e " ) \r ( P R E T T Y C O M
0021220 P R I N T S O L I T A I R E C
0021240 O M S ) \r ( R P A Q Q S O L I
0021260 T A I R E C O M S ( ( F N S
0021300 C A R D I M A G E C O U N T C
0021320 A R D S C R E A T E H A N D
0021340 C R E A T E S T A C K D E A L
0021360 D E C K F L I P S T A C K G
0021400 E T C A R D \r G O O D M O V E
0021420 ? H T O S ? M O V E C A R D
0021440 D O M O V E M O V E H S M
0021460 O V E S M O V E S 1 U P C A
0021500 R D M O V E S S S N X T C A
0021520 R D P U S H C A R D P O S T
0021540 V A L U E \r S E A R C H S T A
0021560 C K S S H O W C A R D S T A C
0021600 K S H U F F L E D E C K S O
0021620 L I T A I R E S T O S ? T O
0021640 P S U I T S T A C K ) ( F N S
0021660 S O L O H I S T A R R A Y
0021700 M A X ) ( \r D E C L A R E :
0021720 D O N T C O P Y ( F N S S H
0021740 O W C O N F I G P R I N T C A
0021760 R D S T A C K C A R D N A M E
0022000 ) ) ( D E C L A R E : E V A
0022020 L @ C O M P I L E D O N T C O
0022040 P Y ( M A C R O S \r B O T T
0022060 O M K I N G P S T A C K T
0022100 O P ) ( R E C O R D S C A R
0022120 D C A R D S T A C K ) ( C O
0022140 N S T A N T S ( S p a d e s
0022160 0 ) ( C l u b s 1 ) ( D i
0022200 a m o n d s 2 ) ( H e a r t
0022220 s \r 3 ) ( C o s t O f D e c
0022240 k 5 0 ) ( P a y F o r C a r
0022260 d 5 ) ( N S t a c k s 7 )
0022300 ( N S u i t s 4 ) ( C a r
0022320 d s P e r S u i t 1 3 ) ( T
0022340 o t a l C a r d s 5 2 ) ) (
0022360 C O N S T A N T S \r ( B A C K
0022400 S H A D E 5 2 2 7 5 ) ( B e
0022420 t w e e n S t a c k s 3 ) (
0022440 O v e r l a p . 6 6 7 ) ( C
0022460 a r d W i d t h 3 0 ) ( C a
0022500 r d H e i g h t 4 5 ) ) ( G
0022520 L O B A L V A R S S T A C K S
0022540 \r H A N D S U I T S T A C K
0022560 S D E C K S O L O R E S U L
0022600 T S ) ( G L O B A L V A R S
0022620 M a x C a r d M o v e W a i t
0022640 B e t w e e n M o v e s ) ) (
0022660 I N I T R E C O R D S C A R D
0022700 \r C A R D S T A C K ) ( B I
0022720 T M A P S S p a d e s B i t s
0022740 C l u b s B i t s D i a m o
0022760 n d s B i t s H e a r t s B i
0023000 t s 1 0 B i t s ) ( V A R S
0023020 ( M a x C a r d M o v e 8 )
0023040 ( \r W a i t B e t w e e n M o
0023060 v e s 1 0 ) ( D E C K ) (
0023100 S O L I T A I R E W I N D O W )
0023120 ) ( A D D V A R S ( I D L E
0023140 . F U N C T I O N S ( " S o l
0023160 i t a i r e " ( Q U O T E S
0023200 O L O ) ) ) ) ) ) \r ( / D E C L
0023220 A R E D A T A T Y P E ( Q U O
0023240 T E C A R D ) ( Q U O T E
0023260 ( P O I N T E R P O I N T E R
0023300 P O I N T E R P O I N T E R
*
0023340 ) ) ( Q U O T E ( ( C A R D
0023360 \r 0 P O I N T E R ) ( C A
0023400 R D 2 P O I N T E R ) ( C
0023420 A R D 4 P O I N T E R ) (
0023440 C A R D 6 P O I N T E R )
0023460 ( C A R D 8 P O I N T E R )
0023500 ( C A R D 1 0 P O I N T E
0023520 R ) ) ) ( \r Q U O T E 1 2 )
0023540 ) \r ( R P A Q S p a d e s B i
0023560 t s ( R E A D B I T M A P ) )
0023600 \r ( 1 1 1 1 " @ D @ @ " "
0023620 @ N @ @ " " A O @ @ " " C O
0023640 H @ " " G O L @ " " G O L @
0023660 " " G O L @ " " C O H @ "
0023700 " @ D @ @ " " A O @ @ " " C
0023720 O H @ " ) \r ( R P A Q C l u b
0023740 s B i t s ( R E A D B I T M A
0023760 P ) ) \r ( 1 1 1 1 " @ D @ @
0024000 " " @ N @ @ " " A O @ @ "
0024020 " @ N @ @ " " B D H @ " " G
0024040 E L @ " " O O N @ " " G E L
0024060 @ " " B D H @ " " @ N @ @ "
0024100 " C O H @ " ) \r ( R P A Q D
0024120 i a m o n d s B i t s ( R E A
0024140 D B I T M A P ) ) \r ( 1 1 1 1
0024160 " @ D @ @ " " @ N @ @ " "
0024200 A K @ @ " " C A H @ " " F @
0024220 L @ " " L @ F @ " " F @ L @
0024240 " " C A H @ " " A K @ @ "
0024260 " @ N @ @ " " @ D @ @ " ) \r (
0024300 R P A Q H e a r t s B i t s
0024320 ( R E A D B I T M A P ) ) \r ( 1
0024340 1 1 1 " @ @ @ @ " " C A H
0024360 @ " " G K L @ " " D N D @ "
0024400 " D @ D @ " " F @ L @ " "
0024420 C A H @ " " A K @ @ " " @ N
0024440 @ @ " " @ D @ @ " " @ @ @ @
0024460 " ) \r ( R P A Q 1 0 B i t s
0024500 ( R E A D B I T M A P ) ) \r ( 2
0024520 0 1 8 " @ @ @ @ @ @ @ @ "
0024540 " @ F @ G L @ @ @ " " @ N @ O
0024560 N @ @ @ " " G N A L G @ @ @ "
0024600 " G N A H C @ @ @ " " @ F A
0024620 H C @ @ @ " " @ F A H C @ @ @
0024640 " " @ F A H C @ @ @ " \r " @
0024660 F A H C @ @ @ " " @ F A H C @
0024700 @ @ " " @ F A H C @ @ @ " "
0024720 @ F A L G @ @ @ " " @ F @ O N
0024740 @ @ @ " " @ F @ G L @ @ @ "
0024760 " @ @ @ @ @ @ @ @ " " @ @ @ @
0025000 @ @ @ @ " " @ @ @ @ @ @ @ @ "
0025020 \r " @ @ @ @ @ @ @ @ " ) \r ( R
0025040 P A Q Q M a x C a r d M o v e
0025060 8 ) \r ( R P A Q Q W a i t B
0025100 e t w e e n M o v e s 1 0 ) \r
0025120 ( R P A Q Q D E C K N I L )
0025140 \r ( R P A Q Q S O L I T A I R
0025160 E W I N D O W N I L ) \r ( A D
0025200 D T O V A R I D L E . F U N C
0025220 T I O N S ( " S o l i t a i r
0025240 e " ( Q U O T E S O L O ) )
0025260 ) \r ( P U T P R O P S S O L I
0025300 T A I R E C O P Y R I G H T
0025320 ( " X e r o x C o r p o r a t
0025340 i o n " 1 9 8 2 1 9 8 5 ) )
0025360 \r N I L \r
0025365