home *** CD-ROM | disk | FTP | other *** search
/ PC Online 1999 May / PC_ONLINE_5_99.ISO / filesbbs / dos / afx_512.exe / TEMPLATE.ZIP / LIST.APL < prev    next >
Encoding:
Text File  |  1998-10-09  |  1.8 KB  |  58 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. @test(@pfileecho,<>,null)
  30. @assign(@pendcnt,0)
  31. @pendingbegin
  32. @test(@pendcnt,=,0)
  33.   The following fileechos have been requested by our uplink, for you:
  34.  
  35.   Fileecho      Description                                          Date
  36.   ---------------------------------------------------------------------------
  37. @end
  38.   @just(@pfileecho,L,14)@just(@pdesc,L,53)@pdate
  39. @add(@pendcnt,1)
  40. @end
  41. @test(@pendcnt,<>,0)
  42.   ---------------------------------------------------------------------------
  43.   @pendcnt echo(s)
  44. @end
  45. @end
  46.  
  47.  
  48. @test(@count,<>,0)
  49. "+"  You are connected to the fileecho and only receive files from our system.
  50. "*"  You are connected to the fileecho and only send files to our system.
  51. "&"  You are connected to the fileecho and both send and receive files.
  52. "-"  You do not have access to the fileecho.
  53. " "  You are not connected to the fileecho.
  54. @end
  55.  
  56. ---
  57.  * Origin: use %HELP for help using the AreaMgr in ALLFIX (@akatouse)
  58.