Old and beyond help ?

[DavidFMarks]

OK Just didn't want to clutter up the forum with my lengthy and probably badly written code, but here goes !

'***********CHRISTMAS STAR PROGRAM FOR OPERATING  *************
'**********A 16 ARM STAR WITH 8 LEDS ON EACH ARM  *************
'******ARMS CONNECTED TO PORTS A AND C  AND EACH "RING"  ******
'***************CONNECTED TO A PIN OF PORT D ******************

'************AUTHOR DAVID MARKS DEC 2008 ***********************8

 @ DEVICE pic16f887,intrc_osc_noclkout
ansel = %00000000
delay var word

fastflash var word

PORTD = 0
PORTA = 0
PORTC = 0
TRISD = 0
TRISA = 0
TRISC = 0
fastflash = 150
 
Ring0 var portd.0
Ring1 var portd.1
Ring2 var portd.2
Ring3 var portd.3
Ring4 var portd.4
Ring5 var portd.5
Ring6 var portd.6
Ring7 var portd.7
Arm0 var Portc.0
Arm1 var Portc.1
Arm2 var Portc.2
Arm3 var Portc.3
Arm4 var Portc.4
Arm5 var Portc.5
Arm6 var Portc.6
Arm7  var Portc.7
Arm8   var Porta.0
Arm9   var Porta.1
Arm10  var Porta.2
Arm11  var Porta.3
Arm12  var Porta.4
Arm13  var Porta.5
Arm14  var Porta.6
Arm15  var Porta.7 

loop

  '********************************************
  'EXPANDING WHITE CIRCLES
  '********************************************
 For delay = 400 to 0 step -25
 high Arm0
 high Arm2
 high Arm4
 high Arm6
 high Arm8
 high Arm10
 high Arm12
 high Arm14
High Ring0
pause delay
Low ring0
High Ring1
pause delay
Low ring1
High Ring2
pause delay
Low Ring2
High Ring3
pause delay
Low ring3
High Ring4
pause delay
low ring4
High Ring5
pause delay
Low Ring5
High Ring6
pause delay
Low Ring6
High Ring7
pause delay
low Ring7
next delay
LOW ARM0
LOW ARM2
LOW ARM4
LOW ARM6
LOW ARM8
LOW ARM10
LOW ARM12
LOW ARM14
 
'**************************************************
'EXPANDING RED CIRCLES
'**************************************************
For delay = 400 to 0 step -25
 high Arm1
 high Arm3
 high Arm5
 high Arm7
 high Arm9
 high Arm11
 high Arm13
 high Arm15
 High Ring0
pause delay
Low ring0
High Ring1
pause delay
Low ring1
High Ring2
pause delay
Low Ring2
High Ring3
pause delay
Low ring3
High Ring4
pause delay
low ring4
High Ring5
pause delay
Low Ring5
High Ring6
pause delay
Low Ring6
High Ring7
pause delay
low Ring7
next delay 
'************************************************
'EXPANDING MULTICOLOUR CIRCLES
'************************************************
 For delay = 400 to 0 step -25
 high Arm0
 high Arm1
 high Arm2
 high Arm3
 high Arm4
 high Arm5
 high Arm6
 high Arm7
 high Arm8
 high Arm9
 high Arm10
 high Arm11
 high Arm12
 high Arm13
 high Arm14
 high Arm15
High Ring0
pause delay
Low ring0
High Ring1
pause delay
Low ring1
High Ring2
pause delay
Low Ring2
High Ring3
pause delay
Low ring3
High Ring4
pause delay
low ring4
High Ring5
pause delay
Low Ring5
High Ring6
pause delay
Low Ring6
High Ring7
pause delay
low Ring7
next delay 
'*****************************************************
'EXPANDING WHITE DISC
'*****************************************************
low arm1
low arm3
low arm5
low arm7
low arm9
low arm11
low arm13
low arm15
For delay = 400 to 0 step -25
 high Arm0
 high Arm2
 high Arm4
 high Arm6
 high Arm8
 high Arm10
 high Arm12
 high Arm14
High Ring0
pause delay
High Ring1
pause delay
High Ring2
pause delay
High Ring3
pause delay
High Ring4
pause delay
High Ring5
pause delay
High Ring6
pause delay
High Ring7
pause delay

LOW RING0
LOW RING1
LOW RING2
LOW RING3
LOW RING4
LOW RING5
LOW RING6
LOW RING7
NEXT DELAY
'******************************************************
'flash all white
'******************************************************
fOR DELAY = 0 TO 100
high ring0
 high ring1
 high ring2
 high ring3
 high ring4
 high ring5
 high ring6 
 high ring7
 PAUSE fastflash
  LOW RING0
LOW RING1
LOW RING2
LOW RING3
LOW RING4
LOW RING5
LOW RING6
LOW RING7
PAUSE fastflash
NEXT DELAY
'******************************************************
'EXPANDING RED DISC
'******************************************************
 
