Curio City 11/CURIO11.bin/pc/movie/shop/sakurain.dir/00335.ls

Text File | 1998-01-01 | 411 b | 18 lines

on mouseUp
  global guserlist
  repeat with n = 31 to 35
    puppetSprite(n, 0)
    set the visible of sprite n to 1
  end repeat
  set m to the money of guserlist
  set s to the sakuramoney of guserlist
  set m to s + m + getkinri()
  set the money of guserlist to m
  set the sakuramoney of guserlist to 0
  set gu2 to 0
  put integer(m) into field "money"
  setfontsakura()
  go("atm-m")
  updateStage()
end