@<BoB99>@
@This Script is the *short* AlPhAbEt - Version of "99 Bottles of Beer"@

1{1>.2>.3>,4>.5>.6>.7>.8>.9>,1>.2>,3>,4>.5>.6>.7>,8>.9>,
1>.2>,3>,4>.5>,6>,7>,8>,9>,1>.2>,3>,4>,5>.6>,7>.8>.9>,
1>.2>,3>,4>,5>.6>,7>.8>.9>,1>.2>,3>,4>.5>,6>,7>.8>.9>,
1>.2>,3>,4>.5>.6>,7>.8>,9>,s&1>.2>.3>,4>.5>.6>.7>.8>.9>,
1>.2>,3>,4>.5>,6>,7>,8>,9>,1>.2>,3>,4>.5>.6>,7>,8>.9>,
1>.2>.3>,4>.5>.6>.7>.8>.9>,1>.2>,3>,4>.5>.6>.7>,8>.9>,
1>.2>,3>,4>.5>.6>,7>.8>,9>,1>.2>,3>,4>.5>.6>,7>.8>,9>,
1>.2>,3>,4>,5>.6>.7>,8>.9>,}
2{1>.2>,3>.4>,5>.6>,7>.8>.9>,1>.2>,3>,4>.5>.6>.7>.8>,9>,
1>.2>,3>,4>.5>,6>.7>,8>,9>,1>.2>,3>,4>.5>.6>,7>.8>,9>,
1>.2>.3>,4>.5>.6>.7>.8>.9>,1>.2>,3>,4>.5>,6>,7>,8>,9>,
1>.2>,3>,4>.5>,6>,7>,8>.9>,1>.2>,3>,4>.5>.6>,7>.8>,9>,
1>.2>.3>,4>.5>.6>.7>.8>.9>,1>.2>,3>,4>.5>.6>,7>.8>.9>,
1>.2>,3>,4>.5>,6>,7>,8>,9>,1>.2>,3>,4>,5>.6>,7>,8>,9>,
1>.2>,3>,4>.5>,6>,7>,8>.9>,1>.2>.3>,4>.5>.6>.7>.8>.9>,
1>.2>,3>,4>.5>.6>.7>.8>,9>,1>.2>,3>,4>.5>,6>,7>,8>.9>,
1>.2>,3>,4>.5>.6>,7>.8>.9>,1>.2>.3>,4>.5>.6>.7>.8>.9>,
1>.2>,3>,4>,5>.6>.7>.8>.9>,1>.2>,3>,4>.5>.6>.7>.8>,9>,
1>.2>,3>,4>,5>.6>.7>,8>,9>,1>.2>,3>,4>,5>.6>.7>,8>,9>,
1>.2>.3>,4>.5>.6>.7>.8>.9>,1>.2>,3>,4>.5>,6>.7>.8>,9>,
1>.2>,3>,4>,5>.6>,7>.8>.9>,1>.2>.3>,4>.5>.6>.7>.8>.9>,
1>.2>,3>,4>.5>.6>.7>.8>,9>,1>.2>,3>,4>,5>.6>.7>,8>.9>,
1>.2>,3>,4>.5>,6>,7>,8>,9>,1>.2>,3>,4>,5>.6>,7>.8>,9>,
1>.2>,3>,4>.5>,6>,7>,8>.9>,1>.2>,3>,4>.5>.6>,7>.8>.9>,
1>.2>.3>,4>.5>,6>,7>.8>.9>,1>.2>.3>,4>.5>.6>.7>.8>.9>,}
3{1&1>.2>.3>,4>.5>.6>.7>.8>.9>,1>.2>,3>,4>.5>,6>,7>,8>,9>,
1>.2>,3>,4>.5>,6>,7>,8>.9>,1>.2>.3>,4>.5>.6>.7>.8>.9>,
1>.2>,3>,4>,5>.6>,7>.8>.9>,1>.2>,3>,4>.5>,6>.7>.8>.9>,
1>.2>,3>,4>.5>.6>,7>.8>,9>,1>.2>.3>,4>.5>.6>.7>.8>.9>,
1>.2>,3>,4>,5>.6>,7>,8>,9>,1>.2>,3>,4>.5>.6>.7>.8>,9>,
1>.2>,3>,4>.5>,6>,7>.8>.9>,1>.2>,3>,4>.5>,6>,7>.8>.9>,}
4{A&a&3&1>.2>.3>,4>.5>,6>,7>.8>.9>,1>.2>.3>,4>.5>.6>.7>.8>.9>,
A&a&1&1>.2>.3>,4>.5>,6>,7>,8>.9>,$&}
5{2&A&a&3&1>.2>.3>,4>.5>,6>,7>,8>.9>,$&$&}
6{R&r&2&1>.2>,3>,4>.5>,6>,7>,8>.9>,1>.2>,3>,4>.5>,6>,7>,8>,9>,
1>.2>.3>,4>.5>.6>.7>.8>.9>,1>.2>,3>,4>.5>,6>,7>.8>,9>,
1>.2>,3>,4>.5>,6>,7>,8>,9>,1>.2>,3>,4>,5>.6>.7>,8>.9>,
1>.2>,3>,4>.5>.6>,7>.8>,9>,3&1>.2>.3>,4>.5>,6>,7>,8>.9>,
$&$&1>.2>,3>.4>.5>,6>,7>,8>.9>,1>.2>,3>,4>.5>,6>,7>,8>,9>,
1>.2>.3>,4>.5>.6>.7>.8>.9>,1>.2>,3>,4>.5>,6>,7>.8>,9>,
1>.2>,3>,4>.5>,6>,7>,8>,9>,1>.2>,3>,4>,5>.6>.7>,8>.9>,
1>.2>,3>,4>.5>.6>,7>.8>,9>,3&1>.2>.3>,4>.5>,6>,7>.8>.9>,
1>.2>.3>,4>.5>.6>.7>.8>.9>,1>.2>,3>,4>.5>,6>,7>,8>.9>,
1>.2>,3>,4>.5>,6>,7>,8>,9>,1>.2>.3>,4>.5>.6>.7>.8>.9>,
1>.2>,3>,4>.5>,6>,7>.8>,9>,1>.2>,3>,4>.5>,6>,7>,8>,9>,
1>.2>,3>,4>,5>.6>.7>,8>.9>,1>.2>,3>,4>.5>.6>,7>.8>,9>,
1&1>.2>.3>,4>.5>,6>,7>,8>.9>,$&1>.2>,3>.4>.5>.6>,7>,8>,9>,
1>.2>,3>,4>.5>,6>,7>,8>,9>,1>.2>.3>,4>.5>.6>.7>.8>.9>,
1>.2>,3>,4>,5>.6>,7>.8>.9>,1>.2>,3>,4>.5>,6>,7>,8>,9>,
1>.2>.3>,4>.5>.6>.7>.8>.9>,1>.2>,3>,4>,5>.6>,7>.8>.9>,
1>.2>,3>,4>.5>,6>.7>.8>.9>,1>.2>,3>,4>.5>.6>,7>.8>,9>,
1>.2>.3>,4>.5>.6>.7>.8>.9>,1>.2>,3>,4>,5>.6>.7>,8>,9>,
1>.2>,3>,4>,5>.6>,7>.8>.9>,1>.2>,3>,4>.5>,6>,7>,8>,9>,
1>.2>,3>,4>,5>.6>.7>,8>.9>,1>.2>,3>,4>.5>.6>,7>.8>,9>,
1>.2>.3>,4>.5>.6>.7>.8>.9>,1>.2>,3>,4>.5>.6>.7>.8>,9>,
1>.2>,3>,4>.5>,6>,7>,8>.9>,1>.2>,3>,4>.5>.6>,7>.8>.9>,
1>.2>.3>,4>.5>.6>.7>.8>.9>,1>.2>,3>,4>.5>.6>.7>,8>.9>,
1>.2>,3>,4>,5>.6>,7>.8>,9>,1>.2>,3>,4>,5>,6>.7>.8>,9>,
1>.2>.3>,4>.5>.6>.7>.8>.9>,1>.2>,3>,4>,5>.6>.7>,8>,9>,
1>.2>,3>,4>.5>,6>,7>,8>,9>,1>.2>,3>,4>.5>,6>,7>.8>,9>,
1>.2>,3>,4>.5>.6>,7>.8>,9>,1>.2>.3>,4>.5>.6>.7>.8>.9>,
1>.2>,3>,4>.5>,6>,7>.8>,9>,1>.2>,3>,4>.5>,6>,7>,8>,9>,
1>.2>,3>,4>,5>.6>.7>,8>.9>,1>.2>,3>,4>.5>.6>,7>.8>,9>,
1>.2>.3>,4>.5>,6>,7>.8>.9>,1>.2>.3>,4>.5>.6>.7>.8>.9>,
A&a&3&1>.2>.3>,4>.5>,6>,7>,8>.9>,}
${1>.2>.3>.4>.5>,6>,7>.8>,9>,1>.2>.3>.4>.5>,6>.7>,8>.9>,}
a{1>a2>b3>c4>d5>e6>f7>g8>h9>,}
b{i>.j>.k>,l>.I>,J>,K>,L>,n>.o>.p>,q>,r>.s>.t>.u>.N>.O>.P>,Q>,R>,S>.T>.U>,
R&r&w>.w*.{w&w=.5&}6&}
d{z>.x>.x=.h=,z=.{h>.z>.x>,}x=.h=.z=.{h>,z>,x>,}
v>gz&g>vv>fz&f>vv>ez&e>vv>dz&d>vv>cz&c>vv>bz&b>vv>az&a>v
m>.a=ib=jc=kd=le=If=Jg=Kh=Lm>,m=,r&m=,z>.
m=,{x>.m=,x=.H=,z=.{H>.z>.x>,}}m=,x=.H=.z=.{H>,z>,x>,}
m=,{v>Gz&G>v}m=,{v>Fz&F>v}m=,{v>Ez&E>v}m=,{v>Dz&D>v}
m=,{v>Cz&C>v}m=,{v>Bz&B>v}m=,{v>Az&A>v}}
r{a>Nb>Oc>Pd>Qe>Rf>Sg>Th>U}
s{m>.a=nb=oc=pd=qe=rf=sg=th=,A=nB=oC=pD=qE=rF=sG=tH=um>,
m=.{1>.2>,3>,4>,5>.6>.7>,8>,9>,}}
w{4&d&a=nb=oc=pd=qe=rf=sg=th=uA=nB=oC=pD=qE=rF=sG=tH=uw>,}
z{x>.x=.v=,z=,{v>.z>.x>,}x=.v=.z=,{v>,z>,x>,}}
A{m>.W=,A=nB=oC=pD=qE=rF=sG=tH=um>,m=.{1>A2>B3>C4>D5>E6>F7>G8>H9>,}}
R{A>NB>OC>PD>QE>RF>SG>TH>U}

{
0>,
@
set to "," for to write everything to the screen
set to "." for to write everything to a file
@

W>,
@
set to "," for to see a leading zero
set to "." for to not see a leading zero
@

b&
}