home *** CD-ROM | disk | FTP | other *** search
/ Beijing Paradise BBS Backup / PARADISE.ISO / software / BBSDOORW / AFG_B014.ZIP / TEMPLATE.ZIP / UNLINKED.APL < prev    next >
Encoding:
Text File  |  1995-09-16  |  1.6 KB  |  58 lines
  1. ; Template file: UNLINKED.APL
  2. ; Type         : AreaMgr
  3. ;
  4. ; This template generates a two different lists:
  5. ;
  6. ; 1 - A list of all the areas the system is not connected to
  7. ; 2 - A list of all the areas the system does not have access to
  8. ;
  9. @assign(@bcount,0)
  10. @assign(@count,0)
  11. @assign(@doneheader,"No")
  12. @areabegin
  13. @test(@echostat,=," ")
  14. @test(@doneheader,=,"No")
  15.   You are not connected to the following fileechos:
  16.  
  17.   Fileecho      Description                                Avg Kb   Avg Files
  18.   ---------------------------------------------------------------------------
  19. @assign(@doneheader,"Yes")
  20. @end
  21.   @just(@fileecho,L,14)@just(@echodesc,L,39) @just(@avgkb,R,9)   @just(@avgfiles,R,9)
  22. @add(@count,1)
  23. @add(@bcount,1)
  24. @end
  25. @end
  26. @test(@doneheader,=,"Yes")
  27.   ---------------------------------------------------------------------------
  28.   @count fileecho(s)
  29. @end
  30.  
  31.  
  32. @assign(@count,0)
  33. @assign(@doneheader,"No")
  34. @areabegin
  35. @test(@echostat,=,"-")
  36. @test(@doneheader,=,"No")
  37.   You do not have access to the following fileechos:
  38.  
  39.   Fileecho      Description                                Avg Kb   Avg Files
  40.   ---------------------------------------------------------------------------
  41. @assign(@doneheader,"Yes")
  42. @end
  43.   @just(@fileecho,L,14)@just(@echodesc,L,39) @just(@avgkb,R,9)   @just(@avgfiles,R,9)
  44. @add(@count,1)
  45. @add(@bcount,1)
  46. @end
  47. @end
  48. @test(@doneheader,=,"Yes")
  49.   ---------------------------------------------------------------------------
  50.   @count fileecho(s)
  51. @end
  52. @test(@bcount,=,0)
  53.   You are connected to all available fileechos.
  54. @end
  55.  
  56. ---
  57.  * Origin: use %HELP for help using the AreaMgr in ALLFIX (@akatouse)
  58.