[@RMB]
{
#IF
#ACT
OPENMERCHANTBIGDLG 48 0 1 4 0 0 0 648 40
MOV N$1 1
MOV N$2 2
MOV N$3 3
MOV N$4 4
MOV N$5 5
MOV N$6 6
MOV N$1 0
MOV N$2 1
MOV N$3 2
MOV N$4 3
MOV N$5 4
MOV N$6 5
MOV S$10
MOV S$20
MOV S$30
MOV S$11
MOV S$21
MOV S$31
MOV S$12
MOV S$22
MOV S$32
MOV S$13
MOV S$23
MOV S$33
MOV S$14
MOV S$24
MOV S$34
MOV S$15
MOV S$25
MOV S$35

GETRANDOMTEXT ..\QuestDiary\\.txt S$10 N$1
GETRANDOMTEXT ..\QuestDiary\\ʱ.txt S$20 N$1
GETRANDOMTEXT ..\QuestDiary\\״̬.txt S$30 N$1

GETRANDOMTEXT ..\QuestDiary\\.txt S$11 N$2
GETRANDOMTEXT ..\QuestDiary\\ʱ.txt S$21 N$2
GETRANDOMTEXT ..\QuestDiary\\״̬.txt S$31 N$2

GETRANDOMTEXT ..\QuestDiary\\.txt S$12 N$3
GETRANDOMTEXT ..\QuestDiary\\ʱ.txt S$22 N$3
GETRANDOMTEXT ..\QuestDiary\\״̬.txt S$32 N$3

GETRANDOMTEXT ..\QuestDiary\\.txt S$13 N$4
GETRANDOMTEXT ..\QuestDiary\\ʱ.txt S$23 N$4
GETRANDOMTEXT ..\QuestDiary\\״̬.txt S$33 N$4

GETRANDOMTEXT ..\QuestDiary\\.txt S$14 N$5
GETRANDOMTEXT ..\QuestDiary\\ʱ.txt S$24 N$5
GETRANDOMTEXT ..\QuestDiary\\״̬.txt S$34 N$5

GETRANDOMTEXT ..\QuestDiary\\.txt S$15 N$6
GETRANDOMTEXT ..\QuestDiary\\ʱ.txt S$25 N$6
GETRANDOMTEXT ..\QuestDiary\\״̬.txt S$35 N$6

SetStringBlank <$STR(S$10)> 29 1
SetStringBlank <$STR(S$20)> 36 1
SetStringBlank <$STR(S$11)> 29 1
SetStringBlank <$STR(S$21)> 36 1
SetStringBlank <$STR(S$12)> 29 1
SetStringBlank <$STR(S$22)> 36 1
SetStringBlank <$STR(S$13)> 29 1
SetStringBlank <$STR(S$23)> 36 1
SetStringBlank <$STR(S$14)> 29 1
SetStringBlank <$STR(S$24)> 36 1
SetStringBlank <$STR(S$15)> 29 1
SetStringBlank <$STR(S$25)> 36 1





#SAY
<Img:23:48:680:-10/@exit>\\ \

<Img:3:48:120:-8/@RMB> <Img:5:48:120:-7/@ּ¼> <Img:7:48:120:-9/@װ> <Img:9:48:120:-8/@Ʒع> <Img:11:48:120:-8/@ʱ>\

<Img:8:48:0:50/@һҳ>                                                                                                  <Img:10:48:0:50/@һҳ>\

<Img:1:48:470:152/@ȷ>

\
                    {No.<$STR(N$1)>/SCOLOR=243}       <$STR(S$10)>   <$STR(S$20)>  <$STR(S$30)>\

                    {No.<$STR(N$2)>/SCOLOR=243}       <$STR(S$11)>   <$STR(S$21)>  <$STR(S$31)>\

                    {No.<$STR(N$3)>/SCOLOR=243}       <$STR(S$12)>   <$STR(S$22)>  <$STR(S$32)>\

                    {No.<$STR(N$4)>/SCOLOR=243}       <$STR(S$13)>   <$STR(S$23)>  <$STR(S$33)>\

                    {No.<$STR(N$5)>/SCOLOR=243}       <$STR(S$14)>   <$STR(S$24)>  <$STR(S$34)>\

                    {No.<$STR(N$6)>/SCOLOR=243}       <$STR(S$15)>   <$STR(S$25)>  <$STR(S$35)>\
                  <ֱ롷100Ԫ,Ϊ20%/SCOLOR=243>  <ֽʱΪÿ12./SCOLOR=254>\
                  -----------------------------------------------------------------------------------------\
                  <ֵĽ/@@InPutInteger11>:<$STR(N11)>.Rmb <ǰRmbΪ:/scolor=253><$GAMEPOINT>  <ȫ/@ȫ>\
                  <տʺ/@@InPutString22>:<$STR(S22)><дȷ/SCOLOR=250>\
                  <տ/@@InPutString33>:<$STR(S33)><дȷ/SCOLOR=250>\
                  <տʽ/@@InPutString44>:<$STR(S44)>\
                  <ע:><˺Ű @ ַ޷ģ뽫 @  # żɣ/SCOLOR=253>\
                  <ȷ>  <Ŀǰֻ֧֧֣д˺Լ/SCOLOR=250>\

[@InPutString44]
#OR
EQUAL S44 ֧
EQUAL S44 Ƹͨ
#ACT
GOTO @RMB
SENDMSG 7 дȷ,ǰΪ:<$STR(S44)>.
#ELSEACT
MOV S44 .ֻд֧Ƹͨ
GOTO @RMB

[@10]
#IF
#ACT
OPENMERCHANTBIGDLG 48 0 1 4 0 0 0 648 40
#SAY
<Img:23:48:680:-10/@exit>\\ \

<Img:3:48:120:-8/@1> <Img:5:48:120:-7/@2> <Img:7:48:120:-9/@3> <Img:9:48:120:-8/@4> <Img:11:48:120:-8/@5>\

<Img:8:48:0:50/@һҳ>                                                                                                  <Img:10:48:0:50/@һҳ>\

<Img:1:48:470:152/@8>

<Img:13:48:41:186/@9>         <Img:12:48:43:1890/@10>\






[@һҳ]
#IF
#ACT
INC N$1 6
INC N$2 6
INC N$3 6
INC N$4 6
INC N$5 6
INC N$6 6
INC N$1 6
INC N$2 6
INC N$3 6
INC N$4 6
INC N$5 6
INC N$6 6
MOV S$10
MOV S$20
MOV S$30
MOV S$11
MOV S$21
MOV S$31
MOV S$12
MOV S$22
MOV S$32
MOV S$13
MOV S$23
MOV S$33
MOV S$14
MOV S$24
MOV S$34
MOV S$15
MOV S$25
MOV S$35
GETRANDOMTEXT ..\QuestDiary\\.txt S$10 N$1
GETRANDOMTEXT ..\QuestDiary\\ʱ.txt S$20 N$1
GETRANDOMTEXT ..\QuestDiary\\״̬.txt S$30 N$1

GETRANDOMTEXT ..\QuestDiary\\.txt S$11 N$2
GETRANDOMTEXT ..\QuestDiary\\ʱ.txt S$21 N$2
GETRANDOMTEXT ..\QuestDiary\\״̬.txt S$31 N$2

GETRANDOMTEXT ..\QuestDiary\\.txt S$12 N$3
GETRANDOMTEXT ..\QuestDiary\\ʱ.txt S$22 N$3
GETRANDOMTEXT ..\QuestDiary\\״̬.txt S$32 N$3

GETRANDOMTEXT ..\QuestDiary\\.txt S$13 N$4
GETRANDOMTEXT ..\QuestDiary\\ʱ.txt S$23 N$4
GETRANDOMTEXT ..\QuestDiary\\״̬.txt S$33 N$4

GETRANDOMTEXT ..\QuestDiary\\.txt S$14 N$5
GETRANDOMTEXT ..\QuestDiary\\ʱ.txt S$24 N$5
GETRANDOMTEXT ..\QuestDiary\\״̬.txt S$34 N$5

GETRANDOMTEXT ..\QuestDiary\\.txt S$15 N$6
GETRANDOMTEXT ..\QuestDiary\\ʱ.txt S$25 N$6
GETRANDOMTEXT ..\QuestDiary\\״̬.txt S$35 N$6

SetStringBlank <$STR(S$10)> 29 1
SetStringBlank <$STR(S$20)> 36 1
SetStringBlank <$STR(S$11)> 29 1
SetStringBlank <$STR(S$21)> 36 1
SetStringBlank <$STR(S$12)> 29 1
SetStringBlank <$STR(S$22)> 36 1
SetStringBlank <$STR(S$13)> 29 1
SetStringBlank <$STR(S$23)> 36 1
SetStringBlank <$STR(S$14)> 29 1
SetStringBlank <$STR(S$24)> 36 1
SetStringBlank <$STR(S$15)> 29 1
SetStringBlank <$STR(S$25)> 36 1

#IF
EQUAL S$10
#ACT
MESSAGEBOX Ѿһҳ.
BREAK

#IF
#SAY
<Img:23:48:680:-10/@exit>\\ \

<Img:3:48:120:-8/@RMB> <Img:5:48:120:-7/@ּ¼> <Img:7:48:120:-9/@װ> <Img:9:48:120:-8/@Ʒع> <Img:11:48:120:-8/@ʱ>\

<Img:8:48:0:50/@һҳ>                                                                                                  <Img:10:48:0:50/@һҳ>\

<Img:1:48:470:152/@ȷ>

\
                    {No.<$STR(N$1)>/SCOLOR=243}       <$STR(S$10)>   <$STR(S$20)>  <$STR(S$30)>\

                    {No.<$STR(N$2)>/SCOLOR=243}       <$STR(S$11)>   <$STR(S$21)>  <$STR(S$31)>\

                    {No.<$STR(N$3)>/SCOLOR=243}       <$STR(S$12)>   <$STR(S$22)>  <$STR(S$32)>\

                    {No.<$STR(N$4)>/SCOLOR=243}       <$STR(S$13)>   <$STR(S$23)>  <$STR(S$33)>\

                    {No.<$STR(N$5)>/SCOLOR=243}       <$STR(S$14)>   <$STR(S$24)>  <$STR(S$34)>\

                    {No.<$STR(N$6)>/SCOLOR=243}       <$STR(S$15)>   <$STR(S$25)>  <$STR(S$35)>\
                  <ֱ롷100Ԫ,Ϊ20%/SCOLOR=243>  <ֽʱΪÿ12./SCOLOR=254>\
                  -----------------------------------------------------------------------------------------\
                  <ֵĽ/@@InPutInteger11>:<$STR(N11)>.Rmb <ǰRmbΪ:/scolor=253><$GAMEPOINT>  <ȫ/@ȫ>\
                  <տʺ/@@InPutString22>:<$STR(S22)><дȷ/SCOLOR=250>\
                  <տ/@@InPutString33>:<$STR(S33)><дȷ/SCOLOR=250>\
                  <տʽ/@@InPutString44>:<$STR(S44)>\
                  <ע:><˺Ű @ ַ޷ģ뽫 @  # żɣ/SCOLOR=253>\
                  <ȷ>  <Ŀǰֻ֧֧Ƹ֣ͨ/SCOLOR=250>\

[@һҳ]
#IF
EQUAL N$1 1
#ACT
MESSAGEBOX Ѿһҳ.
BREAK

#IF
#ACT
DEC N$1 6
DEC N$2 6
DEC N$3 6
DEC N$4 6
DEC N$5 6
DEC N$6 6
DEC N$1 6
DEC N$2 6
DEC N$3 6
DEC N$4 6
DEC N$5 6
DEC N$6 6
MOV S$10
MOV S$20
MOV S$30
MOV S$11
MOV S$21
MOV S$31
MOV S$12
MOV S$22
MOV S$32
MOV S$13
MOV S$23
MOV S$33
MOV S$14
MOV S$24
MOV S$34
MOV S$15
MOV S$25
MOV S$35
GETRANDOMTEXT ..\QuestDiary\\.txt S$10 N$1
GETRANDOMTEXT ..\QuestDiary\\ʱ.txt S$20 N$1
GETRANDOMTEXT ..\QuestDiary\\״̬.txt S$30 N$1

GETRANDOMTEXT ..\QuestDiary\\.txt S$11 N$2
GETRANDOMTEXT ..\QuestDiary\\ʱ.txt S$21 N$2
GETRANDOMTEXT ..\QuestDiary\\״̬.txt S$31 N$2

GETRANDOMTEXT ..\QuestDiary\\.txt S$12 N$3
GETRANDOMTEXT ..\QuestDiary\\ʱ.txt S$22 N$3
GETRANDOMTEXT ..\QuestDiary\\״̬.txt S$32 N$3

GETRANDOMTEXT ..\QuestDiary\\.txt S$13 N$4
GETRANDOMTEXT ..\QuestDiary\\ʱ.txt S$23 N$4
GETRANDOMTEXT ..\QuestDiary\\״̬.txt S$33 N$4

GETRANDOMTEXT ..\QuestDiary\\.txt S$14 N$5
GETRANDOMTEXT ..\QuestDiary\\ʱ.txt S$24 N$5
GETRANDOMTEXT ..\QuestDiary\\״̬.txt S$34 N$5

GETRANDOMTEXT ..\QuestDiary\\.txt S$15 N$6
GETRANDOMTEXT ..\QuestDiary\\ʱ.txt S$25 N$6
GETRANDOMTEXT ..\QuestDiary\\״̬.txt S$35 N$6
SetStringBlank <$STR(S$10)> 29 1
SetStringBlank <$STR(S$20)> 36 1
SetStringBlank <$STR(S$11)> 29 1
SetStringBlank <$STR(S$21)> 36 1
SetStringBlank <$STR(S$12)> 29 1
SetStringBlank <$STR(S$22)> 36 1
SetStringBlank <$STR(S$13)> 29 1
SetStringBlank <$STR(S$23)> 36 1
SetStringBlank <$STR(S$14)> 29 1
SetStringBlank <$STR(S$24)> 36 1
SetStringBlank <$STR(S$15)> 29 1
SetStringBlank <$STR(S$25)> 36 1
#SAY
<Img:23:48:680:-10/@exit>\\ \

<Img:3:48:120:-8/@RMB> <Img:5:48:120:-7/@ּ¼> <Img:7:48:120:-9/@װ> <Img:9:48:120:-8/@Ʒع> <Img:11:48:120:-8/@ʱ>\

<Img:8:48:0:50/@һҳ>                                                                                                  <Img:10:48:0:50/@һҳ>\

<Img:1:48:470:152/@ȷ>

\
                    {No.<$STR(N$1)>/SCOLOR=243}       <$STR(S$10)>   <$STR(S$20)>  <$STR(S$30)>\

                    {No.<$STR(N$2)>/SCOLOR=243}       <$STR(S$11)>   <$STR(S$21)>  <$STR(S$31)>\

                    {No.<$STR(N$3)>/SCOLOR=243}       <$STR(S$12)>   <$STR(S$22)>  <$STR(S$32)>\

                    {No.<$STR(N$4)>/SCOLOR=243}       <$STR(S$13)>   <$STR(S$23)>  <$STR(S$33)>\

                    {No.<$STR(N$5)>/SCOLOR=243}       <$STR(S$14)>   <$STR(S$24)>  <$STR(S$34)>\

                    {No.<$STR(N$6)>/SCOLOR=243}       <$STR(S$15)>   <$STR(S$25)>  <$STR(S$35)>\
                  <ֱ롷100Ԫ,Ϊ20%/SCOLOR=243>  <ֽʱΪÿ12./SCOLOR=254>\
                  -----------------------------------------------------------------------------------------\
                  <ֵĽ/@@InPutInteger11>:<$STR(N11)>.Rmb <ǰRmbΪ:/scolor=253><$GAMEPOINT>  <ȫ/@ȫ>\
                  <տʺ/@@InPutString22>:<$STR(S22)><дȷ/SCOLOR=250>\
                  <տ/@@InPutString33>:<$STR(S33)><дȷ/SCOLOR=250>\
                  <տʽ/@@InPutString44>:<$STR(S44)>\
                  <ע:><˺Ű @ ַ޷ģ뽫 @  # żɣ/SCOLOR=253>\
                  <ȷ>  <Ŀǰֻ֧֧Ƹ֣ͨ/SCOLOR=250>\



[@ȫ]
#IF
CHECKGAMEPOINT < 100
#ACT
MESSAGEBOX RmbС100Ԫ֡
BREAK

#IF
#ACT
MOV N11 <$GAMEPOINT>
SENDMSG 7 ѡȫ.ֵĽΪ:<$STR(N11)>Ԫ.
GOTO @RMB
BREAK


[@InPutInteger11]
#if
SMALL N11 100
#ACT
MESSAGEBOX 𲽽Ϊ100Ԫ.
BREAK

#IF
CHECKGAMEPOINT ? <$STR(N11)>
#ACT
SENDMSG 7 ǰдֽΪ:<$STR(N11)>
GOTO @RMB
BREAK
#ELSEACT
MESSAGEBOX ûôRmb.

[@InPutString22]
#if
EQUAL S22
#ACT
MESSAGEBOX ȷտʺ
BREAK

#IF
#ACT
SENDMSG 7 ǰдտʺΪ:<$STR(S22)>
GOTO @RMB
BREAK

[@InPutString33]
#if
EQUAL S33
#ACT
MESSAGEBOX ȷտ
BREAK

#IF
#ACT
SENDMSG 7 ǰдտʺΪ:<$STR(S33)>
GOTO @RMB
BREAK

[@ȷ]

#IF
SMALL N11 100
#ACT
MESSAGEBOX ֽΪ100Ԫ
BREAK

#IF
EQUAL S22
#ACT
MESSAGEBOX տʺ
BREAK

#IF
EQUAL S33
#ACT
MESSAGEBOX տ
BREAK

#IF
EQUAL S44
#ACT
MESSAGEBOX տʽֻ֧֧Ƹͨ
BREAK

#IF
EQUAL S44 .ֻд֧Ƹͨ
#ACT
MESSAGEBOX տʽֻ֧֧Ƹͨ
BREAK

#IF
CHECKGAMEPOINT < <$STR(N11)>
#ACT
MESSAGEBOX ǰRMB<$STR(N11)>.
BREAK

#IF
#ACT
AddTextList ..\QuestDiary\\.txt <$USERNAME>Rmb<$STR(N11)>
AddTextList ..\QuestDiary\\ʱ.txt <$YEAR><$MONTH><$DAY>,<$HOUR>:<$MINUTE>:<$SECOND>
AddTextList ..\QuestDiary\\״̬.txt <../SCOLOR=250>
AddTextList ..\QuestDiary\\տϢ.txt <$USERNAME>տʺš<$STR(S22)>տ<$STR(S33)>֧ʽ:<$STR(S44)>:<$STR(N11)>
GAMEPOINT - <$STR(N11)>
SENDMSG 7 : <$USERNAME>.
SENDMSG 7 :Rmb: <$STR(N11)>.
SENDMSG 7 ʱ: <$YEAR><$MONTH><$DAY>,<$HOUR>:<$MINUTE>:<$SECOND>.
SENDMSG 7 տϢ:տʺ <$STR(S22)>
SENDMSG 7 տϢ:տ <$STR(S33)>
SENDMSG 7 տϢ:֧ʽ: <$STR(S44)>
SENDMSG 7 ѾΪ.˳ɹϵͳԶѿ˻.ĵȴ.
MOV N11
MOV S22
MOV S33
MOV S44
GOTO @RMB
BREAK
}


;       G  M      .  .
