; spreel ; by Andy Pierce (ajpierce@med.unc.edu) ; 1992 leng dat #0,#24 ; put prog length in B field x dat #0,#0 sor dat #0,#0 dest dat #0,#0 begin mov #21,bomb mov #21,insur mov leng,x mov #1610,dest ; new prog is 1610 units forward (7x230) add leng,dest mov #-2,sor add leng,sor loop mov