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

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

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

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

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


; -----------------------------------
[@main-1]
#IF
#ACT
	mov p9 0
#SAY
		;! <$USERNAME> \
		;̰  9°, ǹԴϴ \
		;5еȿ  ̵  帰 Ư \
		; ..  ð׿   ϸ ٽ \
		;ó   ϼž մϴ. \ \
;-------------NEW TEXT-------------------
Greetings to you, <$USERNAME>!\
Welcome to the Desire Room, the 9th Ma-Bang-Jin room!\
I will teleport you to a location in which you have to\
search for a Special Drug. You have 5 minutes to find it\
and return it to me. If you fail this task, you will go\
back to begin at the starting point again.\\
;-----------END NEW TEXT-----------------
		;<  /@Pena1>
<Continue/@Pena1>


; -----------------------------------
[@Pena1]
#IF
#ACT
	mov p9 1
	SET [799] 1
	TimeRecall 5
	map T109


; -----------------------------------
[@Pena2]
#IF
	checkitem SpecialDrug 1
#ACT
	mov p9 2
	take SpecialDrug 40
	goto @pena3

#ELSESAY
		;  ϼ̱..   Ʈ ذ  \
		;ϿǷ ٽ   \ \
;-------------NEW TEXT-------------------
You didn't bring the Special Drug back to me; I'm\
afraid that you have failed this task. You must now\
go back to the starting room of Ma-Bang-Jin.\\
;-----------END NEW TEXT-----------------
		;<  /@Quit>
<Leave the Game/@Quit>

#ELSEACT
	mov p9 9

[@pena3]
		;Ư ؿ̱..   մϴ. ׷ ֻ \
		; ִ ȸ 帮ڽϴ. \ \ 
;-------------NEW TEXT-------------------
Excellent! You have completed my small 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>


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


; -----------------------------------
[@pre_cube]
#IF
	checkitem GambleChip 1
#ACT
	take GambleChip 1
	mov p9 3
	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 B110
	batchmove

[@Posi2]
#IF
#ACT
	batchDelay 1
	addbatch B110
	addbatch B111
	batchmove

[@Posi3]
#IF
#ACT
	batchDelay 1
	addbatch B110
	addbatch B111
	addbatch B112
	batchmove

[@Posi4]
#IF
#ACT
	batchDelay 1
	addbatch B110
	addbatch B111
	addbatch B112
	addbatch B113
	batchmove

[@Posi5]
#IF
#ACT
	batchDelay 1
	addbatch B110
	addbatch B111
	addbatch B112
	addbatch B113
	addbatch B114
	batchmove

[@Posi6]
#IF
#ACT
	batchDelay 1
	addbatch B110
	addbatch B111
	addbatch B112
	addbatch B113
	addbatch B114
	addbatch B115
	batchmove