lOW ARM0
low arm2
low arm4
low arm6
low arm8
low arm10
low arm12
low arm14

For delay = 400 to 0 step -25
 high Arm1
 high Arm3
 high Arm5
 high Arm7
 high Arm9
 high Arm11
 high Arm13
 high Arm15
High Ring0
pause delay
High Ring1
pause delay
High Ring2
pause delay
High Ring3
pause delay
High Ring4
pause delay
High Ring5
pause delay
High Ring6
pause delay
High Ring7
pause delay
LOW RING0
LOW RING1
LOW RING2
LOW RING3
LOW RING4
LOW RING5
LOW RING6
LOW RING7
NEXT DELAY
'*********************************************
'FLASH ALL RED
'*********************************************
fOR DELAY = 0 TO 100
high ring0
 high ring1
 high ring2
 high ring3
 high ring4
 high ring5
 high ring6 
 high ring7
 PAUSE fastflash
  LOW RING0
LOW RING1
LOW RING2
LOW RING3
LOW RING4
LOW RING5
LOW RING6
LOW RING7
PAUSE fastflash
NEXT DELAY
'*********************************************
'EXPANDING MULTICOLOUR DISC
'*********************************************
 HIGH ARM0
 high Arm1
 high Arm2
 high Arm3
 high Arm4
 high Arm5
 high Arm6
 high Arm7
 high Arm8
 high Arm9
 high Arm10
 high Arm11
 high Arm12
 high Arm13
 high Arm14
 high Arm15
For delay = 400 to 0 step -25
High Ring0
pause delay
High Ring1
pause delay
High Ring2
pause delay
High Ring3
pause delay
High Ring4
pause delay
High Ring5
pause delay
High Ring6
pause delay
High Ring7
pause delay
LOW RING0
LOW RING1
LOW RING2
LOW RING3
LOW RING4
LOW RING5
LOW RING6
LOW RING7
NEXT DELAY
'*******************************************************************
'flashall
'*******************************************************************
 HIGH ARM0
 high Arm1
 high Arm2
 high Arm3
 high Arm4
 high Arm5
 high Arm6
 high Arm7
 high Arm8
 high Arm9
 high Arm10
 high Arm11
 high Arm12
 high Arm13
 high Arm14
 high Arm15
 
 For delay = 400 to 0 step -25
 high ring0
 high ring1
 high ring2
 high ring3
 high ring4
 high ring5
 high ring6 
 high ring7
 pAUSE DELAY
LOW RING0
LOW RING1
LOW RING2
LOW RING3
LOW RING4
LOW RING5
LOW RING6
LOW RING7
Pause delay
next delay
For delay = 0 to 100
high ring0
 high ring1
 high ring2
 high ring3
 high ring4
 high ring5
 high ring6 
 high ring7
 pause fastflash
 LOW RING0
LOW RING1
LOW RING2
LOW RING3
LOW RING4
LOW RING5
LOW RING6
LOW RING7
next delay
 '****************************************
 'ROTATE WHITE
 '****************************************
high ring0
 high ring1
 high ring2
 high ring3
 high ring4
 high ring5
 high ring6
 high ring7
 for delay = 400 to 50 step -30 
  hIGH arm0
 high arm8
 pause delay
 low arm0
 low arm8
 high arm2
 high arm10
 pause delay
 low arm2
 low arm10
 high arm4
 high arm12
 pause delay
 low arm4
 low arm12
 high arm6
 high arm14
 pause delay
 low arm6
 low arm14
 next delay
 '*********************************************
 'ROTATE MULTI
 '*********************************************
high ring0
 high ring1
 high ring2
 high ring3
 high ring4
 high ring5
 high ring6
 high ring7
 for delay = 300 to 50 step -10 
 hIGH arm0
 HIGH ARM15
 HIGH ARM1
 high arm8
 HIGH ARM7
 HIGH ARM9
 pause delay
 low arm0
 low arm8
 LOW ARM7
 LOW ARM15
 high arm2
 high arm10
 HIGH ARM11
 HIGH ARM3
 pause delay
 low arm2
 LOW ARM1
 low arm10
 LOW ARM9
 high arm4
 high arm12
 HIGH ARM5
 HIGH ARM13
 pause delay
 low arm4
 LOW ARM3
 LOW ARM11
 low arm12
 high arm6
 high arm7
 high arm15
 high arm14
 pause delay
 low arm6
 low arm5
 low arm13
 low arm14
 next delay
 goto loop

The program runs ok until somewher near the end of the @flashall section then instead of going thru the rotate routines it jumps back to the beginning and starts again.
I would be very happy to post a picture or video clip if someone could point me towards the instructions for doing so which I cant seem to find !
Thanks all