quun a ça de tt fait?
(sinon, j'en ferai une...)
en C plize!(ou asm avec le prototype C)
virtual_pc: dc.l 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 /***************************/ /* Efface un Gplan */ /***************************/ /* Input: */ /* adrr Gplan (%a0) */ /***************************/ ClrGPlan: movem.l %d0-%d7/%a1-%a7,virtual_pc lea 7936(%a0),%a0 moveq #3,%d0 moveq #0,%d1 moveq #0,%d2 moveq #0,%d3 moveq #0,%d4 moveq #0,%d5 moveq #0,%d6 moveq #0,%d7 move.w %d1,%a1 move.w %d2,%a2 move.w %d3,%a3 move.w %d4,%a4 move.w %d5,%a5 move.w %d6,%a6 move.w %d7,%a7 ClrGplan_loop: movem.l %d1-%d7/%a1-%a7,-(%a0) /* 56 */ movem.l %d1-%d7/%a1-%a7,-(%a0) movem.l %d1-%d7/%a1-%a7,-(%a0) movem.l %d1-%d7/%a1-%a7,-(%a0) movem.l %d1-%d7/%a1-%a7,-(%a0) movem.l %d1-%d7/%a1-%a7,-(%a0) movem.l %d1-%d7/%a1-%a7,-(%a0) movem.l %d1-%d7/%a1-%a7,-(%a0) movem.l %d1-%d7/%a1-%a7,-(%a0) movem.l %d1-%d7/%a1-%a7,-(%a0) movem.l %d1-%d7/%a1-%a7,-(%a0) movem.l %d1-%d7/%a1-%a7,-(%a0) movem.l %d1-%d7/%a1-%a7,-(%a0) movem.l %d1-%d7/%a1-%a7,-(%a0) movem.l %d1-%d7/%a1-%a7,-(%a0) movem.l %d1-%d7/%a1-%a7,-(%a0) movem.l %d1-%d7/%a1-%a7,-(%a0) movem.l %d1-%d7/%a1-%a7,-(%a0) movem.l %d1-%d7/%a1-%a7,-(%a0) movem.l %d1-%d7/%a1-%a7,-(%a0) movem.l %d1-%d7/%a1-%a7,-(%a0) movem.l %d1-%d7/%a1-%a7,-(%a0) movem.l %d1-%d7/%a1-%a7,-(%a0) movem.l %d1-%d7/%a1-%a7,-(%a0) movem.l %d1-%d7/%a1-%a7,-(%a0) movem.l %d1-%d7/%a1-%a7,-(%a0) movem.l %d1-%d7/%a1-%a7,-(%a0) movem.l %d1-%d7/%a1-%a7,-(%a0) movem.l %d1-%d7/%a1-%a7,-(%a0) movem.l %d1-%d7/%a1-%a7,-(%a0) movem.l %d1-%d7/%a1-%a7,-(%a0) movem.l %d1-%d7/%a1-%a7,-(%a0) dbf %d0,ClrGplan_loop /* 32*56=1792 */ moveq #0,%d0 movem.l %d0-%d7/%a1-%a7,-(%a0) movem.l %d0-%d7/%a1-%a7,-(%a0) movem.l %d0-%d7/%a1-%a7,-(%a0) movem.l %d0-%d7/%a1-%a7,-(%a0) movem.l %d0-%d7/%a1-%a7,-(%a0) movem.l %d0-%d7/%a1-%a7,-(%a0) movem.l %d0-%d7/%a1-%a7,-(%a0) movem.l %d0-%d7/%a1-%a7,-(%a0) movem.l %d0-%d7,-(%a0) movem.l virtual_pc,%d0-%d7/%a1-%a7 rts
moveq #0,%d1 moveq #0,%d2 moveq #0,%d3 moveq #0,%d4 moveq #0,%d5 moveq #0,%d6 moveq #0,%d7 move.w %d1,%a1 move.w %d2,%a2 move.w %d3,%a3 move.w %d4,%a4 move.w %d5,%a5 move.w %d6,%a6 move.w %d7,%a7