home *** CD-ROM | disk | FTP | other *** search
/ Turbo Toolbox / Turbo_Toolbox.iso / sharew / exoten / rec / edit.rec < prev    next >
Encoding:
INI File  |  1990-08-08  |  5.9 KB  |  83 lines
  1. [EDIT.REC]
  2. {{(''0x);)~
  3. (0x((@~J(A)JZD@L:
  4. @~JZ<(Z<('b'Ez;J'd'Ez;J'p'Ez;>)>jJ><0x](A);>)>' 'Ez' 'FzJZD0x[' no lleva mas de 1 argumento'Ixt:
  5. @~JZ<(Z<('m'Ez;J't'Ez;>)>jJ><0x](A);>)>' 'Ez1(a;L)zJZD0x[' no lleva argumentos'Ixt:
  6. @~J'b'EzZ<(' 'Ez0x];J(A)0x];>)>JZD0x[@S8x({(''8x);)~((@~JZ<(Z<(':'Fz;J;>)>(Z<'\'Fz>:J>;)jJ><8x](A);>)>JZDz<0x[(JZ<(@g;J;>)>(A)JZ'*.*'I;Z;)@SxS(J('Not Found'Ez)JZ0x({(''0x);)~((@~J9(a;L)z0x]JZD0x[0%I;Z;)@~1x:;)}>z<xA:;)JZDZ>@O;Z;)@~1x:;)}:
  7. @~J'd'EzZ<(' 'Ez0x];J(A)0x];>)>JZDz<0x[(JZ<(@g;J;>)>(A)JZ'*.*'I;Z;)@S',16'IxS(J('Not Found'Ez)JZ0x({(''0x);)~((@~J16%Ez8(a;L)z0x]JZD0x['\'I0%I;JZ@~J9(a;L)z0x]JZD0x[0%I;Z;)@~1x:;)}>z<xA:;)JZDZ>(J(A)JZD'No se encontraron'Ixt;JZ@D;):
  8. @~J'e'Ez(A)JZD@E:
  9. @~J'e 'Ez0x]JZDz<0x[' 'I0x(1x({(''0 1x);)~((@~J{(' 'Ez1x];)#(' '0x>;)}JZD0x[@E>z<1x[:;)Z>@~2x:;)}:
  10. @~J'l 'Ez0x]JZDz<0x[' 'I0x(1x({(''0 1x);)~((@~J{(' 'Ez1x];)#(' '0x>;)}JZD0x[@S8x({(''8x);)~((@~JZ<(Z<(':'Fz;J;>)>(Z<'\'Fz>:J>;)jJ><8x](A);>)>JZDz<0x[@SxS(J('Not Found'Ez)JZ0x({(''0x);)~((@~J9(a;L)z0x]JZD':::::::::: 'I8x[0x[' ::::::::::'Ixtz<@T>;Z;)@~1x:;)}>z<xA:;)JZDZ>;Z;)@~1x:;)}>z<1x[:;)Z>@~2x:;)}:
  11. @~J'm'EzJZD{(Jx|;)~('ARR:pfx[1]'IxRA;;)}x~(J(A)JZD'r'xL':'I;Z;)xt:
  12. @~J'p'EzZ<(' 'Ez0x];J(A)0x];>)>JZD0x['&''u'x&(J(A)JZD'ARR:pfx[1]'IxW;JZJ@g(A)JZ@X;JZ'\'IJ@g(A)JZ@X;JZD0x[' no reconocido como prefijo'Ixt;):
  13. @~J't'EzJZD'Fin'I;
  14. @~J'?'EzJZD'b [arch]        borra archivos'I2573,I'd [arch]        lista archivos existentes'I2573,I'e [arch ...]    edita uno o mas archivos'I2573,I'l [arch ...]    lista contenido de archivos'I2573,I'm               muestra prefijo en uso'I2573,I'p [dir]         indica prefijo a usar'I2573,I't               termina la corrida'I2573,I'?               muestra esta lista'Ixt:
  15. @~JZD'Orden desconocida; ? da instrucciones'Ixt:
  16. Z;)@~1x:;)}C
  17. {(''0x);)~
  18. (0x((@~J0x]JZD0x['X.$$$'I'r'xOz<0x['X.$$$'IxCJZD>(J(A)JZD'ARR:pfx[1],'I0x[xW;JZD0x['X.$$$'I'w'xOz<0x['X.$$$'IxCz<0x['X.$$$'IxD>JZD>(J(A)JZD'ARR:pfx[1],'I0x[xW;JZD0x[': prefijo ilegal'Ixt;););
  19. Z;)@~1x:;)}X
  20. {(J'0'EzJZD'MEM:path'I'r'xOz<{(Jx|;)~('MEM:path'IxRA;;)}x~0x(1x({(''0 1x);)~((@~J(Z<24%EzJ>)J>{(';'Ez1x];)#(';'0x>;)}JZD>z<0x['SCR.REC'I'r'xOz<0x['SCR.REC'IxCJZD>(J(A)JZD24%Iz<0x['SCR,'Iz<@Q>xV>z<'ARR:frst[1],1'IxW>;JZD1x[;):;)JZ0x({(''0x);)~((@~J24%Ez0x]JZD0x[;JZD'No encuentro SCR.REC'Ixt;)@~1x:;)}Z>@~2x:;)};
  21. J'1'EzJZD@Q@ ;
  22. Z;)}V
  23. {(J(A)JZD@F(J(A)JZD@G;Z;)@S29x({(''29x);)~((@~J29x]JZD' ... editando 'I29x[xtz<29x['r'xOz<@K>(J1(a;L)zJZD29x['w'xOz<@K>z<29x[xDJZD>;Z;)(J(A)JZD29x[','Iz<{(Jx|;)~('ARR:frst[1]'IxRA;;)}x~@V>(J{(','Ez(A);)#(','29x>;)}JZD;JZz<29x[@BxDz<29x[@B','I29x[xN>JZD>z<29x['w'xO(J((A))JZD'No puedo escribir 'I29x[xt;Z;)>xWJZD@K;);JZD'No puedo crear 'I29x[xt;)>;Z;)@~1x:;)};
  24. J@n(A)JZ@M:
  25. JZ': nombre ilegal'Ixt;
  26. Z;)}E
  27. {(''0 1 2x);)~
  28. (0x(1x(2x((@~JZ<(60(a;L)z'    'EzjJ><0x](A);>)>{(0%Ez2x];)#(0%1x>;)}JZD0x[1x[xt2x[:
  29. @~J{(0%Ez1x];)#(0%0x>;)}JZD0x['                'I0x({(''0x);)~((@~JZ<((Z<16(a;L)z>:J>;)jJ><0x](A);>)>JZD0x[;Z;)@~1x:;)}1x[:
  30. @~J(A)JZD;
  31. @~JZxt;
  32. Z;)@~3x:;)}D
  33. {(''1 2x);)~
  34. (1x(2x((@~J(A)JZD;
  35. @~J{(0%Ez2x];)#(0%1x>;)}JZD{(Jx|;)~('TTY:Borro 'I8x[1x['? (si/no/abandona/muestra) 'IxRA;;)}x~'&''l'x&(J's'EzJZD8x[1x[xD2x[;JZJ'a'EzJZD;JZJ'm'EzJZD8x[1x['r'xOz<{(J70(a;L)z;)~(8x[1x[xRABD;;)}'&''p'x&xt>z<8x[1x[xC>1x[0%I2x[;JZJ'n'EzJZD'Conservado'Ixt2x[;JZD1x[0%I2x[;):
  36. Z;)@~2x:;)}O
  37. {(Z<('A''Z'Mz;J'a''z'Mz;>)>;)l
  38. (Z<(@l;J'0''9'Mz;J'$'Ez;J'&'Ez;J'#'Ez;J'%'Ez;J39%Ez;J'('Ez;J')'Ez;J'-'Ez;J'@'Ez;J'^'Ez;J'{'Ez;J'}'Ez;J'~'Ez;J'`'Ez;J'!'Ez;>)>;)h
  39. (@h(Z<@h>:J>;);)s
  40. (Z<(@sjJ><(Z<9(a;L)zJ>)>Zz;>)>Z<('.'EzZ<((Z<@h>:J>;)jJ><(Z<4(a;L)zJ>)>Zz;>)>;J;>)>;)f
  41. (Z<(@l':'Ez;J;>)>Z<('\'Ez;J;>)>(Z<Z<('..'Ez;J'.'Ez;J@f;>)>'\'Ez>:J>;);)g
  42. (@g@f;)n
  43. (Z<(' 'Ez;J9%Ez;>)>;)b
  44. (@b(Z<@b>:J>;);)w
  45. (JZD{(Jx|;)~('ARR:file[1]'IxRA;;)}x~;)F
  46. (JZ'&''u'x&(J(Z<(@l':'Ez;J'\'Ez;>)>)x'D{(Jx|;)~('ARR:pfx[1]'IxRA;;)}x~64x[x";Z;);)S
  47. (JZDz<(J(A)JZD>z<{(Jx|;)~('TTY:Nombre del archivo: 'IxRA;;)}x~'&''u'x&(J@nJZQI<@M>;JZD'Nombre ilegal'Ixt;):;)Z>;)G
  48. (JZDz<{(Jx|;)~('TTY:edit> 'IxRA;;)}x~0x(1x({(''0 1x);)~((@~J{(@b@w1x];)#(0x<;)}JZD0x[z<1x[(J((A))JZD' 'I;Z;)>>z<1x[:;)Z>@~2x:;)};)L
  49. (JZD8x[0x['r'xO(J(A)JZDz<{(Jx|;)~(8x[0x[xRA;;)}x~(J(26%Ez)JZxt>z<{(Jx|;)~(8x[0x[xRA;;)}x~:;)JZDZ>;JZD;)z<8x[0x[xCJZD>;)T
  50. (JZD29x['r'xO(J(A)JZDz<{(Jx|;)~(29x[xRA;;)}x~(J(26%Ez)JZ10%I>z<{(Jx|;)~(29x[xRA;;)}x~:;)JZDZ>;JZD;)z<@K>;)Q
  51. (JZD29x[xCJZD;)K
  52. (JZD29x[0x({(''0x);)~((@~JZ<(Z<(@l':'Ez;J;>)>Z<('\'Ez;J;>)>(Z<@f'\'Ez>:J>;)@sjJ><0x](A);>)>JZD0x['.BAK'I;Z;)@~1x:;)};)B
  53. (x'D'ARR:file[1],'Iz<64x['&''u'x&>xWx";)M
  54. (JZ<0x(1x({(''0 1x);)~((@~J{(';'Ez1x];)#(';'0x>;)}JZD0x[(J@g(A)JZ';'I;JZ'\;'I;)>z<1x[:;)Z>@~2x:;)};)Z
  55. (JZD';AUTLIB\;'Iz<30x[0x({(''0x);)~((@~J(l('PATH='(Fz;ZzqL)qL{(0%Ez;)#(0%0x>;)}L;Y)L;x{AB:)JZD0x[';'I@Z;JZD;)@~1x:;)}>13%I0x({(''0x);)~((@~J0x]JZD'MEM:path,'Iz<0x['&''!'x&>'w'xOz<'MEM:path,'I0x[xW>;Z;)@~1x:;)}z<'ARR:file,1,100'I'w'xO>z<'ARR:pfx,1,100'I'w'xO>z<'ARR:frst,1,2'I'w'xO>z<'ARR:frst[1],0'IxW>z<'EDIT.CNV'I2573,I'Copyright (c) 1989 - Gerardo Cisneros'I2573,I'DERECHOS RESERVADOS'I2573,Ixt>z<{(Jx|;)~('TTY:Oprima <return> para continuar 'IxRA;;)}x~JZD>;)P
  56. (J(A)JZD@Pz<@M>z<'?'I@C>;
  57. x'D@Pz<@M>z<'e 'I64x[@C>x";
  58. Z;)}~
  59. {(-1='Not Found'I;) v
  60. ((' 'FZD;Z;)0%IJ;) u
  61. (x+'Terminated'TLxE_) M
  62. ((B13%ED;;)J(10%FD:;)J(26%FBAZD;;)Z;) ~
  63. (13%Fz;26%F((2b);J6666,EA;zBj;)z;) |
  64. (512eqm29$rn|63K0(=)(a;L)LzZD(B26%ED:;)Y;DLL) y
  65. (J(2573FDZQmD;''m;)l30$SJ('L/'FDZ<(' 'FjJ;;)QD>
  66. ((B;;)' 'ED;;);'';)mZ
  67. 188cmpw'M'$r(f:;)wnpG66-,127$Sx@
  68. 'vuM~|y'I<z(BQD@s:;)>0,31$S
  69. nI<(A1b':'(E)'\'(E);'CNVLIB.REC'I;;)0%IJQD>
  70. 30$ryGI<@ppGm(pL61K-1(=);LLL@o:lyG' Not Found'|T_)
  71. 29$SnLLLLJZD>
  72. 't S A a L Lr& &uW O OrC OwD m V N &l&p64&!'m(32$r0=0''CLpLr32$S;;)LZz;) x
  73. (';'FDJ<((A);1b'\'E;'\'I;)JQD>lyG|;) o
  74. ('PATH='(F)JZD;(0%U;zZ;)QJZD(''=;';'=;I';'I;)J;) p
  75. (pG$r&\pG+127$r+S;) s
  76. (Z>zZ<(J@|J><z@~J;@y:Z26%I:)26%EnL0pG29$rpGm62knS;
  77. J('['ED']'FDJ<Z((2b)>JZD;QDlyw&FwJZD>;w:):Z;)
  78. >J<'[!]'FDBQD\pG+127$r+mJq32$rC
  79. mpGlyG-'w'$r'x'$r-
  80. (NLnLq'x'$rC&'x'$SnS;32$SnnS;)D::) w
  81. (@x<<@w>JZD>;)} %
  82. (@%@~xTxE;) }
  83.