home *** CD-ROM | disk | FTP | other *** search
/ DP Tool Club 15 / CD_ASCQ_15_070894.iso / vrac / rh_logn1.zip / 208.PPE (.txt) < prev    next >
PCBoard Programming Language Executable  |  1994-06-05  |  891b  |  81 lines
  1. ;------------------------------------------------------------------------------
  2. ;                                                   .ss.
  3. ;                                                   `²²'
  4. ;             .,sS$Ss,,s$  .,sS$$$Ss.  .,sS$Ss,,s$ .ss.  .sSs.
  5. ;           .d$$²^°²$$$$'.d$P²°^^²$P'.d$$²^°²$$$$'.$$$' .$$$²Sb,.
  6. ;           $$$'   .$$$' $$$²Sçsµ²' .$$$'   .$$$'.$$$' .$$$'  `$$b.
  7. ;           $$$b,,d$$$' ,$$$b,....,s$$$$b,,d$$$'.$$$;.,$$$'    ;$$$
  8. ;           `²S$$S²²S$$S²°²S$$$$S²°°²S$$$$$$',$$S²°²S$S'.sS$$$P²'
  9. ;                                    .sS²°$$$²²°"'       d²°'
  10. ;                                  .$$²  .$$'
  11. ;                                  $$$.,d$$'
  12. ;                                  `²S$$S²'
  13. ;------------------------------------------------------------------------------
  14. ; P.P.L.X. 2.OO                          (C)1996 - Lone Runner / AEGiS CoRP'96 
  15. ;------------------------------------------------------------------------------
  16. ; PPE 2.OO (plain) - Analysis ON - Postprocessing ON
  17. ;------------------------------------------------------------------------------
  18.  
  19.     String   STRING001
  20.     String   STRING002
  21.     String   STRING003
  22.     String   STRING004
  23.  
  24. ;------------------------------------------------------------------------------
  25.  
  26.     FOpen 1, PPEPath() + "rh_login.CFG", 0, 0
  27.     FGet 1, STRING001
  28.     FGet 1, STRING001
  29.     FGet 1, STRING001
  30.     FGet 1, STRING001
  31.     FGet 1, STRING001
  32.     FGet 1, STRING001
  33.     FGet 1, STRING001
  34.     FGet 1, STRING001
  35.     FGet 1, STRING001
  36.     FGet 1, STRING001
  37.     FGet 1, STRING001
  38.     FGet 1, STRING001
  39.     FGet 1, STRING002
  40.     FGet 1, STRING003
  41.     FGet 1, STRING004
  42.     FClose 1
  43.     AnsiPos STRING002, STRING003
  44.     Print STRING004
  45.     AnsiPos 1, 21
  46.  
  47. ;------------------------------------------------------------------------------
  48. ;
  49. ; Usage report (before postprocessing)
  50. ;
  51. ; ■ Statements used :
  52. ;
  53. ;    1       Print 
  54. ;    1       FOpen 
  55. ;    1       FClose 
  56. ;    15      FGet 
  57. ;    2       AnsiPos 
  58. ;
  59. ;
  60. ; ■ Functions used :
  61. ;
  62. ;    1       +
  63. ;    1       PPEPath()
  64. ;
  65. ;------------------------------------------------------------------------------
  66. ;
  67. ; Analysis flags : No flag
  68. ;
  69. ;------------------------------------------------------------------------------
  70. ;
  71. ; Postprocessing report
  72. ;
  73. ;    0       For/Next
  74. ;    0       While/EndWhile
  75. ;    0       If/Then or If/Then/Else
  76. ;    0       Select Case
  77. ;
  78. ;------------------------------------------------------------------------------
  79. ;                 AEGiS Corp - Break the routines, code against the machines!
  80. ;------------------------------------------------------------------------------
  81.