home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 5 Edit / 05-Edit.zip / fte0827.zip / config / m_asm370.fte < prev    next >
Text File  |  1999-05-16  |  4KB  |  146 lines
  1. # Contributed by:
  2. #
  3. # Michael Taylor
  4. # miket@pcug.org.au     Michael_Taylor@splwg.com. 
  5. # http://www.pcug.org.au/~miket/
  6.  
  7. colorize ASM370 {
  8.     SyntaxParser = 'SIMPLE';
  9.     
  10.     color {
  11.         { 'Normal',        'Lang_Default' },
  12.         { 'Keyword',       'Editor_Keywords' },
  13.         { 'Number',        'Lang_DecimalNumber' },
  14.         { 'HexNumber',     'Lang_HexNumber' },
  15.         { 'Punctuation',   'Lang_Punctuation' },
  16.         { 'String',        'Lang_String' },
  17.         { 'Comment',       'Lang_Comment' },
  18.         { 'CPreprocessor', 'Lang_Preprocessor' },
  19.         { 'Function',      'Lang_Function' },
  20.         { 'Label',         'Lang_Label' },
  21.     };
  22.  
  23. # assembler commands
  24.     keyword 'Editor_Keywords' {
  25.         'a', 'ah', 'al', 'alr', 'ap', 'ar',
  26.         'b', 'bal', 'balr', 'bc', 'bcr', 'bct', 'bctr', 'be', 'bh', 'bhe',
  27.         'bl', 'ble', 'bne', 'bnh', 'bnl', 'bnlr', 'bnz', 'bnzr', 'br',
  28.         'bxhr', 'bxh', 'bxle', 'bxler', 'bzr', 'bz', 'bmr', 'bm', 'bor',
  29.         'bo', 'bnor', 'bno', 'bpr', 'bp', 'bnpr', 'bnp',
  30.         'c', 'cl', 'clc', 'cli', 'clr', 'clm', 'clcl', 'cp', 'cr', 'cs',
  31.         'cds', 'ch', 'cvb', 'cvd',
  32.         'd', 'dp', 'dr',
  33.         'ed', 'edmk', 'ex',
  34.         'ic', 'icm',
  35.         'l', 'la', 'lm', 'lr', 'ltr', 'lh', 'lcr', 'lnr', 'lpr',
  36.         'm', 'mc', 'mh', 'mp', 'mr', 'mvc', 'mvi', 'mvn', 'mvo', 'mvz',
  37.         'n', 'nc', 'ni', 'nr',
  38.         'o', 'or', 'oc', 'oi',
  39.         'pack',
  40.         's', 'sp', 'sr', 'srp', 'st', 'sll', 'srl', 'sh', 'stc',
  41.         'stcm', 'stck', 'sth', 'stm', 'spm', 'slda', 'srda', 'sra', 'sla',
  42.         'srdl', 'sldl', 'slr', 'sl',
  43.         'ts', 'tm', 'tr', 'trt',
  44.         'unpk',
  45.         'x', 'xr', 'xc', 'xi',
  46.         'zap'
  47.     };
  48.  
  49. # define storage, define constant
  50.     keyword 'Editor_Keywords2' {
  51.         'ds', 'dc'
  52.     };
  53.  
  54. # assembler directives
  55.     keyword 'Editor_Keywords3' {
  56.         'end',
  57.         'equ',
  58.         'csect',
  59.         'dsect',
  60.         'ltorg',
  61.         'org',
  62.         'using',
  63.         'drop',
  64.         'eject',
  65.         'title',
  66.         'copy',
  67.         'aif',
  68.         'anop',
  69.         'ago'
  70.     };
  71.  
  72. # extended assmebler directives - used by MicroFocus 370 Assembler
  73.     keyword 'Editor_Keywords4' {
  74.         'xdeco',
  75.         'xdeci',
  76.         'xdump',
  77.         'xprnt',
  78.         'xread'
  79.     };
  80.  
  81.     keyword 'Editor_Keywords5' {
  82.         'r0',
  83.         'r1',
  84.         'r2',
  85.         'r3',
  86.         'r4',
  87.         'r5',
  88.         'r6',
  89.         'r7',
  90.         'r8',
  91.         'r9',
  92.         'r10',
  93.         'r11',
  94.         'r12',
  95.         'r13',
  96.         'r14',
  97.         'r15'
  98.     };
  99.  
  100.  
  101.     h_state 0 { 'Normal' }
  102.     h_trans { 5, '-s', 'a-zA-Z_$@', 'Normal' }
  103.     h_trans { 1, '<', '*', 'Comment' }
  104.     h_trans { 2, '<', '\'', 'String' }
  105.     h_trans { 3, '<', '"', 'String' }
  106.     h_trans { 4, '-s', '0-9', 'Number' }
  107.     h_trans { 0, 'S', 'a-zA-Z0-9_$@', 'Punctuation' }
  108.  
  109.     h_state 1 { 'Comment' }
  110.     h_trans { 0, '$', '', 'Comment' }
  111.  
  112.     h_state 2 { 'String' }
  113.     h_trans { 0, '$', '', 'Normal' }
  114.     h_trans { 0, '', '\'', 'String' }
  115.  
  116.     h_state 3 { 'String' }
  117.     h_trans { 0, '$', '', 'Normal' }
  118.     h_trans { 0, '', '"', 'String' }
  119.  
  120.     h_state 4 { 'Number' }
  121.     h_trans { 0, '$', '', 'Normal' }
  122.     h_trans { 0, 's', 'Hh', 'Number' }
  123.     h_trans { 0, '-S', '0-9A-Fa-f', 'Number' }
  124.  
  125.     h_state 5 { 'Normal' }
  126.     h_trans { 0, '$', '', 'Normal' }
  127.     h_wtype { 0, 0, 0, 'i', 'a-zA-Z0-9_$@' }
  128. }
  129.  
  130. mode ASM370: PLAIN {
  131.     FileNameRx          = /\.\c{{CPY}|{MLC}}$/;
  132.     HilitOn             = 1;
  133.     Colorizer           = 'ASM370';
  134.     AutoHilitParen      = 1;
  135.     
  136.     SaveFolds           = 2;      # save fold info at end of line
  137.     CommentStart        = '*';
  138.     CommentEnd          = '';
  139.     KeepBackups         = 0;
  140.     SpaceTabs           = 1;
  141.     ShowTabs            = 1;
  142.     AutoIndent          = 1;
  143.     IndentWithTabs      = 0;
  144.     Trim                = 1;
  145. }
  146.