; ===================================
; QGO Market Def NPC File : 9Ega-B139
; Gambling House - Dark Seal room (39th)
; -----------------------------------
; 6 July 2003 (Xerxes)
;   - Added New text
; ===================================
[@main]
#IF
	equal p9 0
#ACT
	goto @main-1
	BreakTimeRecall 
	break

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

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

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


; -----------------------------------
[@main-1]
#IF
#ACT
	mov p9 0
#SAY
		;! <$USERNAME>.\ 
		;̹  39°, ǺιԴϴ. \
		; ̵  Ǵ ָ εǾ ֽϴ. \
		;<$USERNAME> ø   ... \
		;Ƶƿð ôٸ  ġʽÿ.. \
		;  ι濡 5    ø \
		;ֻ  ִ ȸ 帮ڽϴ. \  \
;-------------NEW TEXT-------------------
Welcome, <$USERNAME>!\
You are in the 39th room, the Room of the Dark Seal.\
I will send you on a road to darkness, to find a Zumataurus\
that has been sealed within a compartment. When you get there,\
you will break the seal. If you want to live, then run away...\
You have 5 minutes to return with your life from that dark place\
and you can then continue on your gambling journey.\\
;-----------END NEW TEXT-----------------
		;<  /@pena1>
<Continue/@pena1>


; -----------------------------------
[@pena1]
#IF
#ACT
	mov p9 1
	TimeRecall 5
	mapmove T139 18 25


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



; -----------------------------------
[@race]
		;      ϼ̱.. \ 
		;  ֻ  ִ ȸ 帮ڽϴ. \  
		;׷  ϴ. \ \ 
;-------------NEW TEXT-------------------
Congratulations, you have completed the task!\
Very well, you may now use another gambling chip and\
throw your next dice! Good luck!\\
;-----------END NEW TEXT-----------------
		;<  /@pre_cube>
<Throw the Dice/@pre_cube>



; -----------------------------------
[@pre_cube]
#IF
	checkitem GambleChip 1
#ACT
	take GambleChip 1
	mov p9 2
	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]
#SAY
		;ֻ  <$STR(D0)>  Դϴ. \ 
		; <$STR(D0)> ŭ  ̵  帮ڽϴ. \ \  
;-------------NEW TEXT-------------------
The dice has stopped on a <$STR(D0)>! That means that you\
can move along <$STR(D0)> rooms!\\
;-----------END NEW TEXT-----------------
		;<  /@next_cube>  
<Move/@next_cube>


; -----------------------------------
[@next_cube]
#IF
	equal d0 1 
#ACT
	goto @posi1
	break

#IF
	equal d0 2 
#ACT
	goto @posi2
	break

#IF
	equal d0 3 
#ACT
	goto @posi3
	break

#IF
	equal d0 4 
#ACT
	goto @posi4
	break

#IF
	equal d0 5
#ACT
	goto @posi5
	break

#IF
	equal d0 6 
#ACT
	goto @posi6
	break


; -----------------------------------
[@Posi1]
#IF
#ACT
	batchDelay 1
	addbatch B140
	batchmove

[@Posi2]
#IF
#ACT
	batchDelay 1
	addbatch B140
	addbatch B101
	batchmove

[@Posi3]
#IF
#ACT
	batchDelay 1
	addbatch B140
	addbatch B101
	addbatch B102
	batchmove

[@Posi4]
#IF
#ACT
	batchDelay 1
	addbatch B140
	addbatch B101
	addbatch B102
	addbatch B103
	batchmove

[@Posi5]
#IF
#ACT
	batchDelay 1
	addbatch B140
	addbatch B101
	addbatch B102
	addbatch B103
	addbatch B104
	batchmove

[@Posi6]
#IF
#ACT
	batchDelay 1
	addbatch B140
	addbatch B101
	addbatch B102
	addbatch B103
	addbatch B104
	addbatch B105
	batchmove

