label 开始
set 原地保护,0
delay 200
ifitem 空位,>,0,加忠诚
delay 200
msg 道具栏没有空位了！
goto 结束
label 加忠诚
log 1
waitmap 2000,1,-1
walkpos 89,51 
walkpos 86,54 
walkpos 87,54 
walkpos 88,54 
ifpos 88,54,+2
goto -7
ifpet 1,=,空位,+5
call 买忠诚之心
useitem 忠诚之心,1
check 宠物1,忠诚,>=,100,+2
goto -3
ifpet 2,=,空位,+5
call 买忠诚之心
useitem 忠诚之心,2
check 宠物2,忠诚,>=,100,+2
goto -3
ifpet 3,=,空位,+5
call 买忠诚之心
useitem 忠诚之心,3
check 宠物3,忠诚,>=,100,+2
goto -3
ifpet 4,=,空位,+5
call 买忠诚之心
useitem 忠诚之心,4
check 宠物4,忠诚,>=,100,+2
goto -3
ifpet 5,=,空位,+5
call 买忠诚之心
useitem 忠诚之心,5
check 宠物5,忠诚,>=,100,+2
delay 500
goto 加魅力
label 买忠诚之心
say 23页，Sz.互聯社--大山小腳本-买
waitdlg ?,0,2,-1
buy 20,1
delay 100
return

label 加魅力
walkpos 87,54 
walkpos 86,54 
walkpos 85,54 
walkpos 84,54 
walkpos 83,54 
walkpos 82,54 
walkpos 81,54 
walkpos 80,54 
walkpos 79,54 
walkpos 78,54 
walkpos 77,54 
walkpos 76,54 
walkpos 75,54 
walkpos 74,54 
walkpos 73,54 
walkpos 72,54 
walkpos 71,54 
walkpos 70,54 
walkpos 69,54 
walkpos 68,55 
walkpos 67,56 
walkpos 66,57 
walkpos 65,58 
walkpos 64,58 
walkpos 63,58 
walkpos 62,58 
walkpos 61,58 
walkpos 60,58 
walkpos 59,58 
walkpos 59,57 
w 59,57,A 
delay 500
say 23页，Sz.互聯社--大山小腳本-买
waitdlg ?,0,2,-1
buy 10,1
delay 500
useitem ?魅力橘子
goto 结束
label 结束
delay 500
end

