;============================================================
;  NPCִͨ DONRECEIPT +  DONLISTȫ
; ȵNPC¼S$֤=ɹ
; ִļ../../../../996Bossϵͳ/game/DONRECEIPT_<$STR(S$˺)>_<$STR(T13)>.txt = game/DONRECEIPT_<˺>_<ʶ>.txt
; ļ../../../../996Bossϵͳ/game/DONLIST_<$STR(S$˺)>_<$STR(T13)>.txt = game/DONLIST_<˺>_<ʶ>.txt
; ύиʽ50:˺:ʶ:ǰ:|ɫ[:]
;   ˵scanner  type50 Ϊ p1=(>0 , =), uid=ʶ, server=ǰ()
; ׳ɹ̨ code=50data
;   SArg1= SArg2=ҵķ SArg3=ҵĸ SArg4=ܶ
; ɹ̨ code=50data
;   SArg1=ҵķ SArg2=ҵķ SArg3=ҵķ
;   SArg4=ҵĸ SArg5=ҵĸ SArg6=ܶ SArg7= SArg8=
;   б(DONLIST)ÿУ S|||      P||˺||
; ִԭ·
;   ףϷȿۻ  д ύ.txt(50,)  ɼ 
;         DonationService.donate(¼,ۼӽ)  DONRECEIPT
;   д ύ.txt(50,)  ɼ 
;         DonationService.my_status + build_board_text  DONRECEIPT + DONLIST
;   ű ReadFile+EXTRACTSTRING չʾƶ˲ֻۼ뽱ء
;============================================================
[@NPC]
#IF
EQUAL S$֤ ɹ
#ACT
; ΪֵGOM 治֧ $(xxx) ź꣩ټг
#SAY
\ \ <TITLE:  >
\ \ 
\ \   ǰ˺ţ<$STR(S$˺)>  
\ \ 
\ \ ׽¼(Ϸѿ۳)ȫۼƽأհ
\ \ <TAB> Ҫ
\ \ <TAB> 鿴а
\ \ <TAB> ˵
#IF
EQUAL S$ͷInput 1
#ACT
GOTO @ִо
#IF
EQUAL S$ͷInput 2
#ACT
GOTO @ѯ
#IF
EQUAL S$ͷInput 3
#ACT
GOTO @˵

[@˵]
#SAY
\ \ <TITLE: ˵ >
\ \ ״Ϸڻҿ۳ϱƶۼơ
\ \ հ()ڹ/˰ơ
\ \ 24Զհ񣬽չ衣GMͳһš
\ \ <TAB> 
#IF
EQUAL S$ͷInput 1
#ACT
GOTO @NPC

[@ִо]
#IF
SMALL N$ִ 1
#ACT
#SAY
\ \ Ϸڻҽ۳Ӧ
\ \ <TAB><INPUT:(N$)>
#IF
EQUAL S$ͷInput 1
#ACT
#IF
SMALL N$ 1
#ACT
MESSAGEBOX 0ľ
break
#ACT
MOV N$ִ 1
AddTextList ../../../../996Bossϵͳ/ύ.txt 50:<$STR(S$˺)>:<$STR(T13)>:<$SERVERNAME>:<$USERNAME>|<$USERID>:<$STR(N$)>
SHOWPROGRESSBARDLG ύ... 1
DELAYGOTO 1500 @ײѯ
#ELSEACT
MESSAGEBOX ϵͳУԺ
break

[@ײѯ]
#IF
EQUAL N$ִ 1
#ACT
READPROCESS ../../../../996Bossϵͳ/game/DONRECEIPT_<$STR(S$˺)>_<$STR(T13)>.txt 0 Sִ
EXTRACTSTRING ":" <$STR(Sִ)> SCode 1
EXTRACTSTRING ":" <$STR(Sִ)> SArg1 2
EXTRACTSTRING ":" <$STR(Sִ)> SArg2 3
EXTRACTSTRING ":" <$STR(Sִ)> SArg3 4
EXTRACTSTRING ":" <$STR(Sִ)> SArg4 5
EXTRACTSTRING ":" <$STR(Sִ)> SReason 10
#IF
EQUAL SCode 50
#ACT
MOV N$ִ 0
MESSAGEBOX ׳ɹ\nξף<$STR(SArg1)>\nҵķۼƣ<$STR(SArg2)>\nҵĸۼƣ<$STR(SArg3)>\nǰأ<$STR(SArg4)>
break
#IF
EQUAL SCode 500
#ACT
MOV N$ִ 0
MESSAGEBOX ʧܣ<$STR(SReason)>
break
#ELSEACT
MOV N$ִ 0
MESSAGEBOX δִԺԣȷϲɼѵ¼
break

