DO;1<-#99DO;1SUB#1<-#28DO;1SUB#2<-#304DO;1SUB#3<-#117DO;1SUB#4<-#4118DO;1SUB#5<-#666DO;1SUB#6<-#2598DO;1SUB#7<-#158DO;1SUB#8<-#201DO;1SUB#9<-#240DO;1SUB#10<-#117DO;1SUB#11<-#4375DO;1SUB#12<-#380DO;1SUB#13<-#317DO;1SUB#14<-#383DO;1SUB#15<-#318DO;1SUB#16<-#149DO;1SUB#17<-#4438DO;1SUB#18<-#360DO;1SUB#19<-#669DO;1SUB#20<-#349DO;1SUB#21<-#4118DO;1SUB#22<-#666DO;1SUB#23<-#2598DO;1SUB#24<-#149DO;1SUB#25<-#4370DO;1SUB#26<-#700DO;1SUB#27<-#702DO;1SUB#28<-#2606DO;1SUB#29<-#517DO;1SUB#30<-#4374DO;1SUB#31<-#225DO;1SUB#32<-#103DO;1SUB#33<-#373DO;2<-#99DO;2SUB#1<-#48DO;2SUB#2<-#240DO;2SUB#3<-#244DO;2SUB#4<-#317DO;2SUB#5<-#349DO;2SUB#6<-#4118DO;2SUB#7<-#666DO;2SUB#8<-#2598DO;2SUB#9<-#692DO;2SUB#10<-#117DO;2SUB#11<-#4375DO;2SUB#12<-#380DO;2SUB#13<-#360DO;2SUB#14<-#669DO;2SUB#15<-#312DO;2SUB#16<-#151DO;3<-#99DO;3SUB#1<-#52DO;3SUB#2<-#360DO;3SUB#3<-#669DO;3SUB#4<-#349DO;3SUB#5<-#4118DO;3SUB#6<-#666DO;3SUB#7<-#2598DO;3SUB#8<-#149DO;3SUB#9<-#4179DO;3SUB#10<-#240DO;3SUB#11<-#247DO;3SUB#12<-#361DO;3SUB#13<-#255DO;3SUB#14<-#236DO;3SUB#15<-#149DO;3SUB#16<-#4162DO;3SUB#17<-#2567DO;3SUB#18<-#360DO;3SUB#19<-#665DO;3SUB#20<-#117DO;3SUB#21<-#4167DO;3SUB#22<-#226DO;3SUB#23<-#517DO;3SUB#24<-#4178DO;3SUB#25<-#657DO;3SUB#26<-#362DO;3SUB#27<-#2606DO;3SUB#28<-#517DO;3SUB#29<-#4374DO;3SUB#30<-#225DO;3SUB#31<-#104DO,1<-#1DOREADOUT;1+;2+,1+;1+;2+,1+;1+;3+,1+;1+;2
Note that non-ascii characters in the above source code will be escaped (such as \x9f).