;name rep-retry ;assert 1 deltap equ CORESIZE/4 optima equ 73 delay equ 4 longdelay equ 200 gap equ 2*deltap-port0 port0 DAT #0, #0 for 300 DAT #0, #0 rof attack DAT #0, #0 wipe DAT #0, #0 first DAT #0, #last-first second DAT #0, #last-second ;self-wipe initwipe MOV #last-wipe, wipe wipeloop MOV zero,