home *** CD-ROM | disk | FTP | other *** search
/ PC Online 1998 September / PCO_0998.ISO / filesbbs / dos / afx_511.exe / TEMPLATE.ZIP / LIST.APL < prev    next >
Encoding:
Text File  |  1997-08-02  |  1.7 KB  |  56 lines

  1. ; Template file: LIST.APL
  2. ; Type         : AreaMgr
  3. ;
  4. ; This template generates one list of all the fileechos with the access
  5. ; code in the first collumn.
  6. ;
  7. @assign(@count,0)
  8. @assign(@doneheader,"No")
  9. @areabegin
  10. @test(@doneheader,=,"No")
  11.   The following is a list of all the fileechos and your access level:
  12.  
  13.  
  14.   Fileecho      Description                                Avg Kb   Avg Files
  15.   ---------------------------------------------------------------------------
  16. @assign(@doneheader,"Yes")
  17. @end
  18. @echostat @just(@fileecho,L,14)@just(@echodesc,L,39) @just(@avgkb,R,9)   @just(@avgfiles,R,9)
  19. @add(@count,1)
  20. @end
  21. @test(@doneheader,=,"Yes")
  22.   ---------------------------------------------------------------------------
  23.   @count fileecho(s)
  24. @end
  25. @test(@count,=,0)
  26.   You are currently not connected to any fileechos
  27. @end
  28.  
  29. @assign(@pendcnt,0)
  30. @pendingbegin
  31. @test(@pendcnt,=,0)
  32.   The following fileechos have been requested by our uplink, for you:
  33.  
  34.   Fileecho      Description                                          Date
  35.   ---------------------------------------------------------------------------
  36. @end
  37.   @just(@pfileecho,L,14)@just(@pdesc,L,53)@pdate
  38. @add(@pendcnt,1)
  39. @end
  40. @test(@pendcnt,<>,0)
  41.   ---------------------------------------------------------------------------
  42.   @pendcnt echo(s)
  43. @end
  44.  
  45.  
  46. @test(@count,<>,0)
  47. "+"  You are connected to the fileecho and only receive files from our system.
  48. "*"  You are connected to the fileecho and only send files to our system.
  49. "&"  You are connected to the fileecho and both send and receive files.
  50. "-"  You do not have access to the fileecho.
  51. " "  You are not connected to the fileecho.
  52. @end
  53.  
  54. ---
  55.  * Origin: use %HELP for help using the AreaMgr in ALLFIX (@akatouse)
  56.