home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 4 / FreshFish_May-June1994.bin / new / util / cli / parex / parexscripts / convertsys.pxs < prev    next >
Text File  |  1994-02-17  |  9KB  |  268 lines

  1. ; PARex v3.xx SCRIPT: "PAREX:ConvertSYS.pxs"
  2. ; ~~~~~~~~~~~~~~~~~~   ~~~~~~~~~~~~~~~~~~~~  
  3. ; Update: 13-Nov-93
  4.  
  5. ; $VER: ConvertSYS.pxs 39.00 (13.11.93) PARex v3.xx script for ConvertSYS.
  6.  
  7. ; NOTES: Converting ASCII codes: REPL \d<0..255> BY \d<0..255> 
  8. ;        Discarding ASCII codes: REPL \d<0..255> BY ""
  9.  
  10.  
  11. ; **
  12. ; ** AMIGA -> PC - OS/2 - UNIX
  13. ; **
  14.  
  15. MODE AMIGAtoPC
  16.  
  17.   REPL  \r\n   BY  \r\n         ; preserve CR+LF (e.g. CR+LF -> CR+LF, thus avoid CR+CR+LF!)
  18.   REPL  \n     BY  \r\n         ; add CR codes to LF (e.g. LF -> CR+LF)
  19.   REPL  \d199  BY  \d128        ; "Ç"
  20.   REPL  \d252  BY  \d129        ; "ü"
  21.   REPL  \d233  BY  \d130        ; "é"
  22.   REPL  \d226  BY  \d131        ; "â"
  23.   REPL  \d228  BY  \d132        ; "ä"
  24.   REPL  \d224  BY  \d133        ; "à"
  25.   REPL  \d229  BY  \d134        ; "å"
  26.   REPL  \d231  BY  \d135        ; "ç"
  27.   REPL  \d234  BY  \d136        ; "ê"
  28.   REPL  \d235  BY  \d137        ; "ë"
  29.   REPL  \d232  BY  \d138        ; "è"
  30.   REPL  \d239  BY  \d139        ; "ï"
  31.   REPL  \d238  BY  \d140        ; "î"
  32.   REPL  \d236  BY  \d141        ; "ì"
  33.   REPL  \d196  BY  \d142        ; "Ä"
  34.   REPL  \d197  BY  \d143        ; "Å"
  35.   REPL  \d201  BY  \d144        ; "É"
  36.   REPL  \d230  BY  \d145        ; "æ"
  37.   REPL  \d198  BY  \d146        ; "Æ"
  38.   REPL  \d244  BY  \d147        ; "ô"
  39.   REPL  \d246  BY  \d148        ; "ö"
  40.   REPL  \d242  BY  \d149        ; "ò"
  41.   REPL  \d251  BY  \d150        ; "û"
  42.   REPL  \d249  BY  \d151        ; "ù"
  43.   REPL  \d255  BY  \d152        ; "ÿ"
  44.   REPL  \d214  BY  \d153        ; "Ö"
  45.   REPL  \d220  BY  \d154        ; "Ü"
  46.   REPL  \d248  BY  \d155        ; "ø"
  47.   REPL  \d163  BY  \d156        ; "£"
  48.   REPL  \d216  BY  \d157        ; "Ø"
  49.   REPL  \d225  BY  \d160        ; "á"
  50.   REPL  \d237  BY  \d161        ; "í"
  51.   REPL  \d243  BY  \d162        ; "ó"
  52.   REPL  \d250  BY  \d163        ; "ú"
  53.   REPL  \d241  BY  \d164        ; "ñ"
  54.   REPL  \d209  BY  \d165        ; "Ñ"
  55.   REPL  \d191  BY  \d168        ; "¿"
  56.   REPL  \d172  BY  \d170        ; "¬"
  57.   REPL  \d189  BY  \d171        ; "½"
  58.   REPL  \d188  BY  \d172        ; "¼"
  59.   REPL  \d161  BY  \d173        ; "¡"
  60.   REPL  \d171  BY  \d174        ; "«"
  61.   REPL  \d187  BY  \d175        ; "»"
  62.   REPL  \d208  BY  \d177        ; "Ð"
  63.   REPL  \d223  BY  \d225        ; "ß"
  64.   REPL  \d181  BY  \d230        ; "µ"
  65.   REPL  \d177  BY  \d241        ; "±"
  66.   CLOSE \x1A                    ; add an end-of-file code
  67.  
  68.  
  69. MODE AMIGAtoOS2                 ; sames as AMIGAtoPC, except no end-of-file character is added.
  70.  
  71.   REPL  \r\n   BY  \r\n         ; preserve CR+LF (e.g. CR+LF -> CR+LF, thus avoid CR+CR+LF!)
  72.   REPL  \n     BY  \r\n         ; add CR codes to LF (e.g. LF -> CR+LF)
  73.   REPL  \d199  BY  \d128        ; "Ç"
  74.   REPL  \d252  BY  \d129        ; "ü"
  75.   REPL  \d233  BY  \d130        ; "é"
  76.   REPL  \d226  BY  \d131        ; "â"
  77.   REPL  \d228  BY  \d132        ; "ä"
  78.   REPL  \d224  BY  \d133        ; "à"
  79.   REPL  \d229  BY  \d134        ; "å"
  80.   REPL  \d231  BY  \d135        ; "ç"
  81.   REPL  \d234  BY  \d136        ; "ê"
  82.   REPL  \d235  BY  \d137        ; "ë"
  83.   REPL  \d232  BY  \d138        ; "è"
  84.   REPL  \d239  BY  \d139        ; "ï"
  85.   REPL  \d238  BY  \d140        ; "î"
  86.   REPL  \d236  BY  \d141        ; "ì"
  87.   REPL  \d196  BY  \d142        ; "Ä"
  88.   REPL  \d197  BY  \d143        ; "Å"
  89.   REPL  \d201  BY  \d144        ; "É"
  90.   REPL  \d230  BY  \d145        ; "æ"
  91.   REPL  \d198  BY  \d146        ; "Æ"
  92.   REPL  \d244  BY  \d147        ; "ô"
  93.   REPL  \d246  BY  \d148        ; "ö"
  94.   REPL  \d242  BY  \d149        ; "ò"
  95.   REPL  \d251  BY  \d150        ; "û"
  96.   REPL  \d249  BY  \d151        ; "ù"
  97.   REPL  \d255  BY  \d152        ; "ÿ"
  98.   REPL  \d214  BY  \d153        ; "Ö"
  99.   REPL  \d220  BY  \d154        ; "Ü"
  100.   REPL  \d248  BY  \d155        ; "ø"
  101.   REPL  \d163  BY  \d156        ; "£"
  102.   REPL  \d216  BY  \d157        ; "Ø"
  103.   REPL  \d225  BY  \d160        ; "á"
  104.   REPL  \d237  BY  \d161        ; "í"
  105.   REPL  \d243  BY  \d162        ; "ó"
  106.   REPL  \d250  BY  \d163        ; "ú"
  107.   REPL  \d241  BY  \d164        ; "ñ"
  108.   REPL  \d209  BY  \d165        ; "Ñ"
  109.   REPL  \d191  BY  \d168        ; "¿"
  110.   REPL  \d172  BY  \d170        ; "¬"
  111.   REPL  \d189  BY  \d171        ; "½"
  112.   REPL  \d188  BY  \d172        ; "¼"
  113.   REPL  \d161  BY  \d173        ; "¡"
  114.   REPL  \d171  BY  \d174        ; "«"
  115.   REPL  \d187  BY  \d175        ; "»"
  116.   REPL  \d208  BY  \d177        ; "Ð"
  117.   REPL  \d223  BY  \d225        ; "ß"
  118.   REPL  \d181  BY  \d230        ; "µ"
  119.   REPL  \d177  BY  \d241        ; "±"
  120.  
  121.  
  122. ; MODE AMIGAtoUNIX    (to be added when I get the codes)
  123.  
  124.  
  125.  
  126. ; **
  127. ; ** PC -> AMIGA - OS/2 - UNIX
  128. ; ** 
  129.  
  130. MODE PCtoAMIGA
  131.  
  132.   REPL  \r     BY  ""           ; remove CR codes (e.g. CR+LF -> LF)
  133.   REPL  \d128  BY  \d199        ; "Ç"
  134.   REPL  \d129  BY  \d252        ; "ü"
  135.   REPL  \d130  BY  \d233        ; "é"
  136.   REPL  \d131  BY  \d226        ; "â"
  137.   REPL  \d132  BY  \d228        ; "ä"
  138.   REPL  \d133  BY  \d224        ; "à"
  139.   REPL  \d134  BY  \d229        ; "å"
  140.   REPL  \d135  BY  \d231        ; "ç"
  141.   REPL  \d136  BY  \d234        ; "ê"
  142.   REPL  \d137  BY  \d235        ; "ë"
  143.   REPL  \d138  BY  \d232        ; "è"
  144.   REPL  \d139  BY  \d239        ; "ï"
  145.   REPL  \d140  BY  \d238        ; "î"
  146.   REPL  \d141  BY  \d236        ; "ì"
  147.   REPL  \d142  BY  \d196        ; "Ä"
  148.   REPL  \d143  BY  \d197        ; "Å"
  149.   REPL  \d144  BY  \d201        ; "É"
  150.   REPL  \d145  BY  \d230        ; "æ"
  151.   REPL  \d146  BY  \d198        ; "Æ"
  152.   REPL  \d147  BY  \d244        ; "ô"
  153.   REPL  \d148  BY  \d246        ; "ö"
  154.   REPL  \d149  BY  \d242        ; "ò"
  155.   REPL  \d150  BY  \d251        ; "û"
  156.   REPL  \d151  BY  \d249        ; "ù"
  157.   REPL  \d152  BY  \d255        ; "ÿ"
  158.   REPL  \d153  BY  \d214        ; "Ö"
  159.   REPL  \d154  BY  \d220        ; "Ü"
  160.   REPL  \d155  BY  \d248        ; "ø"
  161.   REPL  \d156  BY  \d163        ; "£"
  162.   REPL  \d157  BY  \d216        ; "Ø"
  163.   REPL  \d160  BY  \d225        ; "á"
  164.   REPL  \d161  BY  \d237        ; "í"
  165.   REPL  \d162  BY  \d243        ; "ó"
  166.   REPL  \d163  BY  \d250        ; "ú"
  167.   REPL  \d164  BY  \d241        ; "ñ"
  168.   REPL  \d165  BY  \d209        ; "Ñ"
  169.   REPL  \d168  BY  \d191        ; "¿"
  170.   REPL  \d170  BY  \d172        ; "¬"
  171.   REPL  \d171  BY  \d189        ; "½"
  172.   REPL  \d172  BY  \d188        ; "¼"
  173.   REPL  \d173  BY  \d161        ; "¡"
  174.   REPL  \d174  BY  \d171        ; "«"
  175.   REPL  \d175  BY  \d187        ; "»"
  176.   REPL  \d177  BY  \d208        ; "Ð"
  177.   REPL  \d225  BY  \d223        ; "ß"
  178.   REPL  \d230  BY  \d181        ; "µ"
  179.   REPL  \d241  BY  \d177        ; "±"
  180.   REPL  \h1A   BY  ""           ; remove end-of-file character
  181.  
  182.  
  183. MODE PCtoOS2
  184.  
  185.   REPL  \h1A   BY ""            ; remove end-of-file character
  186.  
  187.  
  188. ; MODE PCtoUNIX    (to be added when I get the codes)
  189.  
  190.  
  191.  
  192. ; **
  193. ; ** OS2 -> AMIGA - PC - UNIX
  194. ; **
  195.  
  196. MODE OS2toAMIGA
  197.  
  198.   REPL  \r     BY  ""           ; remove CR codes (e.g. CR+LF -> LF)
  199.   REPL  \d128  BY  \d199        ; "Ç"
  200.   REPL  \d129  BY  \d252        ; "ü"
  201.   REPL  \d130  BY  \d233        ; "é"
  202.   REPL  \d131  BY  \d226        ; "â"
  203.   REPL  \d132  BY  \d228        ; "ä"
  204.   REPL  \d133  BY  \d224        ; "à"
  205.   REPL  \d134  BY  \d229        ; "å"
  206.   REPL  \d135  BY  \d231        ; "ç"
  207.   REPL  \d136  BY  \d234        ; "ê"
  208.   REPL  \d137  BY  \d235        ; "ë"
  209.   REPL  \d138  BY  \d232        ; "è"
  210.   REPL  \d139  BY  \d239        ; "ï"
  211.   REPL  \d140  BY  \d238        ; "î"
  212.   REPL  \d141  BY  \d236        ; "ì"
  213.   REPL  \d142  BY  \d196        ; "Ä"
  214.   REPL  \d143  BY  \d197        ; "Å"
  215.   REPL  \d144  BY  \d201        ; "É"
  216.   REPL  \d145  BY  \d230        ; "æ"
  217.   REPL  \d146  BY  \d198        ; "Æ"
  218.   REPL  \d147  BY  \d244        ; "ô"
  219.   REPL  \d148  BY  \d246        ; "ö"
  220.   REPL  \d149  BY  \d242        ; "ò"
  221.   REPL  \d150  BY  \d251        ; "û"
  222.   REPL  \d151  BY  \d249        ; "ù"
  223.   REPL  \d152  BY  \d255        ; "ÿ"
  224.   REPL  \d153  BY  \d214        ; "Ö"
  225.   REPL  \d154  BY  \d220        ; "Ü"
  226.   REPL  \d155  BY  \d248        ; "ø"
  227.   REPL  \d156  BY  \d163        ; "£"
  228.   REPL  \d157  BY  \d216        ; "Ø"
  229.   REPL  \d160  BY  \d225        ; "á"
  230.   REPL  \d161  BY  \d237        ; "í"
  231.   REPL  \d162  BY  \d243        ; "ó"
  232.   REPL  \d163  BY  \d250        ; "ú"
  233.   REPL  \d164  BY  \d241        ; "ñ"
  234.   REPL  \d165  BY  \d209        ; "Ñ"
  235.   REPL  \d168  BY  \d191        ; "¿"
  236.   REPL  \d170  BY  \d172        ; "¬"
  237.   REPL  \d171  BY