===
Revised Alpha Sections Loop From the Outside In:

Loop=$loop(L,1)                                     >> Loops characters L, but just once for each letter. 

L =$ifgreater(A1,B1,X1,Y1)                          >> If Number A1 Is Greater Than Number B1 (if C1 is a Symbol), Outputs X1. If Not, Outputs Y1

A1=$strchr(S1,C1)                                   >> Outputs the First Occurrence of character C1 in string S1, Otherwise 0 (null)

S1=.''                                              >> Checks C1 for These Symbols (Here is where you add more as required)

C1=$left($if2(%artistsort%,%artist%),1)             >> Ouputs First Character of Artist's Name

B1=0                                                >> Zero (null)

X1=$if(X2,Y2,Z2)                                    >> if X2 is true, Y2 is returned, otherwise Z2

X2=$isdigit(D1)                                     >> returns true if character D1 is a decimal number

D1=$mid($if2(%artistsort%,%artist%),2)              >> Outputs Second Character of Artist's Name

Y2=123                                              >> Outputs "123"

Z2=$upper($mid($if2(%artistsort%,%artist%),2))      >> Outputs Uppercase Version of Second Letter of Artist's Name

Y1=$if(X3,Y3,Z3)                                    >> if X3 is true, Y3 is returned, otherwise Z3
   
X3=$isdigit(D2)                                     >> returns true if character D2 is a decimal number

D2=$left($if2(%artistsort%,%artist%),1)             >> Ouputs First Character of Artist's Name (Same as C1)

Y3=123                                              >> Outputs "123"

Z3=$upper($left($if2(%artistsort%,%artist%),1))     >> Outputs Uppercase Version of First Letter of Artist's Name

===

Assembled Loop:

$loop($ifgreater($strchr(.'',$left($if2(%artistsort%,%artist%),1)),0,$if($isdigit($mid($if2(%artistsort%,%artist%),2)),123,$upper($mid($if2(%artistsort%,%artist%),2))),$if($isdigit($left($if2(%artistsort%,%artist%),1)),123,$upper($left($if2(%artistsort%,%artist%),1)))),1)

===

Replace "I" and "J" with " I" and " J" for easier clicking in Links:

From X1 = $upper($mid($if2(%artistsort%,%artist%),2)) >> $replace($upper($mid($if2(%artistsort%,%artist%),2)),I, I,J, J)

From Y2 = $upper($left($if2(%artistsort%,%artist%),1)) >> $replace($upper($left($if2(%artistsort%,%artist%),1)),I, I,J, J)

Yields:

<a href="javascript:hideshow(''Section $put(ABC,$add($get(ABC),1))'')">$ifgreater($strchr(.'',$left($if2(%artistsort%,%artist%),1)),0,$if($isdigit($mid($if2(%artistsort%,%artist%),2)),123,$replace($upper($mid($if2(%artistsort%,%artist%),2)),I,&nbsp;I,J,&nbsp;J)),$if($isdigit($left($if2(%artistsort%,%artist%),1)),123,$replace($upper($left($if2(%artistsort%,%artist%),1)),I,&nbsp;I,J,&nbsp;J)))</a>&#32;

===

Finished Alpha Menu Loop:

$loop($ifgreater($strchr(.'',$left($if2(%artistsort%,%artist%),1)),0,$if($isdigit($mid($if2(%artistsort%,%artist%),2)),123,$upper($mid($if2(%artistsort%,%artist%),2))),$if($isdigit($left($if2(%artistsort%,%artist%),1)),123,$upper($left($if2(%artistsort%,%artist%),1)))),1)<a href="javascript:hideshow(''Section $put(ABC,$add($get(ABC),1))'')">$ifgreater($strchr(.'',$left($if2(%artistsort%,%artist%),1)),0,$if($isdigit($mid($if2(%artistsort%,%artist%),2)),123,$replace($upper($mid($if2(%artistsort%,%artist%),2)),I,&nbsp;I,J,&nbsp;J)),$if($isdigit($left($if2(%artistsort%,%artist%),1)),123,$replace($upper($left($if2(%artistsort%,%artist%),1)),I,&nbsp;I,J,&nbsp;J)))</a>&#32;$loopend()