-- card: 2725 from stack: in.bin
-- bmap block id: 3907
-- flags: 0000
-- background id: 3044
-- name: DragGrayRect


-- part 8 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=282 top=244 right=266 bottom=395
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: xbar


-- part 7 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=277 top=111 right=224 bottom=294
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: bar


-- part 1 (button)
-- low flags: 00
-- high flags: 8002
-- rect: left=337 top=180 right=212 bottom=425
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Drag me
----- HyperTalk script -----
on mouseDown
  set cursor to arrow
  put DragGrayRect(rect of me,n,rect of bg btn "demoarea") into r
  set rect of me to r
end mouseDown




-- part 5 (button)
-- low flags: 00
-- high flags: 8002
-- rect: left=243 top=191 right=223 bottom=331
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Drag me (y)
----- HyperTalk script -----
on mouseDown
  set cursor to arrow
  put DragGrayRect(rect of me,Y,rect of btn "bar") into r
  set rect of me to r
end mouseDown




-- part 6 (button)
-- low flags: 00
-- high flags: 8002
-- rect: left=305 top=245 right=264 bottom=394
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Drag me (x)
----- HyperTalk script -----
on mouseDown
  set cursor to arrow
  put DragGrayRect(rect of me,x,rect of btn "xbar") into r
  set rect of me to r
end mouseDown




-- part 12 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=277 top=76 right=91 bottom=386
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: x2bar


-- part 11 (button)
-- low flags: 00
-- high flags: 0002
-- rect: left=341 top=76 right=91 bottom=361
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Drag me (x)
----- HyperTalk script -----
on mouseDown
  set cursor to arrow
  put DragGrayRect(rect of me,x,rect of btn "x2bar") into r
  set rect of me to r
end mouseDown




-- part contents for background part 4
----- text -----
DESCRIPTION: 
   Drags a Gray rect.  

Written by: 
  wing eng ygxj@vax5.cornell.edu.  
It's free!!
                           ----------
SYNTAX:
   DragObjects <r1>[,<constrain>, <r2>]

<r1> - Gray rectangle.
<constrain> - x or y, to constrain gray rect movement.
<r2> - Constrains rect inside another.
                           ----------
RETURN: 
   Final rect coords


-- part contents for background part 25
----- text -----
DragObjects
Group


-- part contents for background part 32
----- text -----
     Wing Eng
     Cornell University
     Ithaca,NY 14853
     ygxj@cornella.bitnet
     ygxj@vax5.cit.cornell.edu
     3/21/89