File ROULET.SV (save files (Executable program)

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

?>2C8H OP8B<K< =!)A-0AH=A<ITO)A%-0AHP=A<ITT)A%30AH =A<ITX)A%90ALPTD)A%?0ALPPTE)A&E0AL PTF)A&K0AL0=A<ITO<ITQ)A&&0AM=A<ITT<ITU)A&,0AMP=A<ITX<ITY)A&20AM P*TD)A&80AM0P*TE)A&>0ANP*TF)A	D0ANP=A<ITO<ITQ<ITR<ITS)A	[0AP=A<ITT<ITU<ITV<ITW)A	!0APP=A<ITX.6B86 KP7ISN6
^"3A;N7AB 7L	A2 ?S+MCE7MKO/E>?*?"?7TCY/EF 2 ?F7R& +ECS20Z +OCR+N	O*"B;.MZJ*8B57ICN+UCTQ*M.6V92 [I. 7Q61R 3H;E. F3" *M.9B06 SS+OCP.M&J*1B03P	R+NCT2"C7ESA+ECR7YWO2 GH+VCE7BSE3TSE2 ?M+RCE3C	H+PCS3TGH7N& +OCU3O;W*.B"0A=A=1PA<K< =!0B=A=1PB<K< =!0C=A=1PC<K< =!0
=A=1PD<K< =!<Q0"PCTD0PCTE0$PCTF0)=A< 00PHTG01PJTI02PJTK03PJTL05PNTM06PPTO07PPTQ08PPTR09PPTS0APPTT0AAPPTU0ABPPTV0ACPPTW0ADPPTX0AEPPTY0AFPPTZ0AGPPT[0AHPJT\0AIPJT]0APPJT^0AV=A< 0A =A=1PE<K=!0A5PNXM)F0K0A7=A< 0BEP
XM)F0R0BG=A< 0BPPCXM)F0Y0BR=A< 0DT=A< 0DU=A=1PF<K< =!0DW=A=1PG<K< =!0D =A<IT 0D!=A< 0D"=A< 0D%PCX )F%X0D0P
X )F&Q0D5P!X )F	F0E=A=1PH<K< =!)A$
0E =A=1PI<K=!0E!=A< 0E"=A< 0E%PNXM)F->0E0P
XM)F.E0E5PCXM)F.L0FUPNXM)F.S0HEP
XM)F.Y0HUPCXM)F.
)A	90H)=A< 0H0=A=1PJ<K=!0H1=A< 0H2=A< 0H5PNXM)F.%0IP
XM)F..0IEPCXM)F.70IPPNXM)F/0IUP
XM)F/F0I0PCXM)F/L)A	90J=A=1PK<K=!0JA=A< 0JB=A< 0JEPNXM)F/R0JPP
XM)F/
0JUPCXM)F/,0LPPNXM)F/90LUP
XM)F/?0L PCXM)F0E0L%PHILDT$PHKLE$T%PHLLF%T"0L(P"XGDJ)E-$0MPPCXMTM0M PJXM)F).0M)=A< 0M0=A=1PL<K< =!0M1=A=1PM<K=!0N=A=1HN=!0NA=A< 0NB=A< 0NC=A< 0NE=1PNDO=!)F60NP=A=1PP<K=!P"<J=1PQ<K=!P"XG<J=1PR<K< =!0NQ=A< 0NR=A< 0PPC>NH	=NT&)A)60PU=A=1PS<K< =!0P =A=1PT<K< 
!0P!=A< 0P"=A< 0P=A< 0Q=A=1PU<K=!P&<J< 0U0POX&T$PQX&H$T%PRX&H%T(PSX&H(DJ)F+>0VPTX&T$PUX&H$T%PVX&H%T(PWX&H(DJ)F,E0VPPXX&T$PYX&H$T%PZX&H%T(P[X&H(DJ)F,L0VQP]\^DJ)D,Q0VR=A< 0VS=A< 0X=A=1PV<K< =!0XEP"XGTG0XF=A< 0XP=A=1PW<K=!PG<J=1PR<K< =!)A-M0X0PIHDT\)A*	0X5PK
ET])A*:0YPLHFT^0YEP]\^T)0YPP)GD"TG0YQ=A< 0YR=A< 0Y =A=1PX<K=!P)<J=1PY<K< =!0Y!=A< 0Y0=A=1PW<K=!PG<J=1PY<K< =!0Y1=A< 0Y2=A< 0Z=A< =1PZ<K=!0ZE=A=1HN=!0ZU=1PNDO=!)F"&<!0$P=A=1P[<K< =!0$R=A=1P\<K< =!0$U=A=1P]<K< =!)A-0AH=A<ITO)A%-0AHP=A<ITT)A%30AH =A<ITX)A%90
LPTD)A%?0ALPPTE)A&E0AL PTF)A&K0AL0=A<ITO<ITQ)A&&0AM=A<ITT<ITU)A&,0AMP=A<ITX<ITY)A&20AM P*TD)A&80AM0P*TE)A&>0ANP*TF)A	D0ANP=A<ITO<ITQ<ITR<ITS)A	[0AP=A<ITT<ITU<ITV<ITW)A	!0APP=A<ITX<ITY<ITZ<IT[)A		0AP P+TD)A	-0AP0P+TE)A	30AQP+TF)A	90AQP=A<ITI)A$G0AQ =A<ITK)
$Q0AQ9=A<ITL)A$
<!?ITHIS IS A GAME OF ROULETTE. YOU HAVE 100 CHIPS TO START ?JFOR EVERY SPIN OF THE WHEEL .YOU CAN BET ON ANY NUMBER?KTHE CASINO TAKES ALL AND SENDS YOU AWAY. GOOD RIDDENS ?KHOW MANY NUMBERS (1,2,OR 4) DO YOU WISH TO COVER WITH ?LWITH WHICH YOU CAN BET. Y
U CAN ONLY BET THREE TIMES?MDO YOU WANT TO PLACE ANY MORE BETS BEFORE THE WHEEL ?NHOW MANY CHIPS DO YOU WANT TO PLACE ON EACH SQUARE?PYOUR ODDS ARE 5 TO 1, WHAT ARE YOUR FOUR NUMBERS?PCHEATER YOU HAVE BETTED MORE CHIPS THAN YOU OWN.?RYOUR ODDS ARE 10 TO 1
 WHAT ARE YOUR 2 NUMBERS?TPLEASE THINK AGAIN, YOU CAN ONLY PICK1,2,OR4?VYOUR ODDS ARE 20 TO 1, WHAT IS YOUR NUMBER?XI AM SORRY, YOU PICKED THE WRONG NUMBERS?ZYOU HAVE NOW COMPLETED YOUR THREE BETS? NOW THE ROULETTE WHEEL WILL SPIN?CONGRATULATIONS, YOU HAV
 WON ?*PLAY AGAIN ? [Y OR N] ?*ONE BET(PICK ONLY ONE)?1CHIPS, YOU HAVE ?2THE NUMBER IS ?2SPINS[Y OR N] ?3FROM 0 TO 20. ?4YOU NOW HAVE?6CHIPS LEFT?9YOU BET ?;CHIPS ?=BYE ??Y 0"2Q>81L2Q?I2=2Q?L1)2Q?J7?2Q?3332Q?N2!2Q?K7Z2Q?*5W2Q?T5.2Q?V4?2Q?R4M2Q?P3X2Q?M772Q
21G2Q?88 2Q??8T2Q?97&2Q?18N2Q?66Y2Q?Z6-2Q? 7/2Q?26D2Q?X8G2Q?46>2Q?8Y2Q?;7N2Q?*4&2Q?P2E2Q?K8]2Q?=APGYBXEUBPCPETET9&YDTCT%\K$0H9B<JZMFK8N*KFS<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/52Q9<9;8!8!2Q!11K1K ;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