home *** CD-ROM | disk | FTP | other *** search
/ AMOS PD CD / amospdcd.iso / 601-625 / apd617 / len_tucker / bwidth.amos / bwidth.amosSourceCode
AMOS Source Code  |  1986-08-03  |  168b  |  9 lines
  1. ' classic only 
  2. Load "duck.abk"
  3. For Z=1 To Length(1)
  4. _BWIDTH[Z]
  5. Print "Width of bob";Z;" is";Param
  6. Next Z
  7. Procedure _BWIDTH[NBR]
  8. N=Deek(Sprite Base(NBR))*16
  9. End Proc[N]