; ===================================
; QGO Market Def NPC File : 9Ega-B108
; Gambling House - 1st Windy Room (8th)
; -----------------------------------
; 6 July 2003 (Xerxes)
;   - Added New text
; ===================================
[@main]
#IF
	equal p9 0
#ACT
	goto @main-1
	BreakTimeRecall 
	break

#IF
	equal p9 1
#ACT
	goto @cube
	BreakTimeRecall 
	break

#IF
	equal p9 9
#ACT
	goto @quit
	BreakTimeRecall 
	break



; -----------------------------------
[@main-1]
#IF
#ACT
	mov p9 0
#SAY
		;! <$USERNAME> \
		;̰  8°Դϴ \
		;̰ ֻ  4̻   6ĭ  ̵ \
		;ϽǼ ,    ڰ ð \
		; ŭ ̵ ϽǼ ֽϴ. \ \
;-------------NEW TEXT-------------------
Hello, <$USERNAME>!\
Welcome to the first Windy Room, and the 8th room of\
Ma-Bang-Jin! When you throw your dice, if its value is\
more than 4, you can move 6 rooms forward; if less than\
4, you will move that number of rooms as shown on the dice.\\
;-----------END NEW TEXT-----------------
		;<ֻ /@next>
<Throw the Dice/@next>


; -----------------------------------
[@next]
#IF
	checkitem GambleChip 1
#ACT
	take GambleChip 1
	mov p9 1
	movr d0 6
	inc d0 1
	playdice 1 @cube
#SAY
		;ֻ  ֽϴ. \ \
;-------------NEW TEXT-------------------
The dice has been thrown....\\
;-----------END NEW TEXT-----------------
		;<  /@cube>
<Continue/@cube>

#ELSESAY
		;<$USERNAME>, а Ѱ ó׿. \
		;  ϱ ؼ а ʿ ϰŵ \
		; а  ̻  Ҽ ׿.. \ 
		;а غ ǰŵ ٽ .. \ \
;-------------NEW TEXT-------------------
Oh dear, <$USERNAME>, you don't seem to have any gambling\
chips left... You cannot continue without them. Please return\
when you have acquired some more!\\
;-----------END NEW TEXT-----------------
		;<  /@Quit>
<Leave the Game/@Quit>

#ELSEACT
	mov p9 9


; -----------------------------------
[@cube]
#IF
	large d0 3
#SAY
		; ֻ ڴ <$STR(D0)> Դϴ. \
		; ڰ 4 ̱ ׷ 6ĭ  ̵ \
		; 帮ڽϴ. \ \
;-------------NEW TEXT-------------------
You have thrown a <$STR(D0)>; since that number is\
higher than 4, you will be moved forward 6 rooms.\\
;-----------END NEW TEXT-----------------
		;<  /@move>
<Continue/@move>

#ELSESAY
		;ֻ  <$STR(D0)>  Դϴ. \
		; <$STR(D0)> ŭ  ̵  帮ڽϴ. \ \
;-------------NEW TEXT-------------------
You have thrown a <$STR(D0)>; you will therefore be\
moved forward <$STR(D0)> rooms.\\
;-----------END NEW TEXT-----------------
		;<  /@next_cube>
<Continue/@next_cube>


; -----------------------------------
[@next_cube]
#IF
	equal d0 1 
#ACT
	batchDelay 1
	addbatch B109
	batchmove
	break

#IF
	equal d0 2 
#ACT
	batchDelay 1
	addbatch B109
	addbatch B110
	batchmove
	break

#IF
	equal d0 3 
#ACT
	batchDelay 1
	addbatch B109
	addbatch B110
	addbatch B111
	batchmove
	break


; -----------------------------------
[@Quit]
#IF
#ACT
	map B011


; -----------------------------------
[@move]
#IF
#ACT
	batchDelay 1
	addbatch B109
	addbatch B110
	addbatch B111
	addbatch B112
	addbatch B113
	addbatch B114
	batchmove

