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

Text File | 1998-01-01 | 600 b | 26 lines

on mouseUp
  global guserlist, gcultue
  set m to the money of guserlist
  if gcultue = 50 then
    alert("ﾃｯ窶佚ｧﾅ禿ﾃ陛､ﾃﾃｳﾃｾﾃﾂｵﾃﾆ津ﾂｮﾃﾃ凝窶ｹﾃﾃ敕B")
  else
    if m >= 500 then
      set the money of guserlist to m - 500
      set gcultue to 50
      repeat with n = 31 to 35
        puppetSprite(n, 0)
        set the visible of sprite n to 1
      end repeat
      go("500ue")
      exit
    else
      put m into field "money"
      repeat with n = 31 to 35
        puppetSprite(n, 0)
        set the visible of sprite n to 1
      end repeat
      go("500sita")
    end if
  end if
end