home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 3 Comm / 03-Comm.zip / stpm231.zip / PC-MES.NAV < prev    next >
Text File  |  1996-01-25  |  2KB  |  104 lines
  1. ;
  2.     send    "jos2\r"
  3.     loop
  4.         wait    10,"(H,Q,E,J)=","ëƒé╡é─ë║é│éó="
  5.         if cc == 1 break;
  6.         send    \r
  7.     endloop
  8.     send    "3\r"
  9.     logfile    close
  10. ;
  11.     wait    20,"F,H,Q,J)="
  12.     send    "1\r"            ; éPüDénérü^éQìLÅΩ
  13. ;
  14.     wait    20,"RNm,RTm,J)="
  15. os2:
  16.     send    "rn1\r"            ; éPü|éPüDénérü^éQÆkÿbÄ║
  17.     wait    20,"RT,TL,TLn,J)=","RNm,RTm,J)="
  18.     if cc ne 1 goto program
  19.     send    "rb-\r"
  20.     wait    20,"rb-"
  21.     msg    \n
  22.     logfile    open,os2.mes
  23.     wait    40,"ö╘ìåé▄é╜é═âRâ}âôâh"
  24.     logfile    close
  25.     wait    40,"TLn,AP,PF,J)="
  26.     send    "f\r"
  27. ;    wave    e:\mmos2\sounds\ratattat.wav
  28. ;
  29.     wait    20,"RNm,RTm,J)="
  30. program:
  31.     send    "rn2\r"            ; éPü|éQüDâvâìâOâëâ}ëíƼ
  32.     wait    20,"RT,TL,TLn,J)=","RNm,RTm,J)="
  33.     if cc ne 1 goto beginer
  34.     send    "rb-\r"
  35.     wait    20,"rb-"
  36.     msg    \n
  37.     logfile    open,program.mes
  38.     wait    40,"ö╘ìåé▄é╜é═âRâ}âôâh"
  39.     logfile    close
  40.     wait    40,"TLn,AP,PF,J)="
  41.     send    "f\r"
  42. ;    wave    e:\mmos2\sounds\ratattat.wav
  43. ;
  44.     wait    20,"RNm,RTm,J)="
  45. beginer:
  46.     send    "rn3\r"            ; éPü|éRüDénérü^éQôⁿûσ
  47.     wait    20,"RT,TL,TLn,J)=","RNm,RTm,J)="
  48.     if cc ne 1 goto inf3
  49.     send    "rb-\r"
  50.     wait    20,"rb-"
  51.     msg    \n
  52.     logfile    open,beginer.mes
  53.     wait    40,"ö╘ìåé▄é╜é═âRâ}âôâh"
  54.     logfile    close
  55.     wait    40,"TLn,AP,PF,J)="
  56.     send    "f\r"
  57. ;    wave    e:\mmos2\sounds\ratattat.wav
  58. ;
  59.     wait    20,"RNm,RTm,J)="
  60. inf3:    send    "s\r"
  61.     wait    20,"F,H,Q,J)="
  62.     send    "3\r"            ; éRüDÅεò±ânâCâEâFâC
  63. ;
  64.     wait    20,"RNm,RTm,J)="
  65. lan:
  66.     send    "rn1\r"            ; éRü|éPüDéké`émÅÇö⌡Ä║
  67.     wait    20,"RT,TL,TLn,J)=","RNm,RTm,J)="
  68.     if cc ne 1 goto inf4
  69.     send    "rb-\r"
  70.     wait    20,"rb-"
  71.     msg    \n
  72.     logfile    open,lan.mes
  73.     wait    40,"ö╘ìåé▄é╜é═âRâ}âôâh"
  74.     logfile    close
  75.     wait    40,"TLn,AP,PF,J)="
  76.     send    "f\r"
  77. ;    wave    e:\mmos2\sounds\ratattat.wav
  78. ;
  79.     wait    20,"RNm,RTm,J)="
  80. inf4:    send    "s\r"
  81.     wait    20,"F,H,Q,J)="
  82.     send    "4\r"            ; éSüDépüòé`
  83. ;
  84.     wait    20,"RNm,RTm,J)="
  85. qa_os2:
  86.     send    "rn1\r"            ; éSü|éPüDénérü^éQ
  87.     wait    20,"RT,TL,TLn,J)=","RNm,RTm,J)="
  88.     if cc ne 1 goto top
  89.     send    "rb-\r"
  90.     wait    20,"rb-"
  91.     msg    \n
  92.     logfile    open,qa_os2.mes
  93.     wait    40,"ö╘ìåé▄é╜é═âRâ}âôâh"
  94.     logfile    close
  95.     wait    40,"TLn,AP,PF,J)="
  96.     send    "f\r"
  97. ;    wave    e:\mmos2\sounds\ratattat.wav
  98. ;
  99.     wait    20,"RNm,RTm,J)="
  100. top:
  101.     send    "m\r"
  102.     wait    20,"(H,Q,E,J)="
  103. ;
  104.