home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 22 / AACD 22.iso / AACD / Programming / powerd / lib / powerd.lha / powerd_ppc / OpenW.ass < prev    next >
Encoding:
Text File  |  1980-04-24  |  2.4 KB  |  141 lines
  1.     .text
  2.     .sdreg    r2
  3.     .align    2
  4. _OpenW:
  5. ###############################################################################
  6. # name           offset
  7. # window         0+0(r13)
  8. # args ###########################
  9. # x              4+0(r13)
  10. # y              8+0(r13)
  11. # wi             12+0(r13)
  12. # he             16+0(r13)
  13. # idcmp          20+0(r13)
  14. # flags          24+0(r13)
  15. # title          28+0(r13)
  16. # screen         32+0(r13)
  17. # stype          36+0(r13)
  18. # gadgets        40+0(r13)
  19. # tags           44+0(r13)
  20.     mflr    r0
  21.     stw    r0,8(r1)
  22.     stwu    r1,-76(r1)
  23.     stw    r13,24(r1)
  24.     mr    r13,r1
  25.     stw    r3,4+28(r13)
  26.     stw    r4,8+28(r13)
  27.     stw    r5,12+28(r13)
  28.     stw    r6,16+28(r13)
  29.     stw    r7,20+28(r13)
  30.     stw    r8,24+28(r13)
  31.     stw    r9,28+28(r13)
  32.     stw    r10,32+28(r13)
  33.     lwz    r0,104+28(r1)
  34.     stw    r0,36+28(r13)
  35.     lwz    r0,108+28(r1)
  36.     stw    r0,40+28(r13)
  37.     lwz    r0,112+28(r1)
  38.     stw    r0,44+28(r13)
  39.     li    r3,0
  40.     subi    r1,r1,40
  41.     lwz    r4,4+28(r13)
  42.     stw    r4,0+24(r1)
  43.     lwz    r4,4+28(r13)
  44.     stw    r4,4+24(r1)
  45.     lwz    r4,12+28(r13)
  46.     stw    r4,8+24(r1)
  47.     lwz    r4,16+28(r13)
  48.     stw    r4,12+24(r1)
  49.     lwz    r4,20+28(r13)
  50.     stw    r4,16+24(r1)
  51.     lwz    r4,24+28(r13)
  52.     stw    r4,20+24(r1)
  53.     lwz    r4,28+28(r13)
  54.     stw    r4,24+24(r1)
  55.     lwz    r4,32+28(r13)
  56.     stw    r4,28+24(r1)
  57.     lwz    r4,40+28(r13)
  58.     stw    r4,32+24(r1)
  59.     lwz    r4,44+28(r13)
  60.     stw    r4,36+24(r1)
  61.     lwz    r4,@_list0(r2)
  62.     lwz    r5,0+24(r1)
  63.     stw    r5,4(r4)
  64.     lwz    r5,4+24(r1)
  65.     stw    r5,12(r4)
  66.     lwz    r5,8+24(r1)
  67.     stw    r5,20(r4)
  68.     lwz    r5,12+24(r1)
  69.     stw    r5,28(r4)
  70.     lwz    r5,16+24(r1)
  71.     stw    r5,36(r4)
  72.     lwz    r5,20+24(r1)
  73.     stw    r5,44(r4)
  74.     lwz    r5,24+24(r1)
  75.     stw    r5,52(r4)
  76.     lwz    r5,28+24(r1)
  77.     stw    r5,60(r4)
  78.     lwz    r5,32+24(r1)
  79.     stw    r5,68(r4)
  80.     lwz    r5,36+24(r1)
  81.     stw    r5,76(r4)
  82.     addi    r1,r1,40
  83.     bl    _OpenWindowTags    # OpenWindowTags
  84.     stw    r3,0+28(r13)
  85.     lwz    r4,0+28(r13)
  86.     lwz    r3,50(r4)
  87.     stw    r3,_stdrast
  88. OpenWend:
  89.     lwz    r3,0+28(r13)
  90. OpenWfinish:
  91.     lwz    r13,24(r1)
  92.     addi    r1,r1,76
  93.     lwz    r0,8(r1)
  94.     mtlr    r0
  95.     blr
  96.  
  97.     .global    _OpenW
  98.     .type    _OpenW,2
  99.     .size    _OpenW,$-_OpenW
  100. OpenW_local:
  101.     .global    @_OpenW_local
  102.     .extern    _OpenWindowTags
  103.     .tocd
  104.     .global    _stdrast_coloura
  105. _stdrast_coloura:    .long    0
  106.     .global    _stdrast
  107. _stdrast:    .long    0
  108.     .extern    _PowerPCBase
  109.     .extern    _stdin
  110.     .extern    _stdout
  111.     .extern    _arg
  112.     .extern    _GfxBase
  113.     .extern    _IntuitionBase
  114.     .extern    _DOSBase
  115.     .extern    _ExecBase
  116.     .data
  117.     .extern    @_list0
  118.     .global    list0
  119. list0:    .ualong    0x80000064
  120.     .ualong    0
  121.     .ualong    0x80000065
  122.     .ualong    0
  123.     .ualong    0x80000066
  124.     .ualong    0
  125.     .ualong    0x80000067
  126.     .ualong    0
  127.     .ualong    0x8000006A
  128.     .ualong    0
  129.     .ualong    0x8000006B
  130.     .ualong    0
  131.     .ualong    0x8000006E
  132.     .ualong    0
  133.     .ualong    0x80000070
  134.     .ualong    0
  135.     .ualong    0x8000006C
  136.     .ualong    0
  137.     .ualong    2
  138.     .ualong    0
  139.     .ualong    0
  140.     .align    2
  141.