home *** CD-ROM | disk | FTP | other *** search
/ Cocktail Hour / image.iso / COCKTAIL.DIR / objects_67_shop2temp.ls < prev    next >
Encoding:
Text File  |  1997-03-05  |  534 b   |  17 lines
  1. on mouseUp
  2.   global ShoppingLine
  3.   set x to the mouseLine
  4.   if x > 0 then
  5.     if the foreColor of line x of field "shop2temp" = 204 then
  6.       set the foreColor of line x + ShoppingLine - 1 of field "shop2" to 35
  7.       set the foreColor of line x of field "shop2temp" to 35
  8.     else
  9.       if the foreColor of line x of field "shop2temp" = 35 then
  10.         set the foreColor of line x of field "shop2temp" to 204
  11.         set the foreColor of line x + ShoppingLine - 1 of field "shop2" to 204
  12.       end if
  13.     end if
  14.   else
  15.   end if
  16. end
  17.