# File: /mdisw_sim/cfl/dev/src/mk_vel2_patch.src
# Created: 15-Aug-1996 13:49:59.00
#
program "%Z% MODULE: %M% RELEASE: %R%.%L% CREATED: %G% %U%"
source "/mdisw/cfl/flight/src/mk_vel2_patch_v04.src"
descr "mk_vel2_patch - Load something to address 00003690"
 
# *********** Fixing Pixel:    13968  X: 656  Y  13****************
tcb mbdpml 0x2000 0x0000 \
      0x1704 0x1704 0x1705 0x1705 0x1705 0x1705 0x1705 0x1705

tcb mbdpml 0 0x547a 0xa390	## patch to remove increment
tcb mbiptbl 8 0xb690 0x8002  0      0 0x2000 8
wait time 60			## allow IP interrupt
tcb mbdpml 0 0x547a 0xa340	## patch back to original
