// creator  : weidu.exe (version 23100)
// argument : CROGAM01.DLG
// game		 : .
// source	 : ./DATA/DIALOG.BIF
// dialog	 : ./DIALOG.TLK
// dialogF  : (none)

BEGIN ~CROGAM01~ 2 // non-zero flags may indicate non-pausing dialogue

IF ~GlobalLT("WinnerRoulette","GLOBAL",100)
~ THEN BEGIN 0 // from:
  SAY #45282 /* ~Step up, step up, and test your luck upon the wheel. A simple game with simple goals!~ */
  IF ~~ THEN REPLY #45283 /* ~What is the game?~ */ GOTO 2
  IF ~~ THEN REPLY #45284 /* ~I will play. What are the wagers?~ */ GOTO 2
  IF ~~ THEN REPLY #45285 /* ~Thanks, but no thanks.~ */ GOTO 1
END

IF ~~ THEN BEGIN 1 // from: 2.7 0.2
  SAY #45286 /* ~Step back then, and make room for men and women that have courage and faith in their gaming skill. The door is that way.~ */
  IF ~~ THEN EXIT
END

IF ~~ THEN BEGIN 2 // from: 0.1 0.0
  SAY #45287 /* ~A wheel of roulette, from the southern climes. Simple in its form, you lay your money and take your chances. 1 will get you 32!~ */
  IF ~PartyGoldGT(0)
RandomNum(34,1)
~ THEN REPLY #45288 /* ~1 gold is my wager.~ */ DO ~TakePartyGold(1)
~ GOTO 4
  IF ~PartyGoldGT(0)
!RandomNum(34,1)
~ THEN REPLY #45289 /* ~1 gold is my wager.~ */ DO ~TakePartyGold(1)
~ GOTO 3
  IF ~PartyGoldGT(4)
RandomNum(34,1)
~ THEN REPLY #45290 /* ~5 gold is my wager.~ */ DO ~TakePartyGold(5)
~ GOTO 5
  IF ~PartyGoldGT(4)
!RandomNum(34,1)
~ THEN REPLY #45291 /* ~5 gold is my wager.~ */ DO ~TakePartyGold(5)
~ GOTO 3
  IF ~PartyGoldGT(9)
RandomNum(34,1)
~ THEN REPLY #45293 /* ~10 gold is my wager.~ */ DO ~TakePartyGold(10)
~ GOTO 6
  IF ~PartyGoldGT(9)
!RandomNum(34,1)
~ THEN REPLY #45294 /* ~10 gold is my wager.~ */ DO ~TakePartyGold(10)
~ GOTO 3
  IF ~~ THEN REPLY #45304 /* ~I cannot afford to play. Can you spot me a round or two of the wheel?~ */ GOTO 11
  IF ~~ THEN REPLY #45292 /* ~I've changed my mind. I don't want to play.~ */ GOTO 1
END

IF ~~ THEN BEGIN 3 // from: 2.5 2.3 2.1
  SAY #45296 /* ~Round and round the spire she goes, and where she stops, Tymora knows.~ */
  IF ~~ THEN GOTO 10
END

IF ~~ THEN BEGIN 4 // from: 2.0
  SAY #45297 /* ~Round and round the spire she goes, and where she stops, Tymora knows.~ */
  IF ~~ THEN GOTO 7
END

IF ~~ THEN BEGIN 5 // from: 2.2
  SAY #45298 /* ~Round and round the spire she goes, and where she stops, Tymora knows.~ */
  IF ~~ THEN GOTO 8
END

IF ~~ THEN BEGIN 6 // from: 2.4
  SAY #45299 /* ~Round and round the spire she goes, and where she stops, Tymora knows.~ */
  IF ~~ THEN GOTO 9
END

IF ~~ THEN BEGIN 7 // from: 4.0
  SAY #45300 /* ~Ladies and gentlemen, we have a winner at the table! A bet of 1 has returned 32! See how easy it is! Step up!~ */
  IF ~~ THEN DO ~GiveGoldForce(32)
IncrementGlobal("WinnerRoulette","GLOBAL",1)
~ EXIT
END

IF ~~ THEN BEGIN 8 // from: 5.0
  SAY #45301 /* ~A winner! A bet of 5 has returned 160! A fortune in an instant for any working man or woman! Step up!~ */
  IF ~~ THEN DO ~GiveGoldForce(160)
IncrementGlobal("WinnerRoulette","GLOBAL",2)
~ EXIT
END

IF ~~ THEN BEGIN 9 // from: 6.0
  SAY #45302 /* ~Astounding! The house pays out the maximum! 10 has given 320! See how fortunes are made! Step up!~ */
  IF ~~ THEN DO ~GiveGoldForce(320)
IncrementGlobal("WinnerRoulette","GLOBAL",5)
~ EXIT
END

IF ~~ THEN BEGIN 10 // from: 3.0
  SAY #45303 /* ~The Lady giveth, and the Lady taketh away. No winner, step back.~ */
  IF ~~ THEN EXIT
END

IF ~~ THEN BEGIN 11 // from: 2.6
  SAY #45305 /* ~Step back from the table before I have you removed. Don't waste my time, <BROTHERSISTER>.~ */
  IF ~~ THEN EXIT
END

IF ~GlobalGT("WinnerRoulette","GLOBAL",99)
~ THEN BEGIN 12 // from:
  SAY #45306 /* ~Sorry, my friend, but you and any you travel with are no longer allowed at the table. Someone wins too much and people start calling foul. No chances taken here.~ */
  IF ~~ THEN EXIT
END
