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

Text File | 1998-01-01 | 353 b | 19 lines

on mouseUp
  global guserlist
  set s to the sakuramoney of guserlist
  if s = 0 then
    exit
  end if
  set gokei to s + getkinri()
  put s
  if s > 0 then
    unLoad()
    put integer(gokei) into field "money"
    setfontsakura()
    go("hikidasi")
  else
    beep()
    alert("ﾃ･ﾂｪﾃｧ窶ｺﾃAﾃｳaﾃ｣窶｡ﾃｩcﾃｧﾃﾃﾃ陛窶ﾃﾃ凝窶ｹﾃﾃｾﾃﾃ津B")
  end if
end