BLUE-捐献系统

[@Mir2000_捐献系统NPC]

{

#IF

CHECKLEVELEX > 0

#ACT

MOV P0 0

CALCVAR HUMAN 捐献系统编号 = 0

CALCVAR HUMAN 捐献系统类型 = 人物

GOTO @Mir2000_捐献显示

BREAK

[@Mir2000_捐献显示]

#IF

CHECKLEVELEX > 0

#ACT

MOV S10 "                              "

MOV S11

MOV S12

CALCVAR HUMAN 捐献系统编号 + 1

MOV S31 <$HUMAN(捐献系统编号)><$STR(S10)>

DEC S31 4 500

MOV S30 ┆$(捐献系统编号颜色)

INC S30

INC S30 .<$STR(S31)>>┆

MOV S31 <$GLOBAL(捐献

INC S31 <$HUMAN(捐献系统类型)>姓名<$HUMAN(捐献系统编号)>

INC S31 )>

MOV S31 <$STR(S31)><$STR(S10)>

DEC S31 15 500

INC S30 $(捐献系统姓名颜色)

INC S30

INC S30 <$STR(S31)>>┆

MOV S31 <$GLOBAL(捐献

INC S31 <$HUMAN(捐献系统类型)>数量<$HUMAN(捐献系统编号)>

INC S31 )>

MOV S31 <$STR(S31)><$STR(S10)>

DEC S31 9 500

INC S30 $(捐献系统金额颜色)

INC S30

INC S30 <$STR(S31)>>┆

INI_READ_STRING ..\QuestDiary\Mir2000_捐献系统\Mir2000_捐献系统常量.ini Mir2000_捐献系统封号 <$HUMAN(捐献系统编号)> S11

STRTOK S11 S12 |

MOV S31 <$STR(S12)><$STR(S10)>

DEC S31 11 500

INC S30 <COLOR=$00FFA3

INC S30

INC S30 <$STR(S31)>>┆

MOV S31 <$STR(S11)><$STR(S10)>

DEC S31 13 500

INC S30 $(捐献系统属性颜色)

INC S30

INC S30 <$STR(S31)>>┆

MOV S21 <$STR(S30)>

;-------------------------------------

点击下载：BLUE-捐献系统.zip