home *** CD-ROM | disk | FTP | other *** search
/ Frozen Fish 1: Amiga / FrozenFish-Apr94.iso / bbs / alib / d5xx / d594 / analyrimsrc.lha / AnalyRimSrc / AnaRimSrcDoc.Zoo / lxcit.blk < prev    next >
Text File  |  1991-09-30  |  1KB  |  28 lines
  1. C
  2. C     THIS COMMON BLOCK CONTAINS INFORMATION ABOUT THE CURRENT ITEM.
  3. C
  4. C              FIRST....FIRST CHARACTER OF ITEM.
  5. C              LAST.....LAST CHARACTER OF ITEM.
  6. C              TYP......TYP OF ITEM  ONE OF THE FOLLOWING:
  7. C                       INTGER - IVAL SET TO VALUE
  8. C                       REAL   - RVAL SET TO VALUE
  9. C                       TEXT   - NO VALUE RETURNED
  10. C                       SAME (*N ITEMS) - IVAL=N
  11. C                       ALLSAM (** ITEMS)
  12. C                       REPEAT (*=N ITEMS) IVAL=N
  13. C                       GENRAT (*+N ITEMS) IVAL=N
  14. C                       COMMA -  MAKE A -NULL- ITEM
  15. C              IVALUE...INTEGER VALUE RETURN
  16. C              RVALUE...REAL VALUE RETURN
  17. C              NOEND....LOGICAL .TRUE. IFF END-OF-LINE ENCOUNTERED
  18. C                       WITHOUT END-OF-QUOTE OR END-OF-COMMENT.
  19. C
  20. C              FOR REPEAT ITEMS OF THE FORM *=N?VALUE WHERE ? IS + OR -
  21. C              IGEN.....INTEGER GENERATION VALUE
  22. C              RGEN.....REAL GENERATION VALUE
  23. C              TGEN.....TYPE OF GENERATION VALUE (REAL,TEXT OR NULL)
  24. C
  25.       COMMON /LXCIT/FIRST,LAST,TYP,IVALUE,RVALUE,NOEND,IGEN,RGEN,TGEN
  26.       INTEGER FIRST,LAST,TYP,TGEN
  27.       LOGICAL NOEND
  28.