File CRAPS.SV (save files (Executable program)

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

?>2C8H$MP8B=!0BFPC<CT[0BGPMXN)D.T0BHPPHTH)A,?0BPPPXHTH)A,?0BRPZXT)F.+0BS=A=1P]<K< =!)A)90BUPMXN)D/D0BV=A=1P^<K< =!0BWPCT[0BXPPXHTH)A,?0D=A=1P
<K< =!0DAPCT[0DBPPHTH)A,?0DD=A< 0DE=A=1P <K< =!0DF=A=1P!<K< =!)A/=0DH=A=1P"<K< =!0DI=A=1Y=A< 0!PL\D=NHLXDDM)F(]0"PC<CTN0=A=1PK<K< =!0$=A< 0%=A< )A(10	PCTN0(=A=1PL<K< =!0)=A< 00=A< 01PMTO02=A=1PM<K=!03=A<ITP04=A=1PN<K< =!05=A< 06PP=NXP)F)"07=A< 08=A=1PO<K<
=!)A(50APMXP)F/-0AAPCHXP)E)90AB=A=1PP<K< =!)A(50A=A=1PA<K< =!0B=A=1PB<K< =!0C=A=1PC<K< =!0D=A=1PD<K< =!0E=A< 0F=A=1PE<K< =!0G=A=1PF<K< =!0H=A=1PG<K< =!0I=A< 0P=A< 0Q=A=1PH<K=!0R=A<ITD0SPDTFPCDF)D	]FTE0TPE>NTGPC<AE)A	N0VPE>NHKJ=NHITH0W=A=1PI<K=!PH<J=1PJ<K<
=!0X=A< 0Y=A< 0!PL\D=NHLXDDM)F(]0"PC<CTN0=A=1PK<K< =!0$=A< 0%=A< )A(10	PCTN0(=A=1PL<K< =!0)=A< 00=A< 01PMTO02=A=1PM<K=!03=A<ITP04=A=1PN<K< =!05=A< 06PP=NXP)F)"07=A< 08=A=1PO<K< =!)A(50APMXP)F/-0AAPCHXP)E)90AB=A=1PP<K< =!)A(50ADPC>NHRC=NTQ0AEPL>NHRC=NTS0AF
COTO0AGPSQTT0AHPMXN)D**0AI=A=1PQ<K=!PQ<J=1PR<K=!PS<J)A*90AQ=A=1PS<K=!PQ<J=1PR<K=!PS<J0ARPCXO)C-40ASPLXTTVPUXTHVTXPWXTHXDM)F,A0ATPYXTTVPKXTHVDM)F,!0AUPMXN)D+*0AV=A=1PT<K=!PT<J)A+30AX=A=1PU<K=!PT<J0AY=A=1PV<K< =!0A PTTZ)A)90A"=A=1PW<K< =!0APCT[0A$PMXN)D,Z0A
PPHTH)A,?0A	PPXHTH)A,?0A)=A=1PX<K< =!0A0PCT[0A1PMXN)D,:0A2PPXHTH)A,?0A4PPHTH0A5=A< 0A6PCXH)E/W0A7=A=1PY<K=!PH<J=1PZ<K< =!0A8PMX[)D-)0A9=A=1P[<K< =!0B=A< 0BAP[HNTN0BBPMTO)A(50BDPYXT)C.[0BE=A=1P\<K< =!0BFPC<CT[0BGPMXN)D.T0BHPPHTH)A,?0BPPPXHTH)A,?0BRPZXT)F.+
BS=A=1P]<K< =!)A)90BUPMXN)D/D0BV=A=1P^<K< =!0BWPCT[0BXPPXHTH)A,?0D=A=1P
<K< =!0DAPCT[0DBPPHTH)A,?0DD=A< 0DE=A=1P <K< =!0DF=A=1P!<K< =!)A/=0DH=A=1P"<K< =!0DI=A=1P<K< =!<!?EANY OTHER NUMBER ROLLED BECOMES YOUR 	POINT	 . YOU CONTINUE ?FTO ROLL...IF YOU GET YOUR POINT, YOU WIN. IF YOU ROLL A 7,?GWITH THE COMPUTER AS YOUR OPPONENT
 THE RULES ARE SIMPLE: ?ITHANKS FOR THE GAME.....BETTER LUCK NEXT TIME, PARDNER! ?LWHAT NUMBER BETWEEN 1 AND 711 IS LUCKY FOR YOU TODAY?NYOU LOSE. THE DICE CHANGE HANDS WHEN THIS HAPPENS.?NYOU HAVE RUN OUT OF MONEY....SORRY ABOUT THAT.....?SDON	T TRY TO B
T MORE THAN YOU HAVE, PLEASE!! ?TFOR BEING ABLE TO QUIT WHILE YOU WERE AHEAD.?UTHANKS FOR THE GAME.....AND CONGRATULATIONS ?W   *A 2, 3, OR 12 ON THE FIRST ROLL LOSES ?YNO COINS PERMITTED..JUST BILLS, PLEASE! ?\   *A 7 OR 11 ON THE FIRST ROLL WINS?".....L
T	S ROLL 	EM AGAIN.....?%SPLENDID.....YOU ARE GIVEN  ?	HOW MUCH DO YOU BET ($$)  ?(AND MAKE YOUR POINT.....?*AND MAKE MY POINT.....?+DOLLARS TO PLAY WITH. ?,I	LL ROLL FIRST.....?,CHANGE DICE NOW.....?-YOU ROLL FIRST..... ?....ROLL AGAIN.....?/DOLLARS LEFT
.... ?0SO YOUR POINT IS?1AND CRAP OUT... ?2SO MY POINT IS?3YOU NOW HAVE  ?3AND PASS..... ?3AND LOSE..... ?7CRAP GAME ?8  I ROLL?8YOU ROLL?9OK..... ?=AND /?2Q>88(2Q?71!2Q?G5\2Q?\412Q?W0$2Q?E1C2Q?F272Q?N2\2Q?L5?2Q?%652Q?+7A2Q?,7W2Q?-6N2Q?	882Q?95G2Q?Y3+2Q?S
.2Q?88=2Q?=832Q?88H2Q?2762Q?05/2Q?"7?2Q?18X2Q?38P2Q?37,2Q?/7L2Q?,8 2Q?37"2Q?.6)2Q?*6\2Q?(3Q2Q?N1?2Q?I4Z2Q?U4C2Q?TAPCTDTDVBPCXBXDXC\ [4B)GBJ0D$ P\UDP UC$C [6"UE$] [6"T:(!?B0D%0=A=1Q=<K=!P"<J=1P2<K=!P$<J=1Q><K=!P\<J=1P2<K=!P <J=1Q?<K0A =A=1PA<K< =!0A0=A< 0A
=A=1PB<KHC=!0AA =1PCDD=!)FD"0AA0=A< 0AB=A=1PE<K< =!0ABP=A=1PF<K< =!0AD=A< 0ADP=A=1PG<K< =!0AD =A=1PH<K< =!0AD0=A=1PI<K< =!0AE6 OI* CA7NCO"M&J3SGZ2 3CA*M2I7J3P> 7COIZ&I*/CA7NCO"M&J7JOM* CI6(SO3YWP*I>I7DSE3E7R3IWJ2 [I6 WO7TWP3T& 7SR 7OB T7P2JFI+NCD.(^7"0&I2
[I2 ?S*.:.3D;O*	CT7OSU7PSU* CA^7Z6JRI+ACD6(B-T7P6JNI+ZCA3CGL"M&J3TSA. J("3&22I:/+OCT7PCT*.:.7OSU7PSU6 +^6 OA2 ?EF*M2I7J<H*.K?XHK>XI2I\H\H\H2A2J	=HLI<(*
ZV:A2J	<B	;JV8A2I\H2A*N:A2J	<B9H*(J8A2I\H2A2J	<I2IO:2A
9/8888<99DBRTSSVBASICAFBASICSFBASICFFBASICUFO7C 9H8J< /L2AK18F8DC K+[Z2AO/8[ZK\
/8O/<K"K0> ++KZ
/S1+S2A: K1/L9"LA7]O?0>O7\??:I:N>G;JB?82>CH(ZF	?\?>.S$*P	?\P2ISNO>C=K<2A>(O;K:> +&K%>(JKXZ2QO+Z29O+[JJ
+2QKJ
+S+* 2A9VJ
;8AJ
9O9
8SN	7JG?HJO"^OS"ROS*;K6
5K6
4HY8H9TXY/32J	2GA/4K$>("K1
5K0
4/52Q:,:+8?8?2Q%900 ;X?6??AK/C!K.[!*6>CP A2K"G?B>E>,G9L?W?QM->"=8G8?0>G

Note: Lines longer than 256 characters were wrapped



Feel free to contact me, David Gesswein djg@pdp8online.com with any questions, comments on the web site, or if you have related equipment, documentation, software etc. you are willing to part with.  I am interested in anything PDP-8 related, computers, peripherals used with them, DEC or third party, or documentation. 

PDP-8 Home Page   PDP-8 Site Map   PDP-8 Site Search