dim @name,@choose
let @choose,=,1
input @choose,取东西输入1，存东西输入2
if @choose,=,1,取
if @choose,=,2,存

label 取
let @name,=,鱼片
input @name,输入要取出的物品名字
run \99.【公用脚本】\getitem仓库.ASC
get @name
run \99.【公用脚本】\getitem个人.ASC
get @name
end

label 存
let @name,=,鱼片
input @name,输入要取出的物品名字
run \99.【公用脚本】\saveitem仓库.ASC
put @name
run \99.【公用脚本】\saveitem个人.ASC
put @name
end
