合成赚钱(家族).txt

stoneage free server patch

'小明制作  修正2004/11/20
msg 注意:由于脚本支持断线重登处理，请设置好登陆服务器和人物.||要求:1.声望1000以上的族长ID|     2.合成宠物为克克尔且为家族守护兽|     3.空出道具栏1-15位

set 关闭对话,0

ifmap 1009,+2
goto +2
ifpos 25,24,+4
cls
print 请在萨村便利店(东25南24)运行脚本！
end
say 卖
waitdlg 素材屋,1,5
call sell
delay 3000
button 取消
ifitem 1-15,=,空位,+4
cls
print 请清空道具栏1-15位！
end


label xx1
w 25,24,C
say hi
waitdlg 素材屋,1,30,err
set 关闭对话,1
'
label xx2
ifstone >=,10000,+2
call load
ifstone <=,550000,+2
call save
'
button *1,,,240
button *1|7,,,242  
button *9|7,,,242
button *0,,,242
doffitem 15
'
ll 0,加工,1|8
ll 0,加工,2|9
ll 0,加工,3|10
ll 0,加工,4|11
ll 0,加工,5|12
ll 0,加工,6|13
ll 0,加工,7|14
'
button *2,,,240
button *9|1,,,243
button *10|1,,,243
button *11|1,,,243
button *12|1,,,243
button *13|1,,,243
button *14|1,,,243
button *15|1,,,243
button *23|1,,,243
'
goto xx2


label load
load 10000,1
delay 5000
ifstone <,10000,+2
RETURN
load 10000
delay 5000
ifstone <,10000,+2
RETURN
log 2
msg 没钱了，脚本结束！
end

label save
save 500000,1
RETURN


label sell
sellitem 牙的碎片,1
sellitem 破烂的皮,1
sellitem 小牙,1
sellitem 易破的皮,1
sellitem 折断的牙,1
sellitem 薄的皮,1
sellitem 合成爪1,1
sellitem 合成爪 1,1
sellitem 合成爪 2,1
sellitem 合成爪 3,1
sellitem 合成爪 4,1
sellitem 合成爪 5,1
sellitem 合成爪 6,1
return


label err
log 0  
'
label .log. '重登后处理
set 关闭对话,0
waitdlg 石器时代online石头就业所,1,5,err
delay 250
button OK
ifstone <=,550000,+2
call save
ifitem 1-15,=,空位,xx1
w 25,24,C
say 卖
waitdlg 素材屋,1,30,err
call sell
delay 500
waititem 1-15,空位,30,+4
button 取消
delay 250
goto xx1
doffitem 1-15
goto -6


label .end.
set 关闭对话,0
end