?login_element?

Subversion Repositories NedoOS

Rev

Blame | Last modification | View Log | Download

  1.         module ICE_HOLE
  2. init:
  3.         SET_EXEC_IX update
  4.         xor a
  5.         ld (ix+oData.isMovable),a
  6.         ld (ix+oData.accelerate),a
  7.         ld (ix+oData.drawMethod),a
  8.         inc a
  9.         ld (ix+oData.needDraw),a
  10.         ld (ix+oData.color),5
  11.         ld c,(ix+oData.cellId)
  12.         call getAttrAddrByCellId
  13.         ld (ix+oData.clrScrAddrL),e
  14.         ld (ix+oData.clrScrAddrH),d
  15.         jp OBJECTS.setObjectId
  16. ;-------------------------------------
  17. update:
  18.         ld c,%01000100
  19.         jp BOMB.blink
  20.  
  21.         endmodule
  22.