; ===================================
; QGO Market Def NPC File : 9Ega-B132
; Gambling House - Evil Tongs Room (32nd)
; -----------------------------------
; 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>.\ 
		;̹  32°, ԹԴϴ. \
		; ο     ȥ Ÿ Թ \
		;ڶ󳪰 ֽϴ. Թʹ      \
		;̵鿡Լ 3е  ƿʽÿ. Ͻôٰ  \
		; Ҿ 𸨴ϴ. ε Ͻñ.. \ \
;-------------NEW TEXT-------------------
This, <$USERNAME>, is an evil place!\
From here, the 32nd room, you will be taken to a dark and\
deep valley overrun by Evil Tongs. These are not normal ones,\
however, but are imbued with a spirit of strength never before\
encountered. You must go there and survive for three minutes\
before returning here to me. Be very careful, or the breath\
you take may be your last!\\
;-----------END NEW TEXT-----------------
		;<  /@Pena1>
<Send Me There/@Pena1>


; -----------------------------------
[@Pena1]
#IF
#ACT
	mov p9 1
	TimeRecall 3
	map T132


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



; -----------------------------------
[@race]
		;Թ濡 Ƶƿ̱.  Ͻʴϴ. \
		;׷  ֻ  ִ ȸ 帮ڽϴ. \
		;׷  ϴ. \ \ 
;-------------NEW TEXT-------------------
You have survived! I am very impressed, you must be\
very skilled and accomplished! Very well, you may now\
use another gambling chip and throw your next dice!\
Good luck!\\
;-----------END NEW TEXT-----------------
		;<  /@pre_Cube>
<Next/@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 B133
	batchmove

[@Posi2]
#IF
#ACT
	batchDelay 1
	addbatch B133
	addbatch B134
	batchmove

[@Posi3]
#IF
#ACT
	batchDelay 1
	addbatch B133
	addbatch B134
	addbatch B135
	batchmove

[@Posi4]
#IF
#ACT
	batchDelay 1
	addbatch B133
	addbatch B134
	addbatch B135
	addbatch B136
	batchmove

[@Posi5]
#IF
#ACT
	batchDelay 1
	addbatch B133
	addbatch B134
	addbatch B135
	addbatch B136
	addbatch B137
	batchmove

[@Posi6]
#IF
#ACT
	batchDelay 1
	addbatch B133
	addbatch B134
	addbatch B135
	addbatch B136
	addbatch B137
	addbatch B138
	batchmove