[@ѯ]
#IF
SMALL N$ִ 1
#ACT
MOV N$ִ 1
AddTextList ../../../../996Bossϵͳ/ύ.txt 50:<$STR(S$˺)>:<$STR(T13)>:<$SERVERNAME>:<$USERNAME>|<$USERID>
SHOWPROGRESSBARDLG ڲѯа... 1
DELAYGOTO 1500 @ײ
#ELSEACT
MESSAGEBOX ϵͳУԺ
break

[@ײ]
#IF
EQUAL N$ִ 1
#ACT
READPROCESS ../../../../996Bossϵͳ/game/DONRECEIPT_<$STR(S$˺)>_<$STR(T13)>.txt 0 Sִ
EXTRACTSTRING ":" <$STR(Sִ)> SCode 1
EXTRACTSTRING ":" <$STR(Sִ)> SArg1 2
EXTRACTSTRING ":" <$STR(Sִ)> SArg2 3
EXTRACTSTRING ":" <$STR(Sִ)> SArg3 4
EXTRACTSTRING ":" <$STR(Sִ)> SArg4 5
EXTRACTSTRING ":" <$STR(Sִ)> SArg5 6
EXTRACTSTRING ":" <$STR(Sִ)> SArg6 7
EXTRACTSTRING ":" <$STR(Sִ)> SArg7 8
EXTRACTSTRING ":" <$STR(Sִ)> SArg8 9
;---- ǰ10УDONLIST  S| ͷ----
READPROCESS ../../../../996Bossϵͳ/game/DONLIST_<$STR(S$˺)>_<$STR(T13)>.txt 0 S1
READPROCESS ../../../../996Bossϵͳ/game/DONLIST_<$STR(S$˺)>_<$STR(T13)>.txt 1 S2
READPROCESS ../../../../996Bossϵͳ/game/DONLIST_<$STR(S$˺)>_<$STR(T13)>.txt 2 S3
READPROCESS ../../../../996Bossϵͳ/game/DONLIST_<$STR(S$˺)>_<$STR(T13)>.txt 3 S4
READPROCESS ../../../../996Bossϵͳ/game/DONLIST_<$STR(S$˺)>_<$STR(T13)>.txt 4 S5
READPROCESS ../../../../996Bossϵͳ/game/DONLIST_<$STR(S$˺)>_<$STR(T13)>.txt 5 S6
READPROCESS ../../../../996Bossϵͳ/game/DONLIST_<$STR(S$˺)>_<$STR(T13)>.txt 6 S7
READPROCESS ../../../../996Bossϵͳ/game/DONLIST_<$STR(S$˺)>_<$STR(T13)>.txt 7 S8
READPROCESS ../../../../996Bossϵͳ/game/DONLIST_<$STR(S$˺)>_<$STR(T13)>.txt 8 S9
READPROCESS ../../../../996Bossϵͳ/game/DONLIST_<$STR(S$˺)>_<$STR(T13)>.txt 9 S10
;---- ˰ǰ10УDONLIST  P| ͷ10~19----
READPROCESS ../../../../996Bossϵͳ/game/DONLIST_<$STR(S$˺)>_<$STR(T13)>.txt 10 S11
READPROCESS ../../../../996Bossϵͳ/game/DONLIST_<$STR(S$˺)>_<$STR(T13)>.txt 11 S12
READPROCESS ../../../../996Bossϵͳ/game/DONLIST_<$STR(S$˺)>_<$STR(T13)>.txt 12 S13
READPROCESS ../../../../996Bossϵͳ/game/DONLIST_<$STR(S$˺)>_<$STR(T13)>.txt 13 S14
READPROCESS ../../../../996Bossϵͳ/game/DONLIST_<$STR(S$˺)>_<$STR(T13)>.txt 14 S15
READPROCESS ../../../../996Bossϵͳ/game/DONLIST_<$STR(S$˺)>_<$STR(T13)>.txt 15 S16
READPROCESS ../../../../996Bossϵͳ/game/DONLIST_<$STR(S$˺)>_<$STR(T13)>.txt 16 S17
READPROCESS ../../../../996Bossϵͳ/game/DONLIST_<$STR(S$˺)>_<$STR(T13)>.txt 17 S18
READPROCESS ../../../../996Bossϵͳ/game/DONLIST_<$STR(S$˺)>_<$STR(T13)>.txt 18 S19
READPROCESS ../../../../996Bossϵͳ/game/DONLIST_<$STR(S$˺)>_<$STR(T13)>.txt 19 S20
;---- S||| | з֣----
EXTRACTSTRING "|" <$STR(S1)> S1 2
EXTRACTSTRING "|" <$STR(S1)> S1 3
EXTRACTSTRING "|" <$STR(S2)> S2 2
EXTRACTSTRING "|" <$STR(S2)> S2 3
EXTRACTSTRING "|" <$STR(S3)> S3 2
EXTRACTSTRING "|" <$STR(S3)> S3 3
EXTRACTSTRING "|" <$STR(S4)> S4 2
EXTRACTSTRING "|" <$STR(S4)> S4 3
EXTRACTSTRING "|" <$STR(S5)> S5 2
EXTRACTSTRING "|" <$STR(S5)> S5 3
EXTRACTSTRING "|" <$STR(S6)> S6 2
EXTRACTSTRING "|" <$STR(S6)> S6 3
EXTRACTSTRING "|" <$STR(S7)> S7 2
EXTRACTSTRING "|" <$STR(S7)> S7 3
EXTRACTSTRING "|" <$STR(S8)> S8 2
EXTRACTSTRING "|" <$STR(S8)> S8 3
EXTRACTSTRING "|" <$STR(S9)> S9 2
EXTRACTSTRING "|" <$STR(S9)> S9 3
EXTRACTSTRING "|" <$STR(S10)> S10 2
EXTRACTSTRING "|" <$STR(S10)> S10 3
;---- ˰P||˺||----
EXTRACTSTRING "|" <$STR(S11)> S1 2
EXTRACTSTRING "|" <$STR(S11)> S1 4
EXTRACTSTRING "|" <$STR(S12)> S2 2
EXTRACTSTRING "|" <$STR(S12)> S2 4
EXTRACTSTRING "|" <$STR(S13)> S3 2
EXTRACTSTRING "|" <$STR(S13)> S3 4
EXTRACTSTRING "|" <$STR(S14)> S4 2
EXTRACTSTRING "|" <$STR(S14)> S4 4
EXTRACTSTRING "|" <$STR(S15)> S5 2
EXTRACTSTRING "|" <$STR(S15)> S5 4
EXTRACTSTRING "|" <$STR(S16)> S6 2
EXTRACTSTRING "|" <$STR(S16)> S6 4
EXTRACTSTRING "|" <$STR(S17)> S7 2
EXTRACTSTRING "|" <$STR(S17)> S7 4
EXTRACTSTRING "|" <$STR(S18)> S8 2
EXTRACTSTRING "|" <$STR(S18)> S8 4
EXTRACTSTRING "|" <$STR(S19)> S9 2
EXTRACTSTRING "|" <$STR(S19)> S9 4
EXTRACTSTRING "|" <$STR(S20)> S10 2
EXTRACTSTRING "|" <$STR(S20)> S10 4
;---- չʾ ----
#IF
EQUAL SCode 50
#ACT
MOV N$ִ 0
MESSAGEBOX <$STR(SArg7)> ס\nҵķ<$STR(SArg1)> <$STR(SArg3)> ۼ<$STR(SArg2)>\nҵĸˣ<$STR(SArg5)> ۼ<$STR(SArg4)>\nܶ<$STR(SArg6)>\n\n==  ==\n1.<$STR(S1)>:<$STR(S1)>\n2.<$STR(S2)>:<$STR(S2)>\n3.<$STR(S3)>:<$STR(S3)>\n4.<$STR(S4)>:<$STR(S4)>\n5.<$STR(S5)>:<$STR(S5)>\n6.<$STR(S6)>:<$STR(S6)>\n7.<$STR(S7)>:<$STR(S7)>\n8.<$STR(S8)>:<$STR(S8)>\n9.<$STR(S9)>:<$STR(S9)>\n10.<$STR(S10)>:<$STR(S10)>\n\n==  ==\n1.<$STR(S1)>:<$STR(S1)>\n2.<$STR(S2)>:<$STR(S2)>\n3.<$STR(S3)>:<$STR(S3)>\n4.<$STR(S4)>:<$STR(S4)>\n5.<$STR(S5)>:<$STR(S5)>\n6.<$STR(S6)>:<$STR(S6)>\n7.<$STR(S7)>:<$STR(S7)>\n8.<$STR(S8)>:<$STR(S8)>\n9.<$STR(S9)>:<$STR(S9)>\n10.<$STR(S10)>:<$STR(S10)>
break
#ELSEACT
MOV N$ִ 0
MESSAGEBOX δִԺԣȷϲɼѵ¼
break