; ===================================
; QGO Market Def NPC File : 9Ega-T125
; Gambling House - From Peaceful Room (25th)
; -----------------------------------
; 6 July 2003 (Xerxes)
;   - Added New text
; 	- Amended call to @pre2_cube to @pre_cube as per 1.3 version (L53)
; ===================================
[@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
		;ȳϼ.  Ƚ 濡 ̽ϴ. \
		; Ƚ 濡 п ü¾๭ ¾๭ \
		;ٲپ 帱 ֽϴ. Ͻô ޴  \ \
;-------------NEW TEXT-------------------
Peace be on you, <$USERNAME>!\
Here you will find rest and healing before you continue on your\
journey. I can sell you HP and MP drugs for your gambling chips\
if you require them, or you can throw the dice to move forward\
when you are ready. Each bundle of drugs will cost one chip.\\
;-----------END NEW TEXT-----------------
		;з ü¾๭ <./@buyP> \
		;з ¾๭ <./@buyB> \
		;ֻ <./@pre2_cube>
<Buy/@buyP>(HP)DrugBundle with gambling chip \
<Buy/@buyB>(MP)DrugBundle with gambling chip \
<Throw the Dice/@pre_cube>

#ACT
	breaktimerecall


; -----------------------------------
[@buyP]
#IF
	checkitem GambleChip 1
#ACT
	take GambleChip 1
	give (HP)DrugBundle 1
#SAY
		;и ü¾๭ ȯ صȽϴ. \ \
;-------------NEW TEXT-------------------
You now have a bundle of HP drugs.\\
;-----------END NEW TEXT-----------------
		;<  /@main-1>
<Continue/@main-1>


; -----------------------------------
[@buyB]
#IF
	checkitem GambleChip 1
#ACT
	take GambleChip 1
	give (MP)DrugBundle 1
#SAY
		;и ¾๭ ȯ صȽϴ. \ \
;-------------NEW TEXT-------------------
You now have a bundle of MP drugs.\\
;-----------END NEW TEXT-----------------
		;<  /@main-1>
<Continue/@main-1>


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


; -----------------------------------
[@pre_cube]
#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]
#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 B126
	batchmove

[@Posi2]
#IF
#ACT
	batchDelay 1
	addbatch B126
	addbatch B127
	batchmove

[@Posi3]
#IF
#ACT
	batchDelay 1
	addbatch B126
	addbatch B127
	addbatch B128
	batchmove

[@Posi4]
#IF
#ACT
	batchDelay 1
	addbatch B126
	addbatch B127
	addbatch B128
	addbatch B129
	batchmove

[@Posi5]
#IF
#ACT
	batchDelay 1
	addbatch B126
	addbatch B127
	addbatch B128
	addbatch B129
	addbatch B130
	batchmove

[@Posi6]
#IF
#ACT
	batchDelay 1
	addbatch B126
	addbatch B127
	addbatch B128
	addbatch B129
	addbatch B130
	addbatch B131
	batchmove

