DO:1<-#512\xa2#2DOSTASH:1DO:1<-#256\xa2#16DOSTASH:1DO:1<-#32832DOSTASH:1DO:1<-#8448DOSTASH:1DO:1<-#2304DOSTASH:1DO:1<-#768DOSTASH:1DO:1<-#192DOSTASH:1DO:1<-#288DOSTASH:1DO:1<-#264DOSTASH:1DO:1<-#1026DO;1<-#1DO;1SUB#1<-#121DO,1<-#1DOCOMEFROM#9DO.1<-:1~#1023\xa2#0DO.2<-:1~#1365DOCOMEFROM.2~.2DO.4<-.2DO.2<-#0DO.3<-.1DOCOMEFROM.3~.3DOREADOUT;1(1)DO.3<-.3~#1022DO.3<-#0DOREADOUT,1(1)DO.2<-.4~#62(9)DORETRIEVE:1
Note that non-ascii characters in the above source code will be escaped (such as \x9f).