home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2004 #2 / Amiga Plus CD - 2004 - No. 02.iso / AmigaPlus / Tools / Anwendungen / glmatrix / source / gui_cd.asm < prev    next >
Encoding:
Assembly Source File  |  2004-01-31  |  5.7 KB  |  306 lines
  1.     IFND GUI_CD_I
  2. GUI_CD_I    SET    1
  3. CATCOMP_CODE    SET    1
  4. CATCOMP_ARRAY    SET    1
  5.  
  6. ;-----------------------------------------------------------------------------
  7.  
  8.  
  9. * This file was created automatically by CatComp.
  10. * Do NOT edit by hand!
  11. *
  12.  
  13.     INCDIR    'StormC:ASM-Include/'
  14.  
  15.  
  16.     IFND EXEC_TYPES_I
  17.     INCLUDE 'exec/types.i'
  18.     ENDC
  19.  
  20.     IFD CATCOMP_ARRAY
  21. CATCOMP_NUMBERS SET 1
  22. CATCOMP_STRINGS SET 1
  23.     ENDC
  24.  
  25.     IFD CATCOMP_CODE
  26. CATCOMP_BLOCK SET 1
  27.     ENDC
  28.  
  29.  
  30. ;-----------------------------------------------------------------------------
  31.  
  32.  
  33.     IFD CATCOMP_NUMBERS
  34.  
  35.     XDEF LBL_Timeout
  36. LBL_Timeout EQU 256
  37.     XDEF LBL_Density
  38. LBL_Density EQU 257
  39.     XDEF LBL_Speed
  40. LBL_Speed EQU 258
  41.     XDEF CHS_Matrix
  42. CHS_Matrix EQU 259
  43.     XDEF CHS_Binary
  44. CHS_Binary EQU 260
  45.     XDEF CHS_Hexadecimal
  46. CHS_Hexadecimal EQU 261
  47.     XDEF CHS_DNA
  48. CHS_DNA EQU 262
  49.     XDEF LBL_Encoding
  50. LBL_Encoding EQU 263
  51.     XDEF CHK_Fog
  52. CHK_Fog EQU 264
  53.     XDEF CHK_Wave
  54. CHK_Wave EQU 265
  55.     XDEF CHK_Rotate
  56. CHK_Rotate EQU 266
  57.     XDEF BTN_Save
  58. BTN_Save EQU 267
  59.     XDEF BTN_Cancel
  60. BTN_Cancel EQU 269
  61.     XDEF Window_Title
  62. Window_Title EQU 270
  63.     XDEF Icon_Title
  64. Icon_Title EQU 271
  65.     XDEF CHS_Decimal
  66. CHS_Decimal EQU 272
  67.     XDEF BTN_Use
  68. BTN_Use EQU 273
  69.     XDEF CHS_Size_1
  70. CHS_Size_1 EQU 274
  71.     XDEF CHS_Size_2
  72. CHS_Size_2 EQU 275
  73.     XDEF CHS_Size_3
  74. CHS_Size_3 EQU 276
  75.     XDEF CHS_Size_4
  76. CHS_Size_4 EQU 277
  77.     XDEF LBL_ScreenSize
  78. LBL_ScreenSize EQU 278
  79.     XDEF CHK_Invert
  80. CHK_Invert EQU 279
  81.  
  82.     ENDC ; CATCOMP_NUMBERS
  83.  
  84.  
  85. ;-----------------------------------------------------------------------------
  86.  
  87.  
  88.     IFD CATCOMP_STRINGS
  89.  
  90.     XDEF LBL_Timeout_STR
  91. LBL_Timeout_STR: DC.B 'Timeout: ',$00
  92.     XDEF LBL_Density_STR
  93. LBL_Density_STR: DC.B 'Density: ',$00
  94.     XDEF LBL_Speed_STR
  95. LBL_Speed_STR: DC.B 'Speed: ',$00
  96.     XDEF CHS_Matrix_STR
  97. CHS_Matrix_STR: DC.B 'Matrix',$00
  98.     XDEF CHS_Binary_STR
  99. CHS_Binary_STR: DC.B 'Binary',$00
  100.     XDEF CHS_Hexadecimal_STR
  101. CHS_Hexadecimal_STR: DC.B 'Hexadecimal',$00
  102.     XDEF CHS_DNA_STR
  103. CHS_DNA_STR: DC.B 'DNA',$00
  104.     XDEF LBL_Encoding_STR
  105. LBL_Encoding_STR: DC.B 'Encoding: ',$00
  106.     XDEF CHK_Fog_STR
  107. CHK_Fog_STR: DC.B '_Fog',$00
  108.     XDEF CHK_Wave_STR
  109. CHK_Wave_STR: DC.B '_Wave',$00
  110.     XDEF CHK_Rotate_STR
  111. CHK_Rotate_STR: DC.B '_Rotate',$00
  112.     XDEF BTN_Save_STR
  113. BTN_Save_STR: DC.B '_Save',$00
  114.     XDEF BTN_Cancel_STR
  115. BTN_Cancel_STR: DC.B '_Cancel',$00
  116.     XDEF Window_Title_STR
  117. Window_Title_STR: DC.B 'GLMatrix',$00
  118.     XDEF Icon_Title_STR
  119. Icon_Title_STR: DC.B 'GLMatrix',$00
  120.     XDEF CHS_Decimal_STR
  121. CHS_Decimal_STR: DC.B 'Decimal',$00
  122.     XDEF BTN_Use_STR
  123. BTN_Use_STR: DC.B '_Use',$00
  124.     XDEF CHS_Size_1_STR
  125. CHS_Size_1_STR: DC.B '640x480',$00
  126.     XDEF CHS_Size_2_STR
  127. CHS_Size_2_STR: DC.B '800x600',$00
  128.     XDEF CHS_Size_3_STR
  129. CHS_Size_3_STR: DC.B '1024x768',$00
  130.     XDEF CHS_Size_4_STR
  131. CHS_Size_4_STR: DC.B '1280x1024',$00
  132.     XDEF LBL_ScreenSize_STR
  133. LBL_ScreenSize_STR: DC.B 'Screen size: ',$00
  134.     XDEF CHK_Invert_STR
  135. CHK_Invert_STR: DC.B 'Invert alpha',$00
  136.  
  137.     ENDC ; CATCOMP_STRINGS
  138.  
  139.  
  140. ;-----------------------------------------------------------------------------
  141.  
  142.  
  143.     IFD CATCOMP_ARRAY
  144.  
  145.    STRUCTURE CatCompArrayType,0
  146.     LONG cca_ID
  147.     APTR cca_Str
  148.    LABEL CatCompArrayType_SIZEOF
  149.  
  150.     CNOP 0,4
  151.  
  152.     XDEF CatCompArray
  153. CatCompArray:
  154.     XDEF _CatCompArray
  155. _CatCompArray:
  156. AS0:    DC.L LBL_Timeout,LBL_Timeout_STR
  157. AS1:    DC.L LBL_Density,LBL_Density_STR
  158. AS2:    DC.L LBL_Speed,LBL_Speed_STR
  159. AS3:    DC.L CHS_Matrix,CHS_Matrix_STR
  160. AS4:    DC.L CHS_Binary,CHS_Binary_STR
  161. AS5:    DC.L CHS_Hexadecimal,CHS_Hexadecimal_STR
  162. AS6:    DC.L CHS_DNA,CHS_DNA_STR
  163. AS7:    DC.L LBL_Encoding,LBL_Encoding_STR
  164. AS8:    DC.L CHK_Fog,CHK_Fog_STR
  165. AS9:    DC.L CHK_Wave,CHK_Wave_STR
  166. AS10:    DC.L CHK_Rotate,CHK_Rotate_STR
  167. AS11:    DC.L BTN_Save,BTN_Save_STR
  168. AS12:    DC.L BTN_Cancel,BTN_Cancel_STR
  169. AS13:    DC.L Window_Title,Window_Title_STR
  170. AS14:    DC.L Icon_Title,Icon_Title_STR
  171. AS15:    DC.L CHS_Decimal,CHS_Decimal_STR
  172. AS16:    DC.L BTN_Use,BTN_Use_STR
  173. AS17:    DC.L CHS_Size_1,CHS_Size_1_STR
  174. AS18:    DC.L CHS_Size_2,CHS_Size_2_STR
  175. AS19:    DC.L CHS_Size_3,CHS_Size_3_STR
  176. AS20:    DC.L CHS_Size_4,CHS_Size_4_STR
  177. AS21:    DC.L LBL_ScreenSize,LBL_ScreenSize_STR
  178. AS22:    DC.L CHK_Invert,CHK_Invert_STR
  179.  
  180.     ENDC ; CATCOMP_ARRAY
  181.  
  182.  
  183. ;-----------------------------------------------------------------------------
  184.  
  185.  
  186.     IFD CATCOMP_BLOCK
  187.  
  188.     XDEF CatCompBlock
  189. CatCompBlock:
  190.     XDEF _CatCompBlock
  191. _CatCompBlock:
  192.     DC.L $100
  193.     DC.W $A
  194.     DC.B 'Timeout: ',$00
  195.     DC.L $101
  196.     DC.W $A
  197.     DC.B 'Density: ',$00
  198.     DC.L $102
  199.     DC.W $8
  200.     DC.B 'Speed: ',$00
  201.     DC.L $103
  202.     DC.W $8
  203.     DC.B 'Matrix',$00,$00
  204.     DC.L $104
  205.     DC.W $8
  206.     DC.B 'Binary',$00,$00
  207.     DC.L $105
  208.     DC.W $C
  209.     DC.B 'Hexadecimal',$00
  210.     DC.L $106
  211.     DC.W $4
  212.     DC.B 'DNA',$00
  213.     DC.L $107
  214.     DC.W $C
  215.     DC.B 'Encoding: ',$00,$00
  216.     DC.L $108
  217.     DC.W $6
  218.     DC.B '_Fog',$00,$00
  219.     DC.L $109
  220.     DC.W $6
  221.     DC.B '_Wave',$00
  222.     DC.L $10A
  223.     DC.W $8
  224.     DC.B '_Rotate',$00
  225.     DC.L $10B
  226.     DC.W $6
  227.     DC.B '_Save',$00
  228.     DC.L $10D
  229.     DC.W $8
  230.     DC.B '_Cancel',$00
  231.     DC.L $10E
  232.     DC.W $A
  233.     DC.B 'GLMatrix',$00,$00
  234.     DC.L $10F
  235.     DC.W $A
  236.     DC.B 'GLMatrix',$00,$00
  237.     DC.L $110
  238.     DC.W $8
  239.     DC.B 'Decimal',$00
  240.     DC.L $111
  241.     DC.W $6
  242.     DC.B '_Use',$00,$00
  243.     DC.L $112
  244.     DC.W $8
  245.     DC.B '640x480',$00
  246.     DC.L $113
  247.     DC.W $8
  248.     DC.B '800x600',$00
  249.     DC.L $114
  250.     DC.W $A
  251.     DC.B '1024x768',$00,$00
  252.     DC.L $115
  253.     DC.W $A
  254.     DC.B '1280x1024',$00
  255.     DC.L $116
  256.     DC.W $E
  257.     DC.B 'Screen size: ',$00
  258.     DC.L $117
  259.     DC.W $E
  260.     DC.B 'Invert alpha',$00,$00
  261.  
  262.     ENDC ; CATCOMP_BLOCK
  263.  
  264.  
  265. ;-----------------------------------------------------------------------------
  266.  
  267.  
  268.    STRUCTURE LocaleInfo,0
  269.     APTR li_LocaleBase
  270.     APTR li_Catalog
  271.    LABEL LocaleInfo_SIZEOF
  272.  
  273.     IFD CATCOMP_CODE
  274.  
  275.     XREF      _LVOGetCatalogStr
  276.     XDEF      _GetString
  277.     XDEF      GetString
  278. GetString:
  279. _GetString:
  280.     lea       CatCompBlock(pc),a1
  281.     bra.s     2$
  282. 1$: move.w  (a1)+,d1
  283.     add.w     d1,a1
  284. 2$: cmp.l   (a1)+,d0
  285.     bne.s     1$
  286.     addq.l    #2,a1
  287.     move.l    (a0)+,d1
  288.     bne.s     3$
  289.     move.l    a1,d0
  290.     rts
  291. 3$: move.l  a6,-(sp)
  292.     move.l    d1,a6
  293.     move.l    (a0),a0
  294.     jsr       _LVOGetCatalogStr(a6)
  295.     move.l    (sp)+,a6
  296.     rts
  297.     END
  298.  
  299.     ENDC ; CATCOMP_CODE
  300.  
  301.  
  302. ;-----------------------------------------------------------------------------
  303.  
  304.  
  305.     ENDC ; GUI_CD_I
  306.