5 public domain software, programmed by Roger MillerS ,: P: ,,: :[ Fr (((,,)))FACE(,)" "FACE(,)" "()" "$FACE(,)" ".FACE(,)" "()" "8FACE(,)" "BFACE(,)" "()" ":LFACE(,)" "()" "ZVFACE(,)" "()" "z`FACE(,)" "()" "jFACE(,)" "()" "()" "tFACE(,)" "~FACE(,)" "()" "()" " FACE(,)" "()" "()" "*FACE(,)" "()" "RFACE(,)" "()" "()" "zFACE(,)" "()" "()" "FACE(,)" "()" "()" "FACE(,)" "()" "()" "  "Welcome to the CRAPS game table. Do you know the rules?";K$ $()% " "E K$ "y" K$ "Y"  "This, my friends, is a little game of chance known to some" "of you as CRAPS. Just so we don't have any arguments, " "here are the house rules."+  "This is a dice game, so just to keep everything honest, "H "I'll roll for you. " "If you get a 2 or 12 on the first roll, you lose."( "If you get a 7 or 11 on the first roll, you win."2 "If you get any other number on the first roll, "< "that number is called your point."]F "Then you roll again. This time you are trying to roll "P "the same number as on your first roll. That's called "Z "making your point. If you roll your point, you win. "d "If you roll a seven, you lose."?n "If you roll any other number, you keep on rolling."kx "GOOD LUCK. ..... You'll need it! " "How much is your bank (2-500000)"; BANK BANK   BANK   BANK $t  "How much do you want to bet on this roll ";  BET8 BET BANK _ "No credit at this casino, Bud "i  BET    I ( )J ( )K I J " ,: "First throw - ";I;" and ";J;" makes ";K;&, K  J:6 " Big seven."D@ &WJ K  hlT " Snake eyes."v^ h K  r " Boxcars."|  K   " Big eleven." & " your point."PT K  "Roll again."$I ( );J ( )IK I JS  ,: "Next throw - ";I;" and ";J;" makes ";K; K   " Big seven. You crapped out."  K PT  " your point."& "You win."0WIN WIN J: WIN  "When you're hot, you're hot."_D LOSE  bN "Those drinks cost you two dollars each."XBANK BANK  ( LOSE  )bLOSE lBANK BANK BETv  "You lose."LOSE LOSE I LOSE  LOSE;" times in a row ... Have a drink on us." WIN  "And when you're not, you're not."WIN BANK BANK BET "You now have $";BANK BANK $t  "You broke the bank. The men behind you will escort you out."!7 BANK  W "You're broke. Goodby."d "MENU" ,: " " :print the dice faces  L   ,  FACE(I,L);* ,4 " ";> ,H FACE(J,L);R , \ " " f L p