home *** CD-ROM | disk | FTP | other *** search
/ ARM Club 3 / TheARMClub_PDCD3.iso / hensa / texted / stronged_2 / !StrongED / Defaults / Modes / BasAsm next >
Text File  |  1997-05-11  |  3KB  |  178 lines
  1.  
  2. HelpPath    BASIC,Assembly,SWI,
  3.  
  4. ID_FirstChar    A-Za-z_
  5. ID_Middle    A-Za-z_0-9
  6. ID_LastChar    $%
  7.  
  8. #----------------------------------------------------------------------
  9.  
  10. # Immediate commands :
  11. # APPEND AUTO DELETE EDIT HELP LIST LISTO LOAD LVAR NEW OLD
  12. # RENUMBER RUN SAVE TWIN TWINO
  13.  
  14. SyntaxOptions
  15.     SingleQuote    No
  16.     DoubleQuote    Yes
  17.     QuoteQuote    Yes
  18.     SplitString    No
  19.     HexPrefix    &
  20.     BinPrefix    %
  21. End
  22.  
  23. SyntaxComment 1
  24.     Type        OneLine
  25.     StartWith    ;
  26.     EndWith        :
  27. End
  28.  
  29. SyntaxWords Group1 EndAsm nocase
  30.     ADC ADD AND BIC CMN CMP EOR MLA MOV MUL
  31.     MVN ORR RSB RSC SBC SUB SWI TEQ TST
  32.     LDR STR
  33.     ADR
  34. End
  35.  
  36. SyntaxWords Group2 EndSTM nocase
  37.     LDM STM
  38. End
  39.  
  40. SyntaxWords Group3 EndNonID nocase
  41.     R0 R1 R2 R3 R4 R5 R6 R7 R8 R9 R10 R11 R12 R13 R14 R15
  42.     PC SP LR
  43. End
  44.  
  45. SyntaxWords Group4 EndBL nocase
  46.     B
  47. End
  48.  
  49. SyntaxWords Group5 EndNonID nocase
  50.     OPT
  51.     EQUS EQUD EQUB DCB DCD
  52. End
  53.  
  54. SyntaxWords Group6 EndNonID nocase
  55.     LSR LSL ASR ASL ROR ROL RRX
  56. End
  57.  
  58. SyntaxWords Group7 EndofID nocase
  59.     :.
  60. End
  61.  
  62. SyntaxWords Group8 StartSpace EndofID nocase
  63.     .
  64. End
  65.  
  66. #----------------------------------------------------------------------
  67.  
  68. Search
  69.     _Indent2    {" "} [ (("REM") | (";"~":") {" "} ]
  70.     Bchar        Alpha   |"_"|"`"
  71.     Bchar2        AlphaNum|"_"|"`"
  72.     _MarkWord    (Bchar {Bchar2} ["%"|"$"]) | ("&" {Hex}+) | {Digit}+
  73.     _MoveWord    (Bchar {Bchar2} ["%"|"$"]) | ("&" {Hex}+) | {Digit}+
  74.     Label        [";:"] "." CW ~Bchar2
  75.     C_SWI        "SYS" | "SWI" [??] _spct '"' @0 * (@9 '"')
  76.     C_LDM        " LDM"
  77.     C_STM        " STM"
  78.     C_LDMpc        " LDM" @1 * (@2 "PC}" ["^"])
  79.     C_STM14        " STM" @1 * (@2 "14}")
  80. End
  81.  
  82. Replace
  83.     R_LDMpc        " LDM" @12 "PC}^"
  84.     R_STM14        " STM" @12 "14}"
  85. End
  86.  
  87. FoldParm1 (";{{{",";}}}",startofline)
  88. FoldParm2 (";:.",,startofline)
  89.  
  90. Clicklist Toggle
  91.     C_SWI        HelpString("SWI <tmp$word>",GSTrans)
  92.     C_STM14        ToggleStr(R_LDMpc)
  93.     C_LDMpc        ToggleStr(R_STM14)
  94.     C_STM        ToggleStr(" LDM")
  95.     C_LDM        ToggleStr(" STM")
  96. End
  97.  
  98. #----------------------------------------------------------------------
  99.  
  100. KeyList
  101.     ^D,^F        InsertStr ("FN_ForceDebug")
  102.     ^D,^R        InsertStr ("FN_RestoreDebug")
  103.     ^D,^D        InsertStr ("FN_Debug(pass%,\"\")")
  104.     ^Delete        InsertStr(":") DeleteRight
  105.     ^Return        NewLine(indent,_Indent2)
  106.  
  107.  
  108. End
  109.  
  110. #----------------------------------------------------------------------
  111.  
  112. Functions
  113.  
  114.     Key    ⇧F2
  115.     Menu    List DEF PROC/FN  ⇧F2
  116.     Icon    LoF
  117.     Select    ListOfFound (";:.",Text,After,Line,Case)
  118.     Help    HBa_lof
  119.  
  120.     Adjust    ListOfFound (";:.",All,After,Line,Case)
  121.  
  122.     Key    ⇧PgUp
  123.     Icon    up
  124.     Select    GotoPrev (";:.",Text,Line,Case)
  125.     Help    HBa_up
  126.  
  127.     Key    ^PgUp
  128.     Select    GotoPrev (";:.",Text,Line,Case)
  129.  
  130.     Key    ⇧PgDown
  131.     Icon    down
  132.     Select    GotoNext (";:.",Text,Line,Case)
  133.     Help    HBa_dn
  134.  
  135.     Key    ^PgDown
  136.     Select    GotoNext (";:.",Text,Line,Case)
  137.  
  138.     Key    F10
  139.     Menu    Run                F10
  140.     Icon    run
  141.     Select    SetTmp() RunBasic
  142.     Help    HBa_run
  143.  
  144.     Key    ⇧F10
  145.     ⇧Select    SetTmp() RunBasic(Save)
  146.  
  147.     Key    ^F10
  148.     Adjust    SetTmp() RunBasic(,,Taskwindow)
  149.  
  150.     Key    ^⇧F10
  151.     ⇧Adjust    SetTmp() RunBasic(Save,,Taskwindow)
  152.  
  153.     Key    ^G
  154.     Menu    Goto label/DEF PROC/FN
  155.     Icon    goto
  156.     Select    Push GotoFound (Label,Text,Whole,Line,Case)
  157.     Help    HBa_go
  158.  
  159.     Key    ^⇧G
  160.     Adjust    Push GotoFound (Label,All,Whole,Line,Case)
  161.  
  162.     Key    ^G 2
  163.     ⇧Select    Pop
  164.  
  165.     Key    ^⇧G 2
  166.     ⇧Adjust    Pop
  167.  
  168. End
  169.  
  170. #----------------------------------------------------------------------
  171.  
  172. Shortcuts
  173.     STM{    STMFD    R13!,{0-12,14}\n\n\i\@\n\n\iLDMFD    R13!,{0-12,PC}^
  174.     LDM{    LDMFD    R13!,{0-12,PC}^
  175.     ``-    ;-------------------------------------------------------------------------------\n
  176.     ``=    ;===============================================================================\n
  177. End
  178.