home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 22 / AACD 22.iso / AACD / Programming / powerd / lib / powerd.lha / powerd_ppc / OpenS.ass < prev    next >
Encoding:
Text File  |  1980-04-25  |  1.6 KB  |  97 lines

  1.     .text
  2.     .sdreg    r2
  3.     .align    2
  4. _OpenS:
  5. ###############################################################################
  6. # name           offset
  7. # screen         0+0(r13)
  8. # args ###########################
  9. # wi             4+0(r13)
  10. # he             8+0(r13)
  11. # depth          12+0(r13)
  12. # id             16+0(r13)
  13. # title          20+0(r13)
  14. # tags           24+0(r13)
  15.     mflr    r0
  16.     stw    r0,8(r1)
  17.     stwu    r1,-56(r1)
  18.     stw    r13,24(r1)
  19.     mr    r13,r1
  20.     stw    r3,4+28(r13)
  21.     stw    r4,8+28(r13)
  22.     stw    r5,12+28(r13)
  23.     stw    r6,16+28(r13)
  24.     stw    r7,20+28(r13)
  25.     stw    r8,24+28(r13)
  26.     li    r3,0
  27.     subi    r1,r1,24
  28.     lwz    r4,4+28(r13)
  29.     stw    r4,0+24(r1)
  30.     lwz    r4,8+28(r13)
  31.     stw    r4,4+24(r1)
  32.     lwz    r4,12+28(r13)
  33.     stw    r4,8+24(r1)
  34.     lwz    r4,16+28(r13)
  35.     stw    r4,12+24(r1)
  36.     lwz    r4,20+28(r13)
  37.     stw    r4,16+24(r1)
  38.     lwz    r4,24+28(r13)
  39.     stw    r4,20+24(r1)
  40.     lwz    r4,@_list0(r2)
  41.     lwz    r5,0+24(r1)
  42.     stw    r5,4(r4)
  43.     lwz    r5,4+24(r1)
  44.     stw    r5,12(r4)
  45.     lwz    r5,8+24(r1)
  46.     stw    r5,20(r4)
  47.     lwz    r5,12+24(r1)
  48.     stw    r5,28(r4)
  49.     lwz    r5,16+24(r1)
  50.     stw    r5,36(r4)
  51.     lwz    r5,20+24(r1)
  52.     stw    r5,44(r4)
  53.     addi    r1,r1,24
  54.     bl    _OpenScreenTags    # OpenScreenTags
  55.     stw    r3,0+28(r13)
  56. OpenSend:
  57.     lwz    r3,0+28(r13)
  58. OpenSfinish:
  59.     lwz    r13,24(r1)
  60.     addi    r1,r1,56
  61.     lwz    r0,8(r1)
  62.     mtlr    r0
  63.     blr
  64.  
  65.     .global    _OpenS
  66.     .type    _OpenS,2
  67.     .size    _OpenS,$-_OpenS
  68. OpenS_local:
  69.     .global    @_OpenS_local
  70.     .extern    _OpenScreenTags
  71.     .tocd
  72.     .extern    _PowerPCBase
  73.     .extern    _stdin
  74.     .extern    _stdout
  75.     .extern    _arg
  76.     .extern    _GfxBase
  77.     .extern    _IntuitionBase
  78.     .extern    _DOSBase
  79.     .extern    _ExecBase
  80.     .data
  81.     .extern    @_list0
  82.     .global    list0
  83. list0:    .ualong    0x80000023
  84.     .ualong    0
  85.     .ualong    0x80000024
  86.     .ualong    0
  87.     .ualong    0x80000025
  88.     .ualong    0
  89.     .ualong    0x80000032
  90.     .ualong    0
  91.     .ualong    0x80000028
  92.     .ualong    0
  93.     .ualong    2
  94.     .ualong    0
  95.     .ualong    0
  96.     .align    2
  97.