home *** CD-ROM | disk | FTP | other *** search
/ Magazyn Amiga 13 / MA_Cover_13.bin / source / asm / sfs / macros.i < prev    next >
Encoding:
Text File  |  1999-12-02  |  3.9 KB  |  273 lines
  1. STACK    MACRO
  2.     cmv4    \z
  3.     cmv4    \y
  4.     cmv4    \x
  5.     cmv4    \w
  6.     cmv4    \v
  7.     cmv4    \u
  8.     cmv4    \t
  9.     cmv4    \s
  10.     cmv4    \r
  11.     cmv4    \q
  12.     cmv4    \p
  13.     cmv4    \o
  14.     cmv4    \n
  15.     cmv4    \m
  16.     cmv4    \l
  17.     cmv4    \k
  18.     cmv4    \j
  19.     cmv4    \i
  20.     cmv4    \h
  21.     cmv4    \g
  22.     cmv4    \f
  23.     cmv4    \e
  24.     cmv4    \d
  25.     cmv4    \c
  26.     cmv4    \b
  27.     cmv4    \a
  28.     cmv4    \9
  29.     cmv4    \8
  30.     cmv4    \7
  31.     cmv4    \6
  32.     cmv4    \5
  33.     cmv4    \4
  34.     cmv4    \3
  35.     cmv4    \2
  36.     cmv4    \1
  37.     ENDM
  38.  
  39. STACK2    MACRO
  40.     cmv3    \z
  41.     cmv3    \y
  42.     cmv3    \x
  43.     cmv3    \w
  44.     cmv3    \v
  45.     cmv3    \u
  46.     cmv3    \t
  47.     cmv3    \s
  48.     cmv3    \r
  49.     cmv3    \q
  50.     cmv3    \p
  51.     cmv3    \o
  52.     cmv3    \n
  53.     cmv3    \m
  54.     cmv3    \l
  55.     cmv3    \k
  56.     cmv3    \j
  57.     cmv3    \i
  58.     cmv3    \h
  59.     cmv3    \g
  60.     cmv3    \f
  61.     cmv3    \e
  62.     cmv3    \d
  63.     cmv3    \c
  64.     cmv3    \b
  65.     cmv3    \a
  66.     cmv3    \9
  67.     cmv3    \8
  68.     cmv3    \7
  69.     cmv3    \6
  70.     cmv3    \5
  71.     cmv3    \4
  72.     cmv3    \3
  73.     cmv3    \2
  74.     cmv3    \1
  75.     ENDM
  76.  
  77. SETI    MACRO
  78.     MOVE.L    SP,D0
  79.     MOVE.L    #TAG_DONE,-(SP)
  80.     STACK    \1,\2,\3,\4,\5,\6,\7,\8,\9,\a,\b,\c,\d,\e,\f,\g,\h,\i,\j,\k,\l,\m,\n,\o,\p,\q,\r,\s,\t,\u,\v,\w,\x,\y,\z
  81.     MOVE.L    SP,A1
  82.     MOVE.L    D0,-(SP)
  83.     JSR    _LVOSetAttrsA(A6)
  84.     MOVE.L    (SP)+,SP
  85.     ENDM
  86.  
  87. SET2    MACRO
  88.     MOVE.L    SP,D0
  89.     MOVE.L    #TAG_DONE,-(SP)
  90.     STACK2    \1,\2,\3,\4,\5,\6,\7,\8,\9,\a,\b,\c,\d,\e,\f,\g,\h,\i,\j,\k,\l,\m,\n,\o,\p,\q,\r,\s,\t,\u,\v,\w,\x,\y,\z
  91.     MOVE.L    SP,A1
  92.     MOVE.L    D0,-(SP)
  93.     JSR    _LVOSetAttrsA(A6)
  94.     MOVE.L    (SP)+,SP
  95.     ENDM
  96.  
  97. SetTag    MACRO
  98.     MOVE.L    \1,A0
  99.     LEA    \2-t(A5),A1
  100.     JSR    _LVOSetAttrsA(A6)
  101.     ENDM
  102.  
  103. TeeMetodi    MACRO
  104.     MOVE.L    \1,A2
  105.     MOVE.L    SP,D0
  106.     CLR.L    -(SP)
  107.     STACK    \2,\3,\4,\5,\6,\7,\8,\9,\a,\b,\c,\d,\e,\f,\g,\h,\i,\j,\k,\l,\m,\n,\o,\p,\q,\r,\s,\t,\u,\v,\w,\x,\y,\z
  108.     MOVE.L    SP,A1
  109.     MOVE.L    D0,-(SP)
  110.     MOVE.L    -4(A2),A0
  111.     MOVE.L    8(A0),A6
  112.     JSR    (A6)
  113.     MOVE.L    (SP)+,SP
  114.     ENDM
  115.  
  116. TeeMetodi2    MACRO
  117.     MOVE.L    \1,A2
  118.     MOVE.L    SP,D0
  119.     CLR.L    -(SP)
  120.     STACK2    \2,\3,\4,\5,\6,\7,\8,\9,\a,\b,\c,\d,\e,\f,\g,\h,\i,\j,\k,\l,\m,\n,\o,\p,\q,\r,\s,\t,\u,\v,\w,\x,\y,\z
  121.     MOVE.L    SP,A1
  122.     MOVE.L    D0,-(SP)
  123.     MOVE.L    -4(A2),A0
  124.     MOVE.L    8(A0),A6
  125.     JSR    (A6)
  126.     MOVE.L    (SP)+,SP
  127.     ENDM
  128.  
  129. TEE_METODI    MACRO
  130.     MOVE.L    \1,A2
  131.     LEA    \2-t(A5),A1
  132.     MOVE.L    -4(A2),A0
  133.     MOVE.L    8(A0),A6
  134.     JSR    (A6)
  135.     ENDM
  136.  
  137. TeeObj    MACRO
  138.     MOVE.L    localebase(A4),A6
  139.     MOVE.L    catalog(A4),A0
  140.     MOVE.L    #\2_HELP,D0
  141.     LEA    \2_HELP_STR-t(A5),A1
  142.     JSR    _LVOGetCatalogStr(A6)
  143.     MOVE.L    D0,HelpString-t(A5)
  144.     MOVE.L    catalog(A4),A0
  145.     MOVE.L    #\2,D0
  146.     LEA    \2_STR-t(A5),A1
  147.     JSR    _LVOGetCatalogStr(A6)
  148.  
  149.     MOVE.L    D0,D1
  150.     MOVEQ.L    #\1,D0
  151.  
  152.     BSR    TeeObjekti
  153.     MOVE.L    D0,\3-t(A5)
  154.     ENDM
  155.  
  156. TeeCheckmark    MACRO
  157.     MOVE.L    #\1,CheckMarkID-t(A5)
  158.     MOVE.L    #\2_ID,CheckMarkState-t(A5)
  159.     MOVE.L    \2_obj-t(A5),D1
  160.     BSR    TeeObjekti_Checkmark
  161.     MOVE.L    D0,\2-t(A5)
  162.     ENDM
  163.  
  164. TeeKuvaObj    MACRO
  165.     MOVE.L    muimaster(A4),A6
  166.     MOVEQ.L    #MUIO_PopButton,D0
  167.     MOVEQ.L    #\1,D1
  168.     BSR    TeeObjekti
  169.     MOVE.L    D0,\2-t(A5)
  170.     ENDM
  171.  
  172. CREATEOBJECT    MACRO
  173.     LEA    \1-t(A5),A0
  174.  
  175.     IFC    '\2','NO_TAGS'
  176.         SUBA.L    A1,A1
  177.     ELSE
  178.     LEA    \2-t(A5),A1
  179.     ENDC
  180.  
  181.     JSR    _LVOMUI_NewObjectA(a6)
  182.     ENDM
  183.  
  184.     ENDASM
  185. CREATELABEL    MACRO
  186.     MOVE.L    localebase(A4),A6
  187.     MOVE.L    catalog(A4),A0
  188.     MOVE.L    #\1,D0
  189.     LEA    \1_STR-t(A5),A1
  190.     JSR    _LVOGetCatalogStr(A6)
  191.     MOVE.L    #\2,D1
  192.     BSR    TeeNimiObjekti
  193.     ENDM
  194.     ASM
  195.  
  196. MENUSTR    MACRO
  197.     GETSTR2    MSG_\1_MENU
  198.     MOVE.L    D0,\2-t(A5)
  199.     ENDM
  200.  
  201. GETSTR    MACRO
  202.     MOVE.L    localebase(A4),A6
  203.     MOVE.L    catalog(A4),A0
  204.     MOVE.L    #\1,D0
  205.     LEA    \1_STR-t(A5),A1
  206.     JSR    _LVOGetCatalogStr(A6)
  207.     ENDM
  208.  
  209. GETSTR2    MACRO
  210.     MOVE.L    #\1,D0
  211.     LEA    \1_STR-t(A5),A1
  212.     MOVE.L    catalog(A4),A0
  213.     JSR    _LVOGetCatalogStr(A6)
  214.     ENDM
  215.  
  216. CreatePopAsl    MACRO
  217.     MOVEQ    #MUIO_PopButton,D0
  218.     MOVE.L    #\1,D1
  219.     BSR    TeeObjekti
  220.     MOVE.L    D0,PopButton-t(A5)
  221.     MOVE.L    STR_\2-t(A5),PopString-t(A5)
  222.  
  223.     IFC    '\1','MUII_PopDrawer'
  224.         CREATEOBJECT    MUIC_Popasl,PopAslTags2
  225.     ELSE
  226.         CREATEOBJECT    MUIC_Popasl,PopAslTags
  227.     ENDC
  228.  
  229.     MOVE.L    D0,PA_\2-t(A5)
  230.     ENDM
  231.  
  232. CreatePopUp    MACRO
  233.     MOVEQ    #MUIO_PopButton,D0
  234.     MOVE.L    #\1,D1
  235.     BSR    TeeObjekti
  236.     MOVE.L    D0,PopButton2-t(A5)
  237.     MOVE.L    D0,PO_\2(A4)
  238.     MOVE.L    STR_\2-t(A5),PopString2-t(A5)
  239.     CREATEOBJECT    MUIC_Popstring,PopUpTags
  240.     MOVE.L    D0,PA_\2-t(A5)
  241.     ENDM
  242.  
  243. ALOITA    MACRO
  244.     MOVEM.L    D2-D7/A2-A6,-(SP)
  245.     LEA    t,A5
  246.     MOVE.L    (A5),A4
  247.     ENDM
  248.  
  249. LOPETA    MACRO
  250.     MOVEM.L    (SP)+,D2-D7/A2-A6
  251.     ENDM
  252.  
  253. KUVA    MACRO
  254.     LEA    \1ImageName-t(A5),A1
  255.     MOVE.L    A1,ImageSpec-t(A5)
  256.     CREATEOBJECT    MUIC_Image,ImageTags
  257.     MOVE.L    D0,BT_\1-t(A5)
  258.     ENDM
  259.  
  260. TeeLabel    MACRO
  261.     MOVE.L    #\1,D0
  262.     LEA    \1_STR-t(A5),A1
  263.  
  264.     IFC    '\2','NO_FLAGS'
  265.         MOVEQ    #0,D2
  266.     ELSE
  267.         MOVE.L    #\2,D2
  268.     ENDC
  269.  
  270.     BSR    TeeObjekti_Label
  271.     MOVE.L    D0,\3-t(A5)
  272.     ENDM
  273.