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

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

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

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

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

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


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



; -----------------------------------
[@main-1]
#IF
	random 3
#ACT
	mov p9 1
	goto @check1
	Recallmap B122
	Recallmap B126
	break

#IF
	random 3
#ACT
	mov p9 2
	goto @check2
	Recallmap B123
	Recallmap B127
	break

#IF
	random 3
#ACT
	mov p9 3
	goto @check3
	Recallmap B133
	break

#ELSEACT
	goto @race



; -----------------------------------
[@check1]
		;! <$USERNAME> \
		;̰  17°, ȯǹ Դϴ \
		;22,26° 濡 ִ   ̰ ȯ \
		;ϴ  ɸ̽ϴ. \ 
		; 濡  ִٸ  ȯ  Դϴ. \
		;  ֻ ðڽϱ? \ \
;-------------NEW TEXT-------------------
Haha! <$USERNAME>, welcome to the Recall Room!\
In this 17th Ma-Bang-Jin room, you have just triggered a\
recall spell that will teleport all the current people in\
the 22nd and 26th rooms into here with you. Of course, you\
will not see anyone if those rooms are empty. Now, would\
you like to throw your dice to see where you go next?\\
;-----------END NEW TEXT-----------------
		;<  /@pre_cube>
<Throw the Dice/@pre_cube>


; -----------------------------------
[@check2]
		;! <$USERNAME> \
		;̰  17°, ȯǹ Դϴ \
		;23,27° 濡 ִ   ̰ ȯ \
		;ϴ  ɸ̽ϴ. \ 
		; 濡  ִٸ  ȯ  Դϴ. \
		;  ֻ ðڽϱ? \ \
;-------------NEW TEXT-------------------
Haha! <$USERNAME>, welcome to the Recall Room!\
In this 17th Ma-Bang-Jin room, you have just triggered a\
recall spell that will teleport all the current people in\
the 23rd and 27th rooms into here with you. Of course, you\
will not see anyone if those rooms are empty. Now, would\
you like to throw your dice to see where you go next?\\
;-----------END NEW TEXT-----------------
		;<  /@pre_cube>
<Throw the Dice/@pre_cube>


; -----------------------------------
[@check3]
		;! <$USERNAME> \
		;̰  17°, ȯǹ Դϴ \
		;33° 濡 ִ   ̰ ȯ \
		;ϴ  ɸ̽ϴ. \ 
		; 濡  ִٸ  ȯ  Դϴ. \
		;  ֻ ðڽϱ? \ \
;-------------NEW TEXT-------------------
Haha! <$USERNAME>, welcome to the Recall Room!\
In this 17th Ma-Bang-Jin room, you have just triggered a\
recall spell that will teleport all the current people in\
the 33rd room into here with you. Of course, you\
will not see anyone if that room is empty. Now, would\
you like to throw your dice to see where you go next?\\
;-----------END NEW TEXT-----------------
		;<  /@pre_cube>
<Throw the Dice/@pre_cube>


; -----------------------------------
[@pre_cube]
#IF
	checkitem GambleChip 1
#ACT
	take GambleChip 1
	mov p9 4
	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]
		;ֻ  <$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 2
	addbatch B118
	batchmove

[@Posi2]
#IF
#ACT
	batchDelay 2
	addbatch B118
	batchDelay 1
	addbatch B119
	batchmove

[@Posi3]
#IF
#ACT
	batchDelay 2
	addbatch B118
	batchDelay 1
	addbatch B119
	addbatch B120
	batchmove

[@Posi4]
#IF
#ACT
	batchDelay 2
	addbatch B118
	batchDelay 1
	addbatch B119
	addbatch B120
	addbatch B121
	batchmove

[@Posi5]
#IF
#ACT
	batchDelay 2
	addbatch B118
	batchDelay 1
	addbatch B119
	addbatch B120
	addbatch B121
	addbatch B122
	batchmove

[@Posi6]
#IF
#ACT
	batchDelay 2
	addbatch B118
	batchDelay 1
	addbatch B119
	addbatch B120
	addbatch B121
	addbatch B122
	addbatch B123
	batchmove

