# File: mk_irbin_patch.src
# Created:  6-Jan-1997 13:19:35.00
#
program "%Z% MODULE: %M% RELEASE: %R%.%L% CREATED: %G% %U%"
source "/mdisw/cfl/flight/src/mk_irbin_patch_v01.src"
descr "mk_irbin_patch - Load something to address 00002258"
 
# *********** Fixing Pixel:     8792  X: 600  Y   8****************
tcb mbdpml 0x2000 0x0000 \
      0x3c22 0x3c21 0x3c22 0x3c21 0x3c22 0x3c21 0x3d21 0x3c21

tcb mbdpml 0 0x547a 0xa390	## patch to remove increment
tcb mbiptbl  10 0x6258 0x7003  0   0 0x2000 8
wait time 90			## allow IP interrupt
tcb mbdpml 0 0x547a 0xa340	## patch back to original
