home *** CD-ROM | disk | FTP | other *** search
/ PC Pro 2000 February / DPPCPRO0200.ISO / ps10.dxr / Scripts_13_iniScroll.ls < prev    next >
Encoding:
Text File  |  1999-10-26  |  1.1 KB  |  19 lines
  1. property fieldName, barTop, barBottom, textTop, textBottom, textSprite, barSprite
  2. global gScrollChild
  3.  
  4. on exitFrame me
  5.   gScrollChild = new(script("scrollParent"), fieldName, barTop, barBottom, textTop, textBottom, textSprite, barSprite)
  6. end
  7.  
  8. on getPropertyDescriptionList
  9.   description = [:]
  10.   addProp(description, #fieldName, [#default: 0, #format: #field, #comment: "fieldNameToScroll"])
  11.   addProp(description, #barTop, [#default: 0, #format: #integer, #comment: "top locV of grabbable bar"])
  12.   addProp(description, #barBottom, [#default: 0, #format: #integer, #comment: "bottom locV of grabbable bar"])
  13.   addProp(description, #textTop, [#default: 0, #format: #integer, #comment: "top locV of text window"])
  14.   addProp(description, #textBottom, [#default: 0, #format: #integer, #comment: "bottom locV of text window"])
  15.   addProp(description, #textSprite, [#default: 0, #format: #integer, #comment: "sprite of text block to move", #range: [#min: 1, #max: 144]])
  16.   addProp(description, #barSprite, [#default: 0, #format: #integer, #comment: "sprite of grabbable bar", #range: [#min: 1, #max: 144]])
  17.   return description
  18. end
  19.