寧몸벴匡눈펜돨신굶,컴貫댕舅곤챈럇陋寧苟商!~
굶悸離빈譚 ymhstone 黨 2011-5-18 23:02 긍서侶角鹿품橘짤돨눈펜륩蛟똥쟁돨궐펜뗑枯돨신굶,凜槨角벴匡,뚤黨乖윱綱붤켜잿썩```匡俚좆冷꼇댕.컴貫댕며콘곤챈럇陋寧苟?
신굶흔苟:(君瞳鞫刻놔윱돨쫘쯤,狼갛陋벴匡껸땀관꼽콘攣끽鞫刻!!!!맒숭쟁앎角侶신굶돨覩匡숭.)
[@main]
#IF
#SAY
뻑短윱돕궐펜踏狗냘. \ \
<桂혤寧苟踏狗綱츠./@display> \
<君瞳역迦踏狗./@play_dice> \
<꼇拳鯤./@exit> \
#ACT
mov p2 0
[@display]
#IF
#SAY
<$USERNAME>님 안녕하세요? 이 게임에 룰을 설명 \
드리겠습니다. 이 게임은 <$USERNAME>님이 먼저 주사위 \
3개를 굴립니다. 이 3개의 주사위의 눈의 값을 모두 합쳐서 \
9 가 나와서 이기면 거신 금액에 2배를 받을 수가 있습니다. \
만약 10이 넘는 숫자가 나오면 10을 빼고 나온 숫자가 \
당신의 숫자 입니다. 그럼 해보시면서 알아 보시기 바랍니다. \ \
<이전 메뉴로 돌아 갑니다./@main>
[@play_dice]
#IF
#SAY
<$USERNAME>님 게임을 하도록 하겠습니다. \ \
게임을 1판 진행 할때 마다 1000전씩 지불을 하셔야 합니다. \ \
<1000전을 지불 하고 게임을 하겠습니다./@event> \
<돈이 아까워서 게임 하지 않겠습니다./@exit>
[@event]
#IF
checkgold 1000
random 5
#SAY
헉 잠깐 이벤트 입니다. 당신의 주사위가 6,6,6 이 나오면 \
거신 돈에 5배를 드리겠습니다. 대신 이벤트 참가비 1000전 \
을 주셔야 합니다. \ \
<1000전을 지불 하고 게임을 하겠습니다./@event1> \
<그냥 게임을 하겠습니다./@play_dice1>
#ELSEACT
goto @play_dice1
[@event1]
#IF
#ACT
mov p2 1
goto @play_dice1
[@play_dice1]
#IF
checkgold 1000
#ACT
take gold 1000
#SAY
당신이 이게임에 거실 돈을 정하십시요. \ \
<2000전을 건다./@M2000> \
<5000전을 건다./@M5000> \
<10000전을 건다./@M10000> \
<20000전을 건다./@M20000> \
<50000전을 건다./@M50000> \
<100000전을 건다./@M100000> \
<포기한다./@play_dice>
#ELSESAY
당신은 돈이 없으시네요.. \
돈이 준비 되시면 다시 하시기 바랍니다. \ \
<닫기/@exit>
[@M2000]
#IF
checkgold 2000
#SAY
당신은 2000전을 거셨습니다. \
주사위를 굴리겠습니다. \ \
<다음/@play_dice2>
#ACT
take gold 2000
mov p0 0
#ELSESAY
당신은 돈이 모자르시네요.. \ \
<이전/@play_dice>
[@M5000]
#IF
checkgold 5000
#SAY
당신은 5000전을 거셨습니다. \
주사위를 굴리겠습니다. \ \
<다음/@play_dice2>
#ACT
take gold 5000
mov p0 1
#ELSESAY
당신은 돈이 모자르시네요.. \ \
<이전/@play_dice>
[@M10000]
#IF
checkgold 10000
#SAY
당신은 10000전을 거셨습니다. \
주사위를 굴리겠습니다. \ \
<다음/@play_dice2>
#ACT
take gold 10000
mov p0 2
#ELSESAY
당신은 돈이 모자르시네요.. \ \
<이전/@play_dice>
[@M20000]
#IF
checkgold 20000
#SAY
당신은 20000전을 거셨습니다. \
주사위를 굴리겠습니다. \ \
<다음/@play_dice2>
#ACT
take gold 20000
mov p0 3
#ELSESAY
당신은 돈이 모자르시네요.. \ \
<이전/@play_dice>
[@M50000]
#IF
checkgold 50000
#SAY
당신은 50000전을 거셨습니다. \
주사위를 굴리겠습니다. \ \
<다음/@play_dice2>
#ACT
take gold 50000
mov p0 4
#ELSESAY
당신은 돈이 모자르시네요.. \ \
<이전/@play_dice>
[@M100000]
#IF
checkgold 100000
#SAY
당신은 100000전을 거셨습니다. \
주사위를 굴리겠습니다. \ \
<다음/@play_dice2>
#ACT
take gold 100000
mov p0 5
#ELSESAY
당신은 돈이 모자르시네요.. \ \
<이전/@play_dice>
[@play_dice2]
#IF
#SAY
그럼 당신의 주사위를 3개 굴리겠습니다. 행운을 빕니다. \ \
#ACT
movr d0 6
movr d1 6
movr d2 6
inc d0 1
inc d1 1
inc d2 1
mov d9 0
sum d0 d1
sum d2
playdice 3 @check_event
[@check_event]
#IF
equal p2 1
#ACT
goto @event_next
#ELSEACT
goto @check_gold
[@event_next]
#IF
check d0 9
check d1 9
check d2 9
#ACT
goto @event_result
#ELSEACT
goto @check_gold
[@check_gold]
#IF
large d9 9
#ACT
dec d9 10
goto @play_dice3
#ELSEACT
goto @play_dice3
[@play_dice3]
#IF
equal d9 0
#ACT
mov p1 0
goto @check_message
break
#IF
equal d9 1
#ACT
mov p1 1
goto @check_message
break
#IF
equal d9 2
#ACT
mov p1 2
goto @check_message
break
#IF
equal d9 3
#ACT
mov p1 3
goto @check_message
break
#IF
equal d9 4
#ACT
mov p1 4
goto @check_message
break
#IF
equal d9 5
#ACT
mov p1 5
goto @check_message
break
#IF
equal d9 6
#ACT
mov p1 6
goto @check_message
break
#IF
equal d9 7
#ACT
mov p1 7
goto @check_message
break
#IF
equal d9 8
#ACT
mov p1 8
goto @check_message
break
#IF
equal d9 9
#ACT
mov p1 9
goto @check_message
break
[@check_message]
#IF
#SAY
저의 숫자는 <$STR(P1)> 입니다.\
다음은 제가 주사위를 굴릴 차례 이네요. \ \
<다음/@play_dice4>
[@play_dice4]
#IF
#SAY
그럼 저의 주사위를 3개 굴리겠습니다. \ \
#ACT
movr d0 6
movr d1 6
movr d2 6
inc d0 1
inc d1 1
inc d2 1
mov d9 0
sum d0 d1
sum d2
playdice 3 @play_dice5
[@play_dice5]
#IF
large d9 9
#ACT
dec d9 10
goto @play_dice6
#ELSEACT
goto @play_dice6
[@play_dice6]
#IF
equal d9 0
#ACT
goto @result0
break
#IF
equal d9 1
#ACT
goto @result1
break
#IF
equal d9 2
#ACT
goto @result2
break
#IF
equal d9 3
#ACT
goto @result3
break
#IF
equal d9 4
#ACT
goto @result4
break
#IF
equal d9 5
#ACT
goto @result5
break
#IF
equal d9 6
#ACT
goto @result6
break
#IF
equal d9 7
#ACT
goto @result7
break
#IF
equal d9 8
#ACT
goto @result8
break
#IF
equal d9 9
#ACT
goto @result9
break
[@result0]
#IF
equal p0 0
#ACT
goto @draw
break
#IF
large p0 0
#ACT
goto @win
#ELSEACT
goto @defeat
[@result1]
#IF
equal p1 1
#ACT
goto @draw
break
#IF
large p1 1
#ACT
goto @win
#ELSEACT
goto @defeat
[@result2]
#IF
equal p1 2
#ACT
goto @draw
break
#IF
large p1 2
#ACT
goto @win
#ELSEACT
goto @defeat
[@result3]
#IF
equal p1 3
#ACT
goto @draw
break
#IF
large p1 3
#ACT
goto @win
#ELSEACT
goto @defeat
[@result4]
#IF
equal p1 4
#ACT
goto @draw
break
#IF
large p1 4
#ACT
goto @win
#ELSEACT
goto @defeat
[@result5]
#IF
equal p1 5
#ACT
goto @draw
break
#IF
large p1 5
#ACT
goto @win
#ELSEACT
goto @defeat
[@result6]
#IF
equal p1 6
#ACT
goto @draw
break
#IF
large p1 6
#ACT
goto @win
#ELSEACT
goto @defeat
[@result7]
#IF
equal p1 7
#ACT
goto @draw
break
#IF
large p1 7
#ACT
goto @win
#ELSEACT
goto @defeat
[@result8]
#IF
equal p1 8
#ACT
goto @draw
break
#IF
large p1 8
#ACT
goto @win
#ELSEACT
goto @defeat
[@result9]
#IF
equal p1 9
#ACT
goto @draw
break
#IF
large p1 9
#ACT
goto @win
#ELSEACT
goto @defeat
[@draw]
#IF
equal p0 0
#ACT
give gold 2000
break
#SAY
당신의 숫자는 <$STR(P1)>, 저의 숫자는 <$STR(D9)> 입니다. \
당신과 내가 비겼네요 (ㅡㅡ;) 에구 아깝네요.. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
#IF
equal p0 1
#ACT
give gold 5000
break
#SAY
당신의 숫자는 <$STR(P1)>, 저의 숫자는 <$STR(D9)> 입니다. \
당신과 내가 비겼네요 (ㅡㅡ;) 에구 아깝네요.. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
#IF
equal p0 2
#ACT
give gold 10000
break
#SAY
당신의 숫자는 <$STR(P1)>, 저의 숫자는 <$STR(D9)> 입니다. \
당신과 내가 비겼네요 (ㅡㅡ;) 에구 아깝네요.. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
#IF
equal p0 3
#ACT
give gold 20000
break
#SAY
당신의 숫자는 <$STR(P1)>, 저의 숫자는 <$STR(D9)> 입니다. \
당신과 내가 비겼네요 (ㅡㅡ;) 에구 아깝네요.. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
#IF
equal p0 4
#ACT
give gold 50000
break
#SAY
당신의 숫자는 <$STR(P1)>, 저의 숫자는 <$STR(D9)> 입니다. \
당신과 내가 비겼네요 (ㅡㅡ;) 에구 아깝네요.. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
#IF
equal p0 5
#ACT
give gold 100000
break
#SAY
당신의 숫자는 <$STR(P1)>, 저의 숫자는 <$STR(D9)> 입니다. \
당신과 내가 비겼네요 (ㅡㅡ;) 에구 아깝네요.. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
[@win]
#IF
equal p0 0
#ACT
goto @win0
break
#IF
equal p0 1
#ACT
goto @win1
break
#IF
equal p0 2
#ACT
goto @win2
#IF
equal p0 3
#ACT
goto @win3
#IF
equal p0 4
#ACT
goto @win4
#IF
equal p0 5
#ACT
goto @win5
[@defeat]
#IF
equal p0 0
#ACT
goto @defeat0
break
#IF
equal p0 1
#ACT
goto @defeat1
break
#IF
equal p0 2
#ACT
goto @defeat2
#IF
equal p0 3
#ACT
goto @defeat3
#IF
equal p0 4
#ACT
goto @defeat4
#IF
equal p0 5
#ACT
goto @defeat5
[@win0]
#IF
equal p1 9
#SAY
당신의 숫자는 <$STR(P1)>, 저의 숫자는 <$STR(D9)> 입니다. \
헉 당신이 이기셨네요 그것도 9라는 숫자로 \
에구 돈을 2배로 드려야 겠네요..(ㅜㅜ;) \
자, 2000전 여기 있습니다. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
#ACT
give gold 4000
give gold 2000
#ELSESAY
당신의 숫자는 <$STR(P1)>, 저의 숫자는 <$STR(D9)> 입니다. \
당신이 게임에 이기셨네요.. 에구에구 돈나가는 소리 (ㅜㅜ;) \
자 여기 있습니다. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
#ELSEACT
give gold 4000
[@win1]
#IF
equal p1 9
#SAY
당신의 숫자는 <$STR(P1)>, 저의 숫자는 <$STR(D9)> 입니다. \
헉 당신이 이기셨네요 그것도 9라는 숫자로 \
에구 돈을 2배로 드려야 겠네요..(ㅜㅜ;) \
자, 5000전 여기 있습니다. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
#ACT
give gold 10000
give gold 5000
#ELSESAY
당신의 숫자는 <$STR(P1)>, 저의 숫자는 <$STR(D9)> 입니다. \
당신이 게임에 이기셨네요.. 에구에구 돈나가는 소리 (ㅜㅜ;) \
자 여기 있습니다. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
#ELSEACT
give gold 10000
[@win2]
#IF
equal p1 9
#SAY
당신의 숫자는 <$STR(P1)>, 저의 숫자는 <$STR(D9)> 입니다. \
헉 당신이 이기셨네요 그것도 9라는 숫자로 \
에구 돈을 2배로 드려야 겠네요..(ㅜㅜ;) \
자, 10000전 여기 있습니다. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
#ACT
give gold 20000
give gold 10000
#ELSESAY
당신의 숫자는 <$STR(P1)>, 저의 숫자는 <$STR(D9)> 입니다. \
당신이 게임에 이기셨네요.. 에구에구 돈나가는 소리 (ㅜㅜ;) \
자 여기 있습니다. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
#ELSEACT
give gold 20000
[@win3]
#IF
equal p1 9
#SAY
당신의 숫자는 <$STR(P1)>, 저의 숫자는 <$STR(D9)> 입니다. \
헉 당신이 이기셨네요 그것도 9라는 숫자로 \
에구 돈을 2배로 드려야 겠네요..(ㅜㅜ;) \
자, 20000전 여기 있습니다. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
#ACT
give gold 40000
give gold 20000
#ELSESAY
당신의 숫자는 <$STR(P1)>, 저의 숫자는 <$STR(D9)> 입니다. \
당신이 게임에 이기셨네요.. 에구에구 돈나가는 소리 (ㅜㅜ;) \
자 여기 있습니다. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
#ELSEACT
give gold 40000
[@win4]
#IF
equal p1 9
#SAY
당신의 숫자는 <$STR(P1)>, 저의 숫자는 <$STR(D9)> 입니다. \
헉 당신이 이기셨네요 그것도 9라는 숫자로 \
에구 돈을 2배로 드려야 겠네요..(ㅜㅜ;) \
자, 50000전 여기 있습니다. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
#ACT
give gold 100000
give gold 50000
#ELSESAY
당신의 숫자는 <$STR(P1)>, 저의 숫자는 <$STR(D9)> 입니다. \
당신이 게임에 이기셨네요.. 에구에구 돈나가는 소리 (ㅜㅜ;) \
자 여기 있습니다. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
#ELSEACT
give gold 100000
[@win5]
#IF
equal p1 9
#SAY
당신의 숫자는 <$STR(P1)>, 저의 숫자는 <$STR(D9)> 입니다. \
헉 당신이 이기셨네요 그것도 9라는 숫자로 \
에구 돈을 2배로 드려야 겠네요..(ㅜㅜ;) \
자, 100000전 여기 있습니다. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
#ACT
give gold 200000
give gold 100000
#ELSESAY
당신의 숫자는 <$STR(P1)>, 저의 숫자는 <$STR(D9)> 입니다. \
당신이 게임에 이기셨네요.. 에구에구 돈나가는 소리 (ㅜㅜ;) \
자 여기 있습니다. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
#ELSEACT
give gold 200000
[@defeat0]
#IF
equal d9 9
#SAY
당신의 숫자는 <$STR(P1)>, 저의 숫자는 <$STR(D9)> 입니다. \
헉 제가 이겼네요 그것도 9라는 숫자로 \
에구 돈을 2배로 주셔야 겠네요..(^^;) \
돈을 2000전 더 주세요. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
#ACT
take gold 2000
#ELSESAY
당신의 숫자는 <$STR(P1)>, 저의 숫자는 <$STR(D9)> 입니다. \
제가 게임에서 이겼네요.. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
[@defeat1]
#IF
equal d9 9
#SAY
당신의 숫자는 <$STR(P1)>, 저의 숫자는 <$STR(D9)> 입니다. \
헉 제가 이겼네요 그것도 9라는 숫자로 \
에구 돈을 2배로 주셔야 겠네요..(^^;) \
돈을 5000전 더 주세요. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
#ACT
take gold 5000
#ELSESAY
당신의 숫자는 <$STR(P1)>, 저의 숫자는 <$STR(D9)> 입니다. \
제가 게임에서 이겼네요.. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
[@defeat2]
#IF
equal d9 9
#SAY
당신의 숫자는 <$STR(P1)>, 저의 숫자는 <$STR(D9)> 입니다. \
헉 제가 이겼네요 그것도 9라는 숫자로 \
에구 돈을 2배로 주셔야 겠네요..(^^;) \
돈을 10000전 더 주세요. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
#ACT
take gold 10000
#ELSESAY
당신의 숫자는 <$STR(P1)>, 저의 숫자는 <$STR(D9)> 입니다. \
제가 게임에서 이겼네요.. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
[@defeat3]
#IF
equal d9 9
#SAY
당신의 숫자는 <$STR(P1)>, 저의 숫자는 <$STR(D9)> 입니다. \
헉 제가 이겼네요 그것도 9라는 숫자로 \
에구 돈을 2배로 주셔야 겠네요..(^^;) \
돈을 20000전 더 주세요. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
#ACT
take gold 20000
#ELSESAY
당신의 숫자는 <$STR(P1)>, 저의 숫자는 <$STR(D9)> 입니다. \
제가 게임에서 이겼네요.. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
[@defeat4]
#IF
equal d9 9
#SAY
당신의 숫자는 <$STR(P1)>, 저의 숫자는 <$STR(D9)> 입니다. \
헉 제가 이겼네요 그것도 9라는 숫자로 \
에구 돈을 2배로 주셔야 겠네요..(^^;) \
돈을 50000전 더 주세요. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
#ACT
take gold 50000
#ELSESAY
당신의 숫자는 <$STR(P1)>, 저의 숫자는 <$STR(D9)> 입니다. \
제가 게임에서 이겼네요.. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
[@defeat5]
#IF
equal d9 9
#SAY
당신의 숫자는 <$STR(P1)>, 저의 숫자는 <$STR(D9)> 입니다. \
헉 제가 이겼네요 그것도 9라는 숫자로 \
에구 돈을 2배로 주셔야 겠네요..(^^;) \
돈을 100000전 더 주세요. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
#ACT
take gold 100000
#ELSESAY
당신의 숫자는 <$STR(P1)>, 저의 숫자는 <$STR(D9)> 입니다. \
제가 게임에서 이겼네요.. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
[@event_result]
#IF
equal p0 0
#ACT
give gold 10000
break
#SAY
축하 합니다. 행운에 번호에 걸렸네요. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
#IF
equal p0 1
#ACT
give gold 25000
break
#SAY
축하 합니다. 행운에 번호에 걸렸네요. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
#IF
equal p0 2
#ACT
give gold 50000
break
#SAY
축하 합니다. 행운에 번호에 걸렸네요. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
#IF
equal p0 3
#ACT
give gold 100000
break
#SAY
축하 합니다. 행운에 번호에 걸렸네요. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
#IF
equal p0 4
#ACT
give gold 250000
break
#SAY
축하 합니다. 행운에 번호에 걸렸네요. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
#IF
equal p0 5
#ACT
give gold 500000
break
#SAY
축하 합니다. 행운에 번호에 걸렸네요. \ \
<다시 게임을 하겠습니다./@play_dice> \
<게임을 그만 두겠습니다./@exit>
쉥溝固맣냥옵鹿鞫刻벴匡앎콘였돕覩匡율。 퀭봤 乖角날銶痢옵鹿돨뺐속乖QQ ： 6700915 컸몸벴匡경굶뻘瞳찐？ 剋剋
女:
[1]