home *** CD-ROM | disk | FTP | other *** search
/ Chip Hitware 6 A / CHIP_HITWARE6_A.iso / tools / Dana / MarkList.DAS < prev    next >
Text File  |  1998-01-18  |  198b  |  14 lines

  1. '
  2. ' Caption listing short Script
  3. '
  4. Main ()
  5.     Dim L%, M%
  6.     L% = GetTopLine()
  7.     M% = GetNextMark(L%)
  8.     If (M%) Then
  9.         If .MarkListOn = False Then
  10.             Command("MarkList");
  11.         End If
  12.     End If
  13. End
  14.