https://wwui.lanzouj.com/iDqzW1f358qj

-----------------------------------------------------------------------

[@main]

#if

#act

OPENMERCHANTBIGDLG 0 320 1 4 -20 -40 0 0 0 1

#say

<ImgEx:0:321:322:323:528:71/@离开>\

<ItemShow:700:0:370:80:0>\

<ItemShow:474:0:420:73:0>\

<ItemShow:630:0:447:75:0>\

<ItemShow:587:0:472:137:0>\

<ItemShow:97:0:460:171:0>\

<ItemShow:707:0:417:193:0>\

<ItemShow:468:0:366:189:0>\

<ItemShow:561:0:316:164:0>\

<ItemShow:670:0:274:106:0>\

<ItemShow:400:0:262:40:0>\

<ItemShow:710:0:273:-31:0>\

<ItemShow:27:0:316:-89:0>\

<ImgEx:0:326:327:326:354:-21|253#500W金币抽奖一次^253#第100次抽奖必得一百元人民币^-^215#当前抽奖次数：<$STR(U24)>次/@启动>\

[@离开]

#if

#act

close

CLEARDELAYGOTO

[@启动]

#if

not checkgold 5000000

#act

messagebox 没有足够的金币，无法抽奖！

break

#if

#act

inc U24 1

movr N$几率 1000

take 金币 5000000

#if

equal U24 100

#act

mov n$行数 0

goto @转圈

break