view interps/c-intercal/pit/lib/floatlib.i @ 12320:9c7eb9899d95 draft

<fizzie> le/rn karma//All living beings have actions (karma) as their own, their inheritance, their congenital cause, their kinsman, their refuge. It is karma that differentiates beings into low and high states.
author HackEso <hackeso@esolangs.org>
date Fri, 06 Mar 2020 23:08:37 +0000
parents 859f9b4339e6
children
line wrap: on
line source

	PLEASE USE A DESIGNATED ENTRY POINT

(5000)	PLEASE ABSTAIN FROM (5005)
(5010)	PLEASE STASH .1 + .2 + .3 + :1 + :2 + :4 + :6
	DO :4 <- :1
(5005)	PLEASE DO :2 <- '"?':2~"#65535$#0"'$#32768"~"#0$#65535"'$
		':2~"#0$#65535"'
	DO :6 <- '"?':1~"#32767$#0"'$':2~"#32767$#0"'"~"#0$#32767"'$
		'"?':1~"#0$#65535"'$':2~"#0$#65535"'"~"#0$#65535"'
	DO .5 <- '?"':2~:6'~'"?:6~:6"~"#32767$#65535"'"$#1'~#3
	DO (5001) NEXT
	DO :1 <- :2
	DO :2 <- :4
	DO :4 <- :1
	DO (5002) NEXT
(5001)	DO (1001) NEXT
(5002)	PLEASE FORGET #1
	DO .5 <- '?"':2~":2~'#32767$#65535'"'~#1"$#1'~#3
	DO (5006) NEXT
	DO .5 <- '?"'?":1~'#32768$#0'"$":2~'#32768$#0'"'~#1"$#1'~#3
	PLEASE DO .1 <- '"'":1~'#63488$#61440'"$#256'~'#511$#256'"$
		#0'~'#1023$#256'
	DO :1 <- '"':1~"#2047$#0"'$#2048"~"#2047$#2048"'$':1~"#0$#4095"'
	DO .2 <- :2~'#30720$#61440'
	DO :3 <- '"':2~"#2047$#0"'$#2048"~"#2047$#2048"'$':2~"#0$#4095"'
	DO (5003) NEXT
	DO :2 <- :1
	DO :1 <- '"?':3~"#65535$#0"'$#65535"~"#0$#65535"'$'"?':3~"#0$
		#65535"'$#65535"~"#0$#65535"'
	DO :6 <- #1
	DO (5510) NEXT
	DO :3 <- :1
	DO :1 <- :2
	DO (5004) NEXT
(5003)	DO (1001) NEXT
(5004)	PLEASE FORGET #1
	DO .5 <- .1
	DO .1 <- .1~#255
	DO (1010) NEXT
	DO .1 <- .5
	PLEASE DO .5 <- .3~#65504
	DO .5 <- '?"'V"!5~.5'~#1"$"'V.3~#6'~'".3~#16"~".3~#8"'"'~#1"$
		#2'~#3
	DO (5006) NEXT
	DO :4 <- #0
	DO (5580) NEXT
	DO :2 <- :3
	DO :6 <- :4
	DO (1509) NEXT
	DO :1 <- :3
	DO :2 <- :6
	PLEASE DO (5600) NEXT
	DO :3 <- :1
	DO (5007) NEXT
(5006)	DO (1001) NEXT
	DO :3 <- :4
(5007)	PLEASE RETRIEVE .1 + .2 + .3 + :1 + :2 + :4 + :6
	PLEASE REINSTATE (5005)
	PLEASE RESUME #2

(5020)	PLEASE STASH .1 + .2 + .3 + .5 + :1
	DO .1 <- #150
	DO .2 <- :1~'#30720$#61440'
	DO (1010) NEXT
	DO .5 <- '?"!3~.3'~#1"$#1'~#3
	DO (5022) NEXT
	DO .5 <- '?".3~#32768"$#2'~#3
	DO (5022) NEXT
	DO :2 <- #0
	DO :3 <- :1
	PLEASE DO .5 <- '?"'V"'V"V.V3"'~#32"$".&3~#8"'~#1"$#2'~#3
	DO (5021) NEXT
	DO .1 <- .3
	DO :2 <- #1
	DO (5023) NEXT
(5024)	DO (1001) NEXT
(5023)	PLEASE FORGET #1
	DO :2 <- :V2
	DO (5520) NEXT
	DO .5 <- '?"!1~.1'~#1"$#2'~#3
	DO (5024) NEXT
	PLEASE DO :2 <- :2~:&2
	DO :2 <- '"&':1~"#65535$#0"'$':2~"#65535$#0"'"~"#0$#65535"'$
		'"&':1~"#0$#65535"'$':2~"#0$#65535"'"~"#0$#65535"'
	DO .5 <- '?"':2~:2'~#1"$#1'~#3
	DO (5022) NEXT
	DO :3 <- '"?':1~"#65535$#0"'$':2~"#65535$#0"'"~"#0$#65535"'$
		'"?':1~"#0$#65535"'$':2~"#0$#65535"'"~"#0$#65535"'
	PLEASE DO .1 <- '":1~'#65535$#0'"$"'#512$.2'~'#768$
		#255'"'~'#32768$#1023'
	DO :1 <- :2
	DO :2 <- #0
	DO (5590) NEXT
	DO :2 <- :3
	PLEASE DO :3 <- '"'"'"'".1$':1~#32768'"~"#1109$#1"'$
		':1~#128'"~#2735'$':1~"#546$#0"'"~"#43679"'$':1~"#1365$
		#0"'"~"#1023$#63"'$'"'"'".1$#0"~#34959'$':1~"#0$
		#1170"'"~#11007'$':1~"#0$#2925"'"~"#2005$#255"'
	DO (5025) NEXT
(5022)	DO (1001) NEXT
	PLEASE FORGET #1
	DO :2 <- :1
	DO :3 <- #0
	DO (5025) NEXT
(5021)	DO (1001) NEXT
(5025)	PLEASE RETRIEVE .1 + .2 + .3 + .5 + :1
	PLEASE RESUME #2

(5030)	DO :3 <- #0
	DO .5 <- '?"'":1~':1~"#32767$#65535"'"~":2~':2~"#32767$
		#65535"'"'~#1"$#1'~#3
	DO (5041) NEXT
	PLEASE STASH .1 + .2 + .3 + :1 + :2 + :4 + :5
	PLEASE DO .1 <- '"'":1~'#63488$#61440'"$#256'~'#511$#256'"$
		#0'~'#1023$#256'
	DO :4 <- '"':1~"#2047$#0"'$#2048"~"#2047$#2048"'$':1~"#0$#4095"'
	PLEASE DO .2 <- '"'":2~'#63488$#61440'"$#0'~'#511$#256'"$
		#0'~'#1023$#256'
	DO :5 <- '"':2~"#2047$#0"'$#2048"~"#2047$#2048"'$':2~"#0$#4095"'
	DO (1000) NEXT
	DO .1 <- .3~#2047
	DO .2 <- #126
	DO (1010) NEXT
	PLEASE DO .1 <- '":4~'#3855$#3855'"$#0'~'#65280$#255'
	DO .2 <- '":5~'#3855$#3855'"$#0'~'#65280$#255'
	DO (1530) NEXT
	DO :3 <- :1
	DO .1 <- .1~#65280
	DO .2 <- :5~#65535
	DO (1530) NEXT
	DO :2 <- :1
	DO .1 <- :4~#65535
	DO (1530) NEXT
	DO .2 <- :5~'#3840$#3840'
	DO :4 <- '"':3~"#65535$#0"'$':1~"#65280$#0"'"~"#65280$#255"'$
		'"':3~"#0$#65535"'$':1~"#0$#65280"'"~"#65280$#255"'
	DO :5 <- :1~#65535
	DO (1530) NEXT
	DO (1500) NEXT
	DO :1 <- :3
	DO :2 <- :4
	DO (1500) NEXT
	DO :1 <- :3~'#65520$#65520'
	PLEASE DO :2 <- '"'&"V:3~#128"'$'":5~:5"~#1'"~"#32768$#32767"'$
		'"'&"V:3~#64"'$':3~#63'"~"#32768$#32767"'
	DO .1 <- .3
	PLEASE DO (5600) NEXT
	DO :3 <- :1
	PLEASE RETRIEVE .1 + .2 + .3 + :1 + :2 + :4 + :5
	PLEASE RESUME #1

(5040)	DO :3 <- #0
	PLEASE DO .5 <- '?#1$"':2~":2~'#32767$#65535'"'~#1"'~#3
	DO (5041) NEXT
	DO .5 <- '?"':1~":1~'#32767$#65535'"'~#1"$#1'~#3
	DO (5041) NEXT
	PLEASE STASH .1 + .2 + .3 + :1 + :2 + :4
	PLEASE DO .1 <- '"'":1~'#63488$#61440'"$#256'~'#511$#256'"$
		#0'~'#1023$#256'
	DO .2 <- '"'":2~'#63488$#61440'"$#0'~'#511$#256'"$#0'~'#1023$
		#256'
	DO (1010) NEXT
	DO :1 <- '"'"':1~"#2047$#1"'$#4096"~"#4094$#4099"'$#0"~"#16383$
		#3"'$'"'"'"':1~"#0$#4095"'$#0"~"#4095$#1"'$#0"~"#8191$
		#1"'$#0"~"#16383$#3"'
	PLEASE DO :3 <- '"'"':2~"#0$#4095"'$#0"~"#4095$#1"'$#0"~"#8191$
		#3"'$'"'"':2~"#2047$#1"'$#32768"~"#4094$#32771"'$
		#0"~"#16383$#3"'
	DO :2 <- #0
	DO :4 <- #0
	DO (5540) NEXT
	DO .2 <- .3
	DO (1000) NEXT
	DO .1 <- .3
	DO :2 <- '&"V:1~#64"'$'"':1~#63'$.5"~#2735'
	DO :1 <- :1~'#65528$#65520'
	PLEASE DO (5600) NEXT
	DO :3 <- :1
	PLEASE RETRIEVE .1 + .2 + .3 + :1 + :2 + :4
	PLEASE RESUME #1
(5041)	DO (1001) NEXT
	PLEASE RESUME #2

(5050)	DO :3 <- #0
	PLEASE DO .5 <- '?#1$"':2~":2~'#32767$#65535'"'~#1"'~#3
	DO (5051) NEXT
	DO .5 <- '?"':1~":1~'#32767$#65535'"'~#1"$#1'~#3
	DO (5051) NEXT
	PLEASE STASH .1 + .2 + .3 + :1 + :2 + :4
	PLEASE DO .1 <- '"'":1~'#63488$#61440'"$#256'~'#511$#256'"$
		#0'~'#1023$#256'
	DO :1 <- '"':1~"#2047$#0"'$#2048"~"#2047$#2048"'$':1~"#0$#4095"'
	DO .2 <- :2~'#30720$#61440'
	DO :2 <- '"':2~"#2047$#0"'$#2048"~"#2047$#2048"'$':2~"#0$#4095"'
	DO (5052) NEXT
(5053)	DO (1001) NEXT
(5052)	PLEASE FORGET #1
	DO .5 <- '?.1$.2'~'#0$#255'
	DO .5 <- '?"!2~.5'~'"?.5~.5"~#255'"$#2'~#3
	DO (5054) NEXT
	DO (1510) NEXT
	DO .5 <- '?":3~'#32768$#0'"$#2'~#3
	DO (5056) NEXT
	DO :1 <- :3
	DO (5055) NEXT
(5056)	DO (1001) NEXT
(5055)	PLEASE FORGET #1
	DO .5 <- '?":1~'#32768$#0'"$#1'~#3
	DO (5057) NEXT
	DO :2 <- :2~'#65535$#65534'
	DO .5 <- '?"':2~:2'~#1"$#1'~#3
	DO (5054) NEXT
	DO .3 <- .1
	DO .1 <- .2
	DO (1020) NEXT
	DO .2 <- .1
	DO .1 <- .3
	DO (5052) NEXT
(5057)	DO (1001) NEXT
	PLEASE FORGET #1
	DO :1 <- ':1~"#0$#65535"'$'"':1~"#32767$#0"'$#0"~"#32767$#1"'
	DO (5520) NEXT
	DO (5052) NEXT
(5054)	DO (1001) NEXT
	DO :2 <- #0
	PLEASE DO (5600) NEXT
	DO :3 <- :1
	PLEASE RETRIEVE .1 + .2 + .3 + :1 + :2 + :4
	PLEASE RESUME #2
(5051)	DO (1001) NEXT
	PLEASE RESUME #2

(5060)	PLEASE STASH .1 + .5 + :1
	DO :2 <- #0
	DO .5 <- '?":1~'#32768$#0'"$#1'~#3
	DO (5061) NEXT
	DO .1 <- #1686
	DO (5560) NEXT
	DO (5062) NEXT
(5061)	DO (1001) NEXT
	DO .1 <- #662
(5062)	PLEASE DO (5600) NEXT
	DO :2 <- :1
	PLEASE RETRIEVE .1 + .5 + :1
	PLEASE RESUME #2

(5070)	PLEASE STASH .1 + .2 + .3 + :1 + :3 + :4 + :6
	DO .1 <- #157
	DO .2 <- :1~'#30720$#61440'
	DO (1010) NEXT
	DO .5 <- '?".3~#32768"$#2'~#3
	DO (5071) NEXT
	PLEASE DO :3 <- '"'"':1~"#0$#4095"'$#0"~"#4095$#1"'$#0"~"#8191$
		#3"'$'"'"':1~"#2047$#1"'$#32768"~"#4094$#32771"'$
		#0"~"#16383$#3"'
	DO (5580) NEXT
	DO .5 <- '?":1~'#32768$#0'"$#1'~#3
	DO (5072) NEXT
	DO :1 <- '"?':3~"#65535$#0"'$#65535"~"#0$#65535"'$'"?':3~"#0$
		#65535"'$#65535"~"#0$#65535"'
	DO :6 <- #1
	DO (5510) NEXT
	DO :2 <- :1
	DO (5073) NEXT
(5071)	DO (1001) NEXT
	PLEASE FORGET #1
	DO :6 <- :1~'#32768$#0'
	DO :1 <- #32767$#65535
	DO (5510) NEXT
	DO :2 <- :1
	PLEASE DO .5 <- #3
	DO (5073) NEXT
(5072)	DO (1001) NEXT
	DO :2 <- :3
(5073)	PLEASE RETRIEVE .1 + .2 + .3 + :1 + :3 + :4 + :6
	PLEASE RESUME #2

(5080)	PLEASE STASH .1 + .2 + .3 + .4 + .5 + .6 + .7 + .8 + :1 + :3 +
		:4 + :5 + :6 + ,1 + ;1
	DO .5 <- '?"':1~":1~'#32767$#65535'"'~#1"$#1'~#3
	DO (5088) NEXT
	PLEASE DO (5690) NEXT
	DO :5 <- :1~'#32767$#65535'
	DO .5 <- '?":1~'#32768$#0'"$#1'~#3
	DO (5081) NEXT
	PLEASE DO .6 <- #65535
	DO (5082) NEXT
(5081)	DO (1001) NEXT
	PLEASE DO .6 <- #1
(5082)	PLEASE FORGET #1
	DO .1 <- :5~'#30720$#61440'
	DO .2 <- #65409
	DO (1009) NEXT
	DO .5 <- '?".3~#32768"$#1'~#3
	DO (5083) NEXT
	PLEASE DO .7 <- #65535
	DO .1 <- '?.3$#65535'~'#0$#65535'
	DO (1020) NEXT
	DO (5084) NEXT
(5083)	DO (1001) NEXT
	PLEASE DO .7 <- #1
	DO .1 <- .3
(5084)	PLEASE FORGET #1
	PLEASE DO .2 <- #39457
	DO (1530) NEXT
	DO .1 <- :1~'#65280$#65024'
	DO .2 <- .7~#32768
	DO (1000) NEXT
	DO .8 <- .3
	DO (5019) NEXT
(5087)	DO (1001) NEXT
	DO .1 <- .8
	DO .2 <- .7
	DO (1009) NEXT
	DO .8 <- .3
(5019)	PLEASE FORGET #1
	DO :1 <- '"'"':5~"#2047$#1"'$#4096"~"#4094$#4099"'$#0"~"#16383$
		#3"'$'"'"'"':5~"#0$#4095"'$#0"~"#4095$#1"'$#0"~"#8191$
		#1"'$#0"~"#16383$#3"'
	DO :2 <- #0
	DO .1 <- :5~'#30720$#61440'
	DO .5 <- '?"!8~.8'~#1"$#1'~#3
	DO (5018) NEXT
	DO :3 <- ';1SUB.8'~'#65535$#65534'
	DO :4 <- '&"V';1SUB.8'~#1"'$#0
	DO .2 <- ,1SUB.8
	DO .5 <- '?".7~#32768"$#1'~#3
	DO (5085) NEXT
	DO (1020) NEXT
	DO (1009) NEXT
	PLEASE DO (5530) NEXT
	DO (5086) NEXT
(5085)	DO (1001) NEXT
	PLEASE FORGET #1
	DO (1010) NEXT
	PLEASE DO (5540) NEXT
	DO :2 <- '&"V:1~#1"'
	DO :1 <- :1~'#65535$#65534'
	DO .2 <- .3
	DO (1009) NEXT
	DO .1 <- .3
	DO .2 <- #65410
	DO (1009) NEXT
	DO (5086) NEXT
(5018)	DO (1001) NEXT
	DO :2 <- '&"V:1~#1"'
	DO :1 <- :1~'#65535$#65534'
	DO .3 <- .1
(5086)	PLEASE FORGET #1
	DO :3 <- :1
	DO :4 <- :2
	DO .1 <- #157
	DO .2 <- .3
	DO (1010) NEXT
	DO (5580) NEXT
	PLEASE DO .5 <- '?"'V":3~#16"$"&':3~#8'$':V3~#2'"'~#1"$#2'~#3
	DO (5087) NEXT
	DO :1 <- :3
	DO :2 <- :4
	DO :3 <- #0
	PLEASE DO :4 <- #784$#904
	DO (5530) NEXT
	DO :1 <- :3
	DO :6 <- :4~'#32768$#0'
	DO (5510) NEXT
	DO :2 <- #100
	DO (1540) NEXT
	DO .1 <- .8
	PLEASE DO .2 <- #50~.7
	DO (1000) NEXT
	DO :1 <- :3
	DO :2 <- .3
	DO (1500) NEXT
	DO :1 <- :3
	PLEASE DO :2 <- '#31664$#21632'~!6$.6'
	DO (1500) NEXT
	DO :2 <- :3
	DO (5089) NEXT
(5088)	DO (1001) NEXT
	DO :2 <- #0
(5089)	PLEASE FORGET #1
	PLEASE RETRIEVE .1 + .2 + .3 + .4 + .5 + .6 + .7 + .8 + :1 +
		:3 + :4 + :5 + :6 + ,1 + ;1
	PLEASE RESUME #1

(5090)	PLEASE DO :2 <- '"?':1~"#65535$#0"'$#21660"~"#0$#65535"'$
		'"?':1~"#0$#65535"'$#63326"~"#0$#65535"'
	PLEASE DO .5 <- #1$"#3~'"'":1~:2"~"'?:2~:2'~'#32767$
		#65535'"'~#1"$"'":1~'#32768$#0'"~"':2~:2'~'#32768$
		#0'"'~#1"'"
	DO :2 <- #0
	DO (5091) NEXT
	PLEASE STASH .1 + .2 + .3 + .4 + .6 + .7 + .8 + :1 + :3 + :4 +
		:5 + :6 + :7 + :8 + :9 + ,1 + ;1
	PLEASE DO (5690) NEXT
	PLEASE DO :2 <- #33872$#43872
	DO (1509) NEXT
	DO .5 <- :4
	DO (5091) NEXT
	DO :1 <- :3
	DO .7 <- #65535
	DO (5092) NEXT
(5091)	DO (1001) NEXT
	DO .7 <- #1
(5092)	PLEASE FORGET #1
	DO :6 <- #0
	DO :7 <- #0
	PLEASE DO :5 <- #38368$#10099
	PLEASE DO :4 <- #63085$#14998
	PLEASE DO :8 <- #20480$#16384
	DO :9 <- :1
	DO (5093) NEXT
(5094)	DO (1001) NEXT
(5093)	PLEASE FORGET #1
	DO :1 <- :9
	DO :2 <- :8
	DO (1510) NEXT
	DO .5 <- '?":3~'#32768$#0'"$#2'~#3
	DO (5095) NEXT
	DO :9 <- :3
	DO :1 <- :6
	DO :2 <- :7
	DO :3 <- :5
	DO (5500) NEXT
	DO :6 <- :1
	DO :7 <- :2
	DO (5096) NEXT
(5095)	DO (1001) NEXT
(5096)	PLEASE FORGET #1
	DO :4 <- '"'V:5~#1'$':4~"#0$#65534"'"~"#32768$#32767"'$
		':4~"#65535$#0"'
	DO :5 <- :5~'#65535$#65534'
	DO :8 <- :8~'#65535$#65534'
	DO .5 <- '?":8~#2"$#1'~#3
	DO (5094) NEXT
	DO :1 <- :6
	DO :2 <- :7
	DO .1 <- :9
	PLEASE DO .5 <- '?"'V".1~#64"$".&1~#16"'~#1"$#1'~#3
	DO (5097) NEXT
	DO .8 <- #65535
	DO .2 <- #65486
	DO (1009) NEXT
	DO .1 <- .3
	DO (5098) NEXT
(5097)	DO (1001) NEXT
	DO .8 <- #1
(5098)	PLEASE FORGET #1
	DO .5 <- '?.1$#38'~'#0$#65535'
	DO .5 <- '?"'.1~.5'~'"?.5~.5"~#32767'"$#2'~#3
	DO (5015) NEXT
	DO .5 <- '?"!1~.1'~#1"$#1'~#3
	DO (5014) NEXT
	DO .2 <- ,1SUB.1
	DO .5 <- '?".8~#32768"$#1'~#3
	DO (5017) NEXT
	DO :3 <- ';1SUB.1'~'#65535$#65534'
	DO :4 <- '&"V';1SUB.1'~#1"'$#0
	DO (5540) NEXT
	PLEASE DO :2 <- .V5$#0
	DO (1010) NEXT
	DO .1 <- .3
	DO .2 <- #508
	DO (1000) NEXT
	DO (5016) NEXT
(5017)	DO (1001) NEXT
	PLEASE FORGET #1
	DO :3 <- ;1SUB.1
	DO :4 <- #0
	DO (5530) NEXT
	DO .1 <- #635
	DO (1000) NEXT
	DO (5016) NEXT
(5014)	DO (1001) NEXT
	DO .3 <- #634
(5016)	PLEASE FORGET #1
	DO .1 <- !7$.3'~'#1024$#1023'
	PLEASE DO (5600) NEXT
	DO :2 <- :1
	DO (5099) NEXT
(5015)	DO (1001) NEXT
	PLEASE FORGET #1
	DO :2 <- #0
	PLEASE DO .5 <- #1$'"?!8~#32768'$#1"~#1'
	DO (5099) NEXT
(5099)	PLEASE RETRIEVE .1 + .2 + .3 + .4 + .6 + .7 + .8 + :1 + :3 +
		:4 + :5 + :6 + :7 + :8 + :9 + ,1 + ;1
	PLEASE RESUME #2

(5100)	DO :2 <- #0
	PLEASE DO .5 <- #1$':1~"#32768$#0"'
	DO (5107) NEXT
	DO .5 <- '?"':1~:1'~#1"$#1'~#3
	DO (5107) NEXT
	PLEASE STASH .1 + .2 + .3 + :1 + :3 + :4 + :6
	DO .1 <- :1~'#30720$#61440'
	DO :1 <- '"':1~"#2047$#0"'$#2048"~"#2047$#2048"'$':1~"#0$#4095"'
	DO .2 <- #897
	DO (1000) NEXT
	DO .5 <- '?".3~#1"$#1'~#3
	DO (5101) NEXT
	DO :1 <- ':1~"#0$#65535"'$'"':1~"#32767$#0"'$#0"~"#32767$#1"'
	DO (5102) NEXT
(5101)	DO (1001) NEXT
(5102)	PLEASE FORGET #1
	DO .1 <- .3~#65534
	DO :6 <- :1
	DO :4 <- #0
	DO :1 <- #0
	DO .2 <- #4096
	DO (5104) NEXT
(5103)	DO (1001) NEXT
(5104)	PLEASE FORGET #1
	DO :1 <- '"':1~"#32767$#0"'$':6~"#0$.2"'"~"#32767$#1"'$
		'"':1~"#0$#32767"'$':6~"'.2~#65534'$#0"'"~"#32767$#1"'
	DO :2 <- '"':4~"#32767$#0"'$#0"~"#32767$#1"'$'"':4~"#0$
		#32767"'$#1"~"#32767$#1"'
	PLEASE DO (1510) NEXT
	DO .5 <- '?":3~'#32768$#0'"$#1'~#3
	DO (5105) NEXT
	DO :3 <- :1
	DO (5106) NEXT
(5105)	DO (1001) NEXT
(5106)	PLEASE FORGET #1
	DO :1 <- :3
	DO :4 <- ':4~"#0$#65535"'$'"':4~"#32767$#0"'$.5"~"#32767$#1"'
	DO .2 <- .2~#65534
	DO (1020) NEXT
	PLEASE DO .5 <- '?":4~'#0$#4096'"$#1'~#3
	DO (5103) NEXT
	DO .2 <- #102
	DO (1000) NEXT
	DO :1 <- :4
	DO :6 <- #1
	DO (5510) NEXT
	DO :2 <- :1~'#65535$#65534'
	PLEASE DO :2 <- '"'"'"'".3$':2~#32768'"~"#1109$#1"'$
		':2~#128'"~#2735'$':2~"#546$#0"'"~"#43679"'$':2~"#1365$
		#0"'"~"#1023$#63"'$'"'"'".3$#0"~#34959'$':2~"#0$
		#1170"'"~#11007'$':2~"#0$#2925"'"~"#2005$#255"'
	DO .5 <- #1
	PLEASE RETRIEVE .1 + .2 + .3 + :1 + :3 + :4 + :6
	PLEASE RESUME #1
(5107)	DO (1001) NEXT
	PLEASE RESUME #2

(5110)	DO :2 <- #32678$#0
	PLEASE DO .5 <- '?"?'?"':1~:1'~#1"$"#1$'":1~'#32768$
		#0'"~#1'"'"'~#5
	DO (5121) NEXT
	PLEASE STASH .1 + :1
	DO .1 <- :1~'#30720$#61440'
	DO :1 <- '"':1~"#2047$#0"'$#2048"~"#2047$#2048"'$':1~"#0$#4095"'
	DO :2 <- #0
	DO (5610) NEXT
	PLEASE DO (5600) NEXT
	DO :2 <- :1
	PLEASE RETRIEVE .1 + :1
	DO RESUME #1	

(5120)	PLEASE STASH .1 + .4 + :1
	DO :2 <- #30720$#28672
	DO .4 <- #1
	DO .5 <- '?"':1~":1~'#32767$#65535'"'~#1"$#1'~#3
	DO (5121) NEXT
	DO .1 <- :1~'#30720$#61440'
	DO .5 <- '?.1$#100'~'#0$#65535'
	DO .5 <- '?"!1~.5'~'"?.5~.5"~#32767'"$#1'~#3
	DO (5121) NEXT
	DO :2 <- #0
	DO .4 <- #1$'"?':1~"#32768$#0"'$#1"~#1'
	DO .5 <- '?.1$#133'~'#0$#65535'
	DO .5 <- '?"!1~.5'~'"?.5~.5"~#32767'"$#2'~#3
	DO (5121) NEXT
	PLEASE DO .1 <- '"'":1~'#63488$#61440'"$#256'~'#511$#256'"$
		#0'~'#1023$#256'
	PLEASE DO :1 <- '"'"':1~"#0$#4095"'$#0"~"#4095$#1"'$#0"~"#8191$
		#3"'$'"'"':1~"#2047$#1"'$#32768"~"#4094$#32771"'$
		#0"~"#16383$#3"'
	DO :2 <- #0
	DO (5620) NEXT
	PLEASE DO (5600) NEXT
	DO :2 <- :1
	DO (5122) NEXT
(5121)	DO (1001) NEXT
	DO .5 <- .4
(5122)	PLEASE RETRIEVE .1 + .4 + :1
	PLEASE RESUME #2

(5130)	PLEASE STASH .3 + :1 + :2
	DO :3 <- #0
	DO .3 <- #1$'"?'":2~':2~"#32767$#65535"'"~#1'$#1"~#1'
	DO .5 <- '?"':1~":1~'#32767$#65535'"'~#1"$#1'~#3
	DO (5131) NEXT
	DO :3 <- #30720$#28672
	DO .5 <- '?".3~#1"$#2'~#3
	DO .3 <- #1
	DO (5131) NEXT
	PLEASE DO .5 <- '?"&'?"'#127~":1~'#30720$#28672'"'~#64"$
		"'"#4095$#8191"~":1~'#34815$#36863'"'~#1"'~#3"$#2'~#3
	DO (5131) NEXT
	DO (5650) NEXT
	DO :3 <- #0
	DO .3 <- #3
	DO (5131) NEXT
	PLEASE DO (5600) NEXT
	DO :3 <- :1
	DO (5132) NEXT
(5131)	DO (1001) NEXT
	DO .5 <- .3
(5132)	PLEASE RETRIEVE .3 + :1 + :2
	PLEASE RESUME #2

(5200)	PLEASE STASH .1 + :1 + :3 + :4
	DO (5670) NEXT
	DO (5680) NEXT
	DO .5 <- '?":1~'#32768$#0'"$#1'~#3
	DO (5201) NEXT
	DO (5560) NEXT
	DO .1 <- #1656
	DO (5202) NEXT
(5201)	DO (1001) NEXT
	DO .1 <- #632
(5202)	PLEASE DO (5600) NEXT
	DO :2 <- :1
	PLEASE RETRIEVE .1 + :1 + :3 + :4
	PLEASE RESUME #2

(5210)	PLEASE STASH .1 + :1 + :3 + :4
	DO (5670) NEXT
	DO (5680) NEXT
	DO :1 <- :3
	DO :2 <- :4
	DO .5 <- '?":1~'#32768$#0'"$#1'~#3
	DO (5211) NEXT
	DO (5560) NEXT
	DO .1 <- !1$#632'~'#2048$#1023'
	DO (5212) NEXT
(5211)	DO (1001) NEXT
	DO .1 <- !1$#632'~'#1024$#1023'
(5212)	PLEASE DO (5600) NEXT
	DO :2 <- :1
	PLEASE RETRIEVE .1 + :1 + :3 + :4
	PLEASE RESUME #2

(5220)	PLEASE STASH .1 + .2 + .3 + :1 + :3 + :4
	DO (5670) NEXT
	DO (5680) NEXT
	DO .2 <- #3
	DO .5 <- '?"'V"':3~:3'~#1"$"':4~:4'~#1"'~#1"$#1'~#3
	DO (5225) NEXT
	DO .2 <- #1
	DO .5 <- '?"'V"':1~:1'~#1"$"':2~:2'~#1"'~#1"$#1'~#3
	DO (5225) NEXT
	DO .2 <- .1
	DO .5 <- '?":1~'#32768$#0'"$#1'~#3
	DO (5221) NEXT
	DO (5560) NEXT
	DO .1 <- #1536
	DO (5222) NEXT
(5221)	DO (1001) NEXT
	DO .1 <- #512
(5222)	DO (5570) NEXT
	PLEASE STASH .1 + :1 + :2
	DO :1 <- :3
	DO :2 <- :4
	DO .5 <- '?":1~'#32768$#0'"$#1'~#3
	DO (5223) NEXT
	DO (5560) NEXT
	DO .1 <- .2~#3071
	DO (5224) NEXT
(5223)	DO (1001) NEXT
	DO .1 <- .2~#2047
(5224)	PLEASE FORGET #2
	DO (5570) NEXT
	DO :3 <- :1~'#65535$#65534'
	PLEASE DO :4 <- '"'V:1~#1'$':2~"#0$#65534"'"~"#32768$#32767"'$
		':2~"#65535$#0"'
	DO .2 <- .1
	PLEASE RETRIEVE .1 + :1 + :2
	DO (1010) NEXT
	DO .2 <- .3
	DO (5540) NEXT
	PLEASE DO :2 <- '&"V:1~#64"'$'"':1~#63'$.5"~#2735'
	DO :1 <- :1~'#65528$#65520'
	DO (1009) NEXT
	DO .1 <- .3~#2047
	PLEASE DO (5600) NEXT
	DO :2 <- :1
	DO (5226) NEXT
(5225)	DO (1001) NEXT
	PLEASE DO :2 <- '&"V'?"!1~#3072'~'"?':3~"#32768$#0"'$#1"~#3'"$
		":1~'#32768$#0'"'~#1"'$#0
	DO .5 <- .2
(5226)	PLEASE RETRIEVE .1 + .2 + .3 + :1 + :3 + :4
	PLEASE RESUME #2

(5400)	PLEASE STASH .5 + :2 + :6
	DO :2 <- #0$#2048
	DO :1 <- #28672$#28672
	DO (5401) NEXT
(5403)	DO (1001) NEXT
(5401)	PLEASE FORGET #1
	DO %50 (5402) NEXT
	DO :6 <- #2048$#0
	PLEASE DO (5519) NEXT
	DO .5 <- '?"':1~:1'~#1"$#2'~#3
	DO (5403) NEXT
	DO (5402) NEXT
(5404)	DO (1001) NEXT
(5402)	PLEASE FORGET #1
	DO %50 :1 <- '"V':1~"#65535$#0"'$':2~"#65535$#0"'"~"#0$#65535"'$
		'"V':1~"#0$#65535"'$':2~"#0$#65535"'"~"#0$#65535"'
	DO :2 <- :2~'#65535$#65534'
	DO .5 <- '?":2~:2"$#2'~#3
	DO (5404) NEXT
	PLEASE RETRIEVE .5 + :2 + :6
	PLEASE RESUME #1

(5419)	PLEASE ABSTAIN FROM (5411)	
(5410)	DO STASH .1 + :1 + :3 + :4
	DO .1 <- '"'":1~'#63488$#61440'"$#256'~'#511$#256'"$#0'~'#1023$
		#256'
	DO :1 <- '"':1~"#2047$#0"'$#2048"~"#2047$#2048"'$':1~"#0$#4095"'
	DO :2 <- #0
	PLEASE DO :3 <- #46058$#46446
	PLEASE DO :4 <- #64627$#29537
(5411)	DO :3 <- :3~'#32767$#65535'
	DO (5530) NEXT
	DO (1020) NEXT
	PLEASE DO (5600) NEXT
	DO :2 <- :1
	PLEASE REINSTATE (5411)
	DO RETRIEVE .1 + :1 + :3 + :4
	DO RESUME #1

(5500)	PLEASE STASH :1 + :3 + :4 + :5 + :6
	DO :1 <- :4
	DO (1509) NEXT
	DO :5 <- :3
	PLEASE RETRIEVE :1 + :3
	DO :2 <- :3
	DO .5 <- :4
	DO (5501) NEXT
	DO :6 <- #1
	DO (5510) NEXT
	DO .5 <- '?"':1~:1'~#1"$#2'~#3
	DO (5501) NEXT
	PLEASE DO :4 <- #1
	DO (5502) NEXT
(5501)	DO (1001) NEXT
	DO (1509) NEXT
(5502)	DO :1 <- :3
	DO :3 <- :2
	DO :2 <- :5
	DO .5 <- :4
	PLEASE RETRIEVE :4 + :5 + :6
	PLEASE RESUME #2

(5510)	PLEASE ABSTAIN FROM (5513)
(5519)	DO STASH .5
	DO (5511) NEXT
(5511)	PLEASE FORGET #1
	DO .5 <- '?":1~:6"$#1'~#3
	DO :1 <- '"?':1~"#65535$#0"'$':6~"#65535$#0"'"~"#0$#65535"'$
		'"?':1~"#0$#65535"'$':6~"#0$#65535"'"~"#0$#65535"'
(5513)	DO .5 <- '?":1~:6"$#1'~#3
	DO (5512) NEXT
	DO :6 <- ':6~"#0$#65535"'$'"':6~"#32767$#0"'$#0"~"#32767$#1"'
	DO (5511) NEXT
(5512)	DO (1001) NEXT
	DO RETRIEVE .5
	PLEASE REINSTATE (5513)
	PLEASE RESUME #2

(5520)	PLEASE STASH .2 + .5
	DO .2 <- #1
	DO (5521) NEXT
(5521)	PLEASE FORGET #1
	DO .1 <- '?.1$.2'~'#0$#65535'
	DO .5 <- '?".1~.2"$#1'~#3
	DO (5522) NEXT
	DO .2 <- !2$#0'~'#32767$#1'
	DO (5521) NEXT
(5522)	DO (1001) NEXT
	PLEASE RETRIEVE .2 + .5
	PLEASE RESUME #2

(5530)	PLEASE STASH .1 + .5 + :6 + :7 + :8 + :9 + :10 + :11 + :12 +
		:13 + :14
	DO .1 <- #0
	DO :6 <- #0
	PLEASE DO :7 <- :1
	DO :8 <- :2
	DO :9 <- :3
	DO :10 <- :4
	PLEASE DO :11 <- #0
	DO :12 <- #0
	DO :13 <- #0
	DO :14 <- #0
	DO (5534) NEXT
(5533)	DO (1001) NEXT
(5534)	PLEASE FORGET #1
	DO .5 <- '?":10~#1"$#1'~#3
	DO (5536) NEXT
	PLEASE DO :1 <- :13
	DO :2 <- :14
	DO :3 <- :7
	DO :4 <- :8
	DO (5500) NEXT
	PLEASE DO (5532) NEXT
	DO (1020) NEXT
	DO (5531) NEXT
(5532)	DO (1001) NEXT
(5531)	PLEASE FORGET #1
	DO :13 <- :1
	DO :14 <- :2
	PLEASE DO :1 <- :11
	DO :2 <- :12
	DO :3 <- #0
	DO :4 <- :6
	DO (5500) NEXT
	DO :11 <- :1
	DO :12 <- :2
	DO (5537) NEXT
(5536)	DO (1001) NEXT
(5537)	PLEASE FORGET #1
	DO .5 <- '?":9~#1"$#1'~#3
	DO (5538) NEXT
	DO :1 <- :12
	DO :2 <- :13
	DO :3 <- :7
	DO :4 <- :8
	DO (5500) NEXT
	DO :12 <- :1
	DO :13 <- :2
	PLEASE DO :1 <- :11
	DO :2 <- :6
	DO :6 <- .5~#2
	DO (5510) NEXT
	DO (1500) NEXT
	DO :11 <- :3
	DO :6 <- :2
	DO (5539) NEXT
(5538)	DO (1001) NEXT
(5539)	PLEASE FORGET #1
	DO :6 <- ':6~"#0$#65535"'$'"':6~"#32767$#0"'$':7~"#32768$
		#0"'"~"#32767$#1"'
	DO :7 <- ':7~"#0$#65535"'$'"':7~"#32767$#0"'$':8~"#32768$
		#0"'"~"#32767$#1"'
	DO :8 <- ':8~"#0$#65535"'$'"':8~"#32767$#0"'$#0"~"#32767$#1"'
	PLEASE DO :9 <- :9~'#65535$#65534'
	DO :10 <- :10~'#65535$#65534'
	DO .5 <- '?"'V"':9~:9'~#1"$"':10~:10'~#1"'~#1"$#2'~#3
	DO (5533) NEXT
	PLEASE DO :1 <- :11
	DO :2 <- :12
	DO :3 <- #0
	DO :4 <- .1
	DO (5500) NEXT
	DO :3 <- :13
	DO :4 <- :14
	PLEASE RETRIEVE .1 + .5 + :6 + :7 + :8 + :9 + :10 + :11 + :12 +
		 :13 + :14
	PLEASE RESUME #1

(5540)	PLEASE STASH :2 + :3 + :4 + :5 + :6
	DO :5 <- :1
	DO :6 <- :2
	PLEASE DO :1 <- :3
	DO :2 <- :4
	DO (5560) NEXT
	DO :3 <- :1
	DO :4 <- :2
	DO :2 <- :6
	DO :6 <- #0
	DO .1 <- #156
	DO (5543) NEXT
(5543)	PLEASE FORGET #1
	DO .5 <- '?":6~'#0$#32768'"$#2'~#3
	DO (5544) NEXT
	DO .5 <- '?":5~'#32768$#0'"$#1'~#3
	DO (5545) NEXT
	DO :1 <- :5
	DO (5500) NEXT
	DO :5 <- :1
	DO :1 <- :6
	DO :6 <- #1
	DO (5510) NEXT
	DO :6 <- :1
	DO (5543) NEXT
(5545)	DO (1001) NEXT
	PLEASE FORGET #1
	PLEASE DO :5 <- ':5~"#0$#65535"'$'"':5~"#32767$#0"'$':2~"#32768$
		#0"'"~"#32767$#1"'
	DO :2 <- ':2~"#0$#65535"'$'"':2~"#32767$#0"'$#0"~"#32767$#1"'
	DO :6 <- ':6~"#0$#65535"'$'"':6~"#32767$#0"'$#0"~"#32767$#1"'
	DO (5520) NEXT
	DO (5543) NEXT
(5544)	DO (1001) NEXT
(5546)	PLEASE FORGET #1
	PLEASE DO .5 <- '?"'V"':5~:5'~#1"$"':2~:2'~#1"'~#1"$#1'~#3
	DO (5541) NEXT
	DO :1 <- :5
	DO (5500) NEXT
	DO :5 <- :1
	PLEASE DO :1 <- :6
	DO (5547) NEXT
	DO :6 <- #1
	DO (5510) NEXT
	DO :6 <- :1
	DO (5546) NEXT
(5541)	DO (1001) NEXT
	PLEASE DO .5 <- #0
	DO (5549) NEXT
(5547)	DO (1001) NEXT
	DO :6 <- '"?':5~"#32767$#0"'$':3~"#0$#65534"'"~"#0$#32767"'$
		'"?':5~"#0$#65535"'$':3~"#65535$#0"'"~"#0$#65535"'
	DO .5 <- '?"':6~:6'~#1"$#1'~#3
	DO (5548) NEXT
	DO .5 <- '":5~:6"~"'?:6~:6'~'#32767$#65535'"'$#1
	DO (5549) NEXT
(5548)	DO (1001) NEXT
	PLEASE DO :4 <- '"'V:3~#1'$':4~"#0$#65534"'"~"#32768$#32767"'$
		':4~"#65535$#0"'
	DO :6 <- '"?':2~"#65535$#0"'$':4~"#65535$#0"'"~"#0$#65535"'$
		'"?':2~"#0$#65535"'$':4~"#0$#65535"'"~"#0$#65535"'
	DO .5 <- '?"':6~:6'~#1"$#1'~#3
	PLEASE DO .5 <- '"V'#3~"'"':2~:6'~'"?:6~:6"~"#32767$
		#65535"'"~#1'$'"':2~"#32768$#0"'~'":6~:6"~"#32768$
		#0"'"~#1'"'$!5~#1'"~#1'$!5~#2'
(5549)	PLEASE RETRIEVE :2 + :3 + :4 + :5 + :6
	PLEASE RESUME #3

(5550)	PLEASE STASH .5 + :1 + :2 + :3 + :4 + :5 + :6 + :7
	DO :5 <- :3
	DO :6 <- :4
	PLEASE DO :1 <- :3
	DO :2 <- :4
	DO (5560) NEXT
	DO :3 <- :1
	DO :4 <- :2
	PLEASE RETRIEVE :1 + :2
	DO (1020) NEXT
	DO (5551) NEXT
(5554)	DO (1001) NEXT
(5552)	PLEASE FORGET #1
	DO :7 <- '"?':5~"#65535$#0"'$':1~"#65535$#0"'"~"#0$#65535"'$
		'"?':5~"#0$#65535"'$':1~"#0$#65535"'"~"#0$#65535"'
	DO .5 <- '?"':7~:7'~#1"$#2'~#3
	DO (5558) NEXT
	DO :7 <- '"?':6~"#65535$#0"'$':2~"#65535$#0"'"~"#0$#65535"'$
		'"?':6~"#0$#65535"'$':2~"#0$#65535"'"~"#0$#65535"'
	DO .5 <- '?"#3~'"'":6~:7"~"'?:7~:7'~'#32767$#65535'"'~#1"$
		"'":7~'#32768$#0'"~"':7~:7'~'#32768$#0'"'~#1"'"$#2'~#3
	DO (5559) NEXT
(5558)	DO (1001) NEXT
	DO .5 <- '?"#3~'"'":5~:7"~"'?:7~:7'~'#32767$#65535'"'~#1"$
		"'":7~'#32768$#0'"~"':7~:7'~'#32768$#0'"'~#1"'"$#2'~#3
(5559)	PLEASE FORGET #1
	DO (5555) NEXT
	DO (5500) NEXT
	DO (5552) NEXT
(5555)	DO (1001) NEXT
(5557)	PLEASE FORGET #1
	DO :1 <- ':1~"#0$#65535"'$'"':1~"#32767$#0"'$':2~"#32768$
		#0"'"~"#32767$#1"'
	DO :2 <- ':2~"#0$#65535"'$'"':2~"#32767$#0"'$#0"~"#32767$#1"'
	DO (5520) NEXT
(5551)	DO .5 <- '?"'#65535~"'?.1$.2'~#21845"'~#1"$#2'~#3
	DO (5554) NEXT
	PLEASE RETRIEVE .5 + :3 + :4 + :5 + :6 + :7
	PLEASE RESUME #2

(5560)	PLEASE STASH .5 + :3 + :6
	DO .5 <- '?"':2~:2'~#1"$#1'~#3
	DO :6 <- #1
	DO (5561) NEXT
	DO :3 <- '"?':1~"#65535$#0"'$#65535"~"#0$#65535"'$'"?':1~"#0$
		#65535"'$#65535"~"#0$#65535"'
	DO :1 <- '"?':2~"#65535$#0"'$#65535"~"#0$#65535"'$'"?':2~"#0$
		#65535"'$#65535"~"#0$#65535"'
	DO (5510) NEXT
	DO :2 <- :1
	DO :1 <- :3
	DO (5562) NEXT
(5561)	DO (1001) NEXT
	DO :1 <- '"?':1~"#65535$#0"'$#65535"~"#0$#65535"'$'"?':1~"#0$
		#65535"'$#65535"~"#0$#65535"'
	DO (5510) NEXT
(5562)	PLEASE RETRIEVE .5 + :3 + :6
	PLEASE RESUME #2

(5570)	DO .5 <- '?"'V"':1~:1'~#1"$"':2~:2'~#1"'~#1"$#2'~#3
	DO (1001) NEXT
	DO (5571) NEXT
(5572)	DO (1001) NEXT
	PLEASE FORGET #1
	PLEASE DO :1 <- ':1~"#0$#65535"'$'"':1~"#32767$#0"'$
		':2~"#32768$#0"'"~"#32767$#1"'
	DO :2 <- ':2~"#0$#65535"'$'"':2~"#32767$#0"'$#0"~"#32767$#1"'
	DO (5520) NEXT
(5571)	DO .5 <- '?":1~'#32768$#0'"$#1'~#3
	DO (5572) NEXT
	DO .5 <- #1
	PLEASE RESUME #2

(5580)	PLEASE STASH .1 + .5
	DO .1 <- .3
	DO (5581) NEXT
(5581)	PLEASE FORGET #1
	DO .5 <- '?"!1~.1'~#1"$#1'~#3
	DO (5582) NEXT
	DO :4 <- '"'V:3~#1'$':4~"#0$#65534"'"~"#32768$#32767"'$
		':4~"#65535$#0"'
	DO :3 <- '"':3~"#65535$#0"'$':3~"#0$#65534"'"~"#32768$#32767"'$
		':3~"#65535$#0"'
	DO (5520) NEXT
	DO (5581) NEXT
(5582)	DO (1001) NEXT
	PLEASE RETRIEVE .1 + .5
	PLEASE RESUME #2

(5590)	PLEASE STASH .2
	DO .2 <- #0
	DO .5 <- '?"'#255~":1~'#61440$#61440'"'~#1"$#2'~#3
	DO (5593) NEXT
	DO (5591) NEXT
(5591)	PLEASE FORGET #1
	DO .5 <- '?":1~'#2048$#0'"$#2'~#3
	DO (5592) NEXT
	DO :1 <- ':1~"#0$#65535"'$'"':1~"#32767$#0"'$':2~"#32768$
		#0"'"~"#32767$#1"'
	DO :2 <- ':2~"#0$#65535"'$'"':2~"#32767$#0"'$#0"~"#32767$#1"'
	DO (5520) NEXT
	DO (5591) NEXT
(5593)	DO (1001) NEXT
	PLEASE FORGET #1
	DO .2 <- '"V:2~#1"$.2'~'#32768$#32767'
	DO :2 <- '"'V:1~#1'$':2~"#0$#65534"'"~"#32768$#32767"'$
		':2~"#65535$#0"'
	DO :1 <- :1~'#65535$#65534'
	DO (1020) NEXT
	DO .5 <- '?"'#255~":1~'#61440$#61440'"'~#1"$#2'~#3
	DO (5593) NEXT
	DO (5594) NEXT
(5592)	DO (1001) NEXT
(5594)	DO .5 <- .2
	PLEASE RETRIEVE .2
	PLEASE RESUME #2

(5600)	PLEASE DO .5 <- '?"'V"':1~:1'~#1"$"':2~:2'~#1"'~#1"$#1'~#3
	DO (5601) NEXT
	DO STASH :6
	DO (5590) NEXT
	DO :6 <- :2~'#32767$#65535'
	PLEASE DO :6 <- 'V"'V"':6~:6'~#1"$"'.5~.5'~#1"'~#1"$
		":1~#1"'~':2~"#32768$#0"'
	DO (5510) NEXT
	DO .5 <- '?"':1~"#61440$#61440"'~#1"$#1'~#3
	DO (5606) NEXT
	PLEASE DO :1 <- #2048$#0
	DO (1020) NEXT
	DO (5607) NEXT
(5601)	DO (1001) NEXT
	PLEASE RESUME #2
(5606)	DO (1001) NEXT
(5607)	DO :2 <- #0
	PLEASE DO :1 <- '"'"'"'".1$':1~#32768'"~"#1109$#1"'$
		':1~#128'"~#2735'$':1~"#546$#0"'"~"#43679"'$':1~"#1365$
		#0"'"~"#1023$#63"'$'"'"'".1$#0"~#34959'$':1~"#0$
		#1170"'"~#11007'$':1~"#0$#2925"'"~"#2005$#255"'
	DO .5 <- !1~#256'$!1~#512'
	DO RETRIEVE :6
	PLEASE RESUME #2

(5610)	PLEASE STASH .2 + .3 + :3 + :4 + :5 + :6 + :7 + :8 + :9 + :10 +
		:11 + :12 + ;1
	PLEASE DO (5691) NEXT
	PLEASE DO :5 <- #4096$#0
	DO .2 <- .1~#255
	DO :7 <- :1
	DO :8 <- :2
	DO :1 <- #0
	DO :2 <- #0
	DO .1 <- #1
	DO (5612) NEXT
(5611)	DO (1001) NEXT
	PLEASE FORGET #1
	DO :3 <- '"?':7~"#65535$#0"'$#65535"~"#0$#65535"'$
		'"?':7~"#0$#65535"'$#65535"~"#0$#65535"'
	DO :4 <- '"?':8~"#65535$#0"'$#65535"~"#0$#65535"'$
		'"?':8~"#0$#65535"'$#65535"~"#0$#65535"'
	DO .3 <- .1
	DO (5580) NEXT
	DO :9 <- :3
	DO :10 <- :4
	DO :11 <- :1
	DO :12 <- :2
	DO (5615) NEXT
(5616)	DO (1001) NEXT
	PLEASE FORGET #1
	DO (1020) NEXT
	DO :5 <- :5~'#65535$#65534'
	DO .5 <- '?":5~:5"$#2'~#3
	DO (5617) NEXT
	DO :5 <- #0$#16384
	PLEASE ABSTAIN FROM (5638)
	PLEASE ABSTAIN FROM (5639)
	DO (5615) NEXT
(5617)	DO (1001) NEXT
(5615)	PLEASE FORGET #1
	DO :10 <- '"'V:9~#1'$':10~"#0$#65534"'"~"#32768$#32767"'$
		':10~"#65535$#0"'
	DO :9 <- '"':9~"#0$#65535"'$':9~"#0$#65534"'"~"#32768$#32767"'$
		':9~"#65535$#0"'
	DO :6 <- #1
	PLEASE DO .5 <- '?"':10~:10'~'#32768$#0'"$#2'~#3
	DO (5613) NEXT
	DO :3 <- :9
	DO :1 <- :10
	DO (5510) NEXT
	DO :4 <- :1
	DO (5614) NEXT
(5613)	DO (1001) NEXT
	DO :1 <- :9
	DO (5510) NEXT
	DO :3 <- :1
	DO :4 <- #0
(5614)	PLEASE FORGET #1
	DO :1 <- :7
	DO :2 <- :8
	DO (5500) NEXT
	DO .5 <- '?":1~'#2048$#0'"$#1'~#3
	DO (5616) NEXT
	DO :7 <- :1
	DO :8 <- :2
	PLEASE DO :1 <- :11
	DO :2 <- :12
	DO :3 <- #0
	DO :4 <- :5
(5638)	PLEASE DO :3 <- ;1SUB.1#1
(5639)	PLEASE DO :4 <- ;1SUB.1#2
	DO (5500) NEXT
(5612)	DO .5 <- '?"'V"':7~":7~'#2047$#4095'"'~#1"$"':8~:8'~#1"'~#1"$
		#2'~#3
	DO (5611) NEXT
	DO .1 <- #638
	DO .5 <- '?"'#65535~"'?.2$#127'~#21845"'~#1"$#1'~#3
	DO (5619) NEXT
	DO :11 <- :1
	DO :12 <- :2
	DO .1 <- .2
	DO .2 <- #127
	DO (1010) NEXT
	DO .2 <- !3~#65280'$!3~#65280'
	DO :1 <- '".2$.3"~"#65280$#61610"'$'".2$.3"~"#65280$#61525"'
	PLEASE DO :2 <- #1479$#6307
	DO (1549) NEXT
	DO :6 <- :3
	PLEASE DO :2 <- #4059$#2839
	DO (1549) NEXT
	DO :1 <- :6
	DO :2 <- '".2$':3~"#61440$#0"'"~"#65520$#15"'$'".2$':3~"#0$
		#61440"'"~"#65520$#15"'
	DO :6 <- '"'"'"':3~"#4095$#0"'$#0"~"#4095$#1"'$#0"~"#8191$#1"'$
		#0"~"#16383$#3"'$'"'"'"':3~"#0$#4095"'$#0"~"#4095$#1"'$
		#0"~"#8191$#1"'$#0"~"#16383$#3"'
	DO (1509) NEXT
	DO :4 <- '"'V:3~#1'$':6~"#0$#65534"'"~"#32768$#32767"'$
		':6~"#65535$#0"'
	PLEASE DO :3 <- '".2$':3~"#0$#65534"'"~"#32768$#32767"'$
		':3~"#65535$#0"'
	DO :1 <- :11
	DO :2 <- :12
	DO (5500) NEXT
	DO .1 <- #638
	DO .5 <- '?".2~#1"$#1'~#3
	DO (5619) NEXT
	DO .1 <- #1662
	DO (5560) NEXT
	DO (5618) NEXT
(5619)	DO (1001) NEXT
(5618)	PLEASE REINSTATE (5638)
	PLEASE REINSTATE (5639)
	PLEASE RETRIEVE .2 + .3 + :3 + :4 + :5 + :6 + :7 + :8 + :9 +
		:10 + :11 + :12 + ;1
	PLEASE RESUME #3

(5620)	PLEASE STASH .2 + .3 + :3 + :4 + :6 + :7 + :8 + :9 + :10 + ;1
	PLEASE DO (5692) NEXT
	PLEASE DO :3 <- #61302$#16465
	PLEASE DO :4 <- #8654$#59334
	DO (5530) NEXT
	DO :3 <- :1
	DO :4 <- :2
	DO .4 <- !1~#1024'$#1
	DO .2 <- .1~#1023
	DO .1 <- #636
	DO (1010) NEXT
	DO .1 <- .3
	DO .2 <- #0
	DO .5 <- '?".1~#32768"$#1'~#3
	DO (5635) NEXT
	DO (5624) NEXT
(5625)	DO (1001) NEXT
(5624)	PLEASE FORGET #1
	DO .2 <- !2$":3~'#32768$#0'"'~'#32767$#1'
	DO :3 <- ':3~"#0$#65535"'$'"':3~"#32767$#0"'$':4~"#32768$
		#0"'"~"#32767$#1"'
	DO :4 <- ':4~"#0$#65535"'$'"':4~"#32767$#0"'$#0"~"#32767$#1"'
	DO (1020) NEXT
	DO .5 <- '?"!1~.1'~#1"$#2'~#3
	DO (5625) NEXT
	DO (5623) NEXT
(5635)	DO (1001) NEXT
	DO (5580) NEXT
(5623)	PLEASE FORGET #1
	PLEASE DO .5 <- .?4~#3
	DO .4 <- .2
	DO (5626) NEXT
	PLEASE DO .4 <- '?.4$#65535'~'#0$#65535'
	DO :6 <- #1
	DO .5 <- '?"':4~:4'~#1"$#1'~#3
	DO (5627) NEXT
	DO :1 <- '"?':4~"#65535$#0"'$#65535"~"#0$#65535"'$'"?':4~"#0$
		#65535"'$#65535"~"#0$#65535"'
	DO (5510) NEXT
	DO :4 <- :1
	DO :3 <- '"?':3~"#65535$#0"'$#65535"~"#0$#65535"'$'"?':3~"#0$
		#65535"'$#65535"~"#0$#65535"'
	DO (5628) NEXT
(5627)	DO (1001) NEXT
	PLEASE DO .5 <- '?"':3~:3'~#1"$#1'~#3
	DO (5622) NEXT
	PLEASE FORGET #1
	DO :1 <- '"?':3~"#65535$#0"'$#65535"~"#0$#65535"'$'"?':3~"#0$
		#65535"'$#65535"~"#0$#65535"'
	DO (5510) NEXT
	DO :3 <- :1
	DO :4 <- #0
	DO (5628) NEXT
(5622)	DO (1001) NEXT
	PLEASE FORGET #2
	DO .1 <- .4
	PLEASE DO (1020) NEXT
	DO .4 <- .1
	DO :3 <- #0
	DO :4 <- #0
	DO (5628) NEXT
(5626)	DO (1001) NEXT
(5628)	PLEASE FORGET #1
	PLEASE DO :1 <- #50461$#23679
	PLEASE DO :2 <- #35694$#56274
	DO (5530) NEXT
	DO :7 <- :1
	DO :8 <- :2
	PLEASE DO :9 <- #2048$#0
	DO :10 <- #0
	DO :6 <- #0
	DO .1 <- #1
	DO :1 <- :9
	DO :2 <- :10
	DO (5621) NEXT
(5629)	DO (1001) NEXT
	PLEASE FORGET #1
	DO .5 <- '?":6~:6"$#1'~#3
	DO (5631) NEXT
	DO :2 <- :6
	DO :1 <- :8
	PLEASE DO (5519) NEXT
	DO .5 <- '?":6~:6"$#1'~#3
	DO :6 <- :2~'#65535$#65534'
	DO :2 <- :1
	DO :1 <- #0
	DO (5632) NEXT
(5631)	DO (1001) NEXT
	DO .5 <- '?".1~#32"$#1'~#3
	DO (5633) NEXT
	DO :6 <- #32768$#0
	DO (5634) NEXT
(5633)	DO (1001) NEXT
(5634)	PLEASE FORGET #1
	DO :1 <- :7
	DO :2 <- :8
	DO :3 <- ;1SUB.1#1
	DO :4 <- ;1SUB.1#2
	DO (5500) NEXT
(5632)	PLEASE FORGET #1
	DO .3 <- .1
	DO (1020) NEXT
	DO (5629) NEXT
	DO :7 <- :1
	DO :8 <- :2
	PLEASE DO :1 <- :9
	DO :2 <- :10
	DO :3 <- :1
	DO :4 <- :2
	DO (5580) NEXT
	DO (5500) NEXT
	DO :9 <- :1
	DO :10 <- :2
(5621)	DO .5 <- '?"'V"':7~:7'~#1"$"':8~:8'~#1"'~#1"$#2'~#3
	DO (5629) NEXT
	PLEASE DO .1 <- .4
	DO .2 <- #639
	DO (1009) NEXT
	DO .1 <- .3
	PLEASE RETRIEVE .2 + :3 + :4 + :6 + :7 + :8 + :9 + :10 + ;1
	PLEASE RESUME #2

(5640)	PLEASE STASH .2 + .3 + .4 + .7 + .8 + :3 + :4 + :5 + :6 + :7 +
		:8 + :9
	DO :5 <- :3
	DO :7 <- :1
	DO :8 <- :2
	DO .5 <- '?":5~'#32768$#0'"$#1'~#3
	PLEASE DO .8 <- !5$"V':5~".1~#1024"'~#1"'~'#1023$#32768'
	DO .1 <- .1~#511
	DO .2 <- #65410
	DO (1009) NEXT
	DO .4 <- .3
	DO (5643) NEXT
	DO :1 <- '"?':5~"#65535$#0"'$#65535"~"#0$#65535"'$'"?':5~"#0$
		#65535"'$#65535"~"#0$#65535"'
	DO :6 <- #1
	DO (5510) NEXT
	DO :5 <- :1
	DO (5644) NEXT
(5643)	DO (1001) NEXT
(5644)	PLEASE FORGET #1
	PLEASE DO :6 <- #32768$#0
	DO :9 <- #0
	DO .7 <- #631
	DO (5642) NEXT
(5642)	PLEASE FORGET #1
	DO .5 <- '?":5~#1"$#1'~#3
	DO (5645) NEXT
	DO .5 <- .2
	PLEASE DO .1 <- .7
	DO .2 <- .4
	DO (1009) NEXT
	DO .1 <- .3
	DO .4 <- .2
	DO .2 <- .5
	PLEASE DO :1 <- :6
	DO :2 <- :9
	DO :3 <- :7
	DO :4 <- :8
	PLEASE DO (5530) NEXT
	DO (5570) NEXT
	DO .7 <- .1
	DO :6 <- :1
	DO :9 <- :2
	DO .5 <- '?".5~#2"$#2'~#3
	DO (5646) NEXT
	PLEASE DO .5 <- .7~#64512
	DO .5 <- '?"!5~.5'~#1"$#1'~#3
	DO (5645) NEXT
	PLEASE DO .7 <- '"'?"V.8~#1"$.7'~'#0$#33279'"$#256'~'#767$#256'
	DO (5649) NEXT
(5645)	DO (1001) NEXT
(5647)	PLEASE FORGET #1
	DO :5 <- :5~'#65535$#65534'
	DO .5 <- '?"':5~:5'~#1"$#1'~#3
	DO (5646) NEXT
	PLEASE DO :1 <- :7
	DO :2 <- :8
	DO :3 <- :7
	DO :4 <- :8
	DO .1 <- !4$#0'~'#32767$#1'
	PLEASE DO (5530) NEXT
	DO :4 <- :3~'#32768$#0'
	DO :3 <- #0
	DO (5500) NEXT
	DO (5570) NEXT
	DO :7 <- :1
	DO :8 <- :2
	DO .4 <- .1
	DO (5642) NEXT
(5646)	DO (1001) NEXT
	PLEASE FORGET #1
	DO .5 <- .8~#3
	DO (5648) NEXT
	DO .1 <- #119
	DO .2 <- .7
	DO (1010) NEXT
	DO :3 <- :6~'#65535$#65534'
	PLEASE DO :4 <- '"':9~"#0$#65534"'$'V:6~#1'"~"#32767$#1"'$
		':9~"#65535$#0"'
	DO :1 <- #32768$#0
	DO :2 <- #0
	PLEASE DO (5540) NEXT
	DO :2 <- '"'"'"'"'"'":1~#127"$#0'~#10923"$.5'~#43693"$#0'~'#511$
		#1'"$#0'~'#1023$#3'"$#0'~'#4095$#15'"$#0'~'#65535$#31'
	PLEASE DO :2 <- ':2~"#31$#2047"'$':2~"#1023$#63"'
	DO :1 <- :1~'#65528$#65520'
	DO .2 <- .3
	DO (1009) NEXT
	DO .7 <- .3
	DO (5649) NEXT
(5648)	DO (1001) NEXT
	DO :1 <- :6
	DO :2 <- :9
(5649)	DO .1 <- !8$.7'~'#1024$#1023'
	PLEASE RETRIEVE .2 + .3 + .4 + .7 + .8 + :3 + :4 + :5 + :6 +
		:7 + :8 + :9
	PLEASE RESUME #2

(5650)	PLEASE STASH .2 + .3 + .4 + .6 + .7 + .8 + :4 + :5 + :6 +
		:7 + :8
	DO :5 <- :1
	DO .7 <- :2~'#32768$#0'
	PLEASE DO .4 <- '"'":2~'#63488$#61440'"$#256'~'#511$#256'"$
		#0'~'#1023$#256'
	DO .2 <- :2~'#30720$#61440'
	DO :1 <- '"'"':2~"#2047$#1"'$#4096"~"#4094$#4099"'$#0"~"#16383$
		#3"'$'"'"'"':2~"#0$#4095"'$#0"~"#4095$#1"'$#0"~"#8191$
		#1"'$#0"~"#16383$#3"'
	DO .1 <- #158
	DO (1010) NEXT
	DO .1 <- .3
	PLEASE DO :3 <- '".V7$#32767"~"#32768$#32767"'$#65535
	DO :4 <- #0
	DO .5 <- '?".1~#32768"$#2'~#3
	DO (5665) NEXT
	DO :3 <- #0
	DO :4 <- :2
	PLEASE DO .5 <- '?"'#65535~".1~#65504"'~#1"$#2'~#3
	DO (5665) NEXT
	DO :4 <- #1
	DO (5662) NEXT
(5667)	DO (1001) NEXT
	PLEASE DO :4 <- :V4
	DO (5520) NEXT
(5662)	PLEASE FORGET #1
	DO .5 <- '?"!1~.1'~#1"$#2'~#3
	DO (5667) NEXT
	DO :4 <- ':4~"#65535$#65534"'~':4~"#65535$#65534"'
	DO :3 <- :1~'"'?":4~'#65535$#0'"$#65535'~'#0$#65535'"$
		"'?":4~'#0$#65535'"$#65535'~'#0$#65535'"'
	DO :1 <- ':1~:4'~'#65520$#65520'
	DO :2 <- #0
	DO .1 <- '"!V7$#512'~'#32768$#1023'"$.2'~'#1536$#511'
	DO (5600) NEXT
	DO :4 <- :1
	DO (5656) NEXT
(5665)	DO (1001) NEXT
(5656)	PLEASE FORGET #1
	DO .5 <- '?"':5~"#32768$#0"'~'":4~:4"~#1'"$#2'~#3
	DO (5655) NEXT
	DO .1 <- .2
	DO .5 <- '?"':3~:3'~#1"$#1'~#3
	DO (5651) NEXT
	DO .6 <- #1
	PLEASE DO .1 <- '"'":5~'#63488$#61440'"$#256'~'#511$#256'"
		$#0'~'#1023$#256'
	DO :1 <- '"'"':5~"#2047$#1"'$#4096"~"#4094$#4099"'$#0"~"#16383$
		#3"'$'"'"'"':5~"#0$#4095"'$#0"~"#4095$#1"'$#0"~"#8191$
		#1"'$#0"~"#16383$#3"'
	DO :2 <- #0
	PLEASE DO (5640) NEXT
	DO (5570) NEXT
	DO :7 <- :1
	DO :8 <- :2
	DO .8 <- .1
	DO (5652) NEXT
(5651)	DO (1001) NEXT
	DO .6 <- #0
(5652)	PLEASE FORGET #1
	DO .5 <- '?"':4~:4'~#1"$#1'~#3
	DO (5653) NEXT
	DO .6 <- #1$.6
	DO .1 <- :5~'#30720$#61440'
	DO :1 <- '"':5~"#2047$#0"'$#2048"~"#2047$#2048"'$':5~"#0$#4095"'
	DO :2 <- #0
	PLEASE DO (5610) NEXT
	DO (5570) NEXT
	PLEASE DO .2 <- '"'":4~'#63488$#61440'"$#0'~'#511$#256'"$
		#0'~'#1023$#256'
	DO :3 <- '"'"':4~"#2047$#1"'$#4096"~"#4094$#4099"'$#0"~"#16383$
		#3"'$'"'"'"':4~"#0$#4095"'$#0"~"#4095$#1"'$#0"~"#8191$
		#1"'$#0"~"#16383$#3"'
	DO :4 <- #0
	PLEASE DO (5530) NEXT
	DO .5 <- '?":1~'#32768$#0'"$#1'~#3
	DO (5663) NEXT
	PLEASE DO :2 <- '"'V:1~#1'$':2~"#0$#65534"'"~"#32768$#32767"'$
		':2~"#65535$#0"'
	DO :1 <- :1~'#65535$#65534'
	DO (1020) NEXT
	DO (5664) NEXT
(5663)	DO (1001) NEXT
(5664)	PLEASE FORGET #1
	DO (1000) NEXT
	DO .1 <- .3
	DO .2 <- #119
	DO (1010) NEXT
	DO .1 <- .3
	PLEASE DO (5620) NEXT
	DO (5570) NEXT
	DO (5654) NEXT
(5653)	DO (1001) NEXT
(5654)	PLEASE FORGET #1
	DO .5 <- .6
	PLEASE DO (5659) NEXT
	DO .5 <- '?.7$#1'~#3
	DO (5657) NEXT
	DO .2 <- .8
	DO (1010) NEXT
	DO .2 <- .3~#2047
	DO :3 <- :7~'#65535$#65534'
	PLEASE DO :4 <- '"'V:7~#1'$':8~"#0$#65534"'"~"#32768$#32767"'$
		':8~"#65535$#0"'
	PLEASE DO (5540) NEXT
	DO (1009) NEXT
	DO .1 <- .3
	PLEASE DO :2 <- '&"V:1~#64"'$'"':1~#63'$.5"~#2735'
	DO :1 <- :1~'#65528$#65520'
	DO .5 <- #2
	DO (5658) NEXT
(5657)	DO (1001) NEXT
	PLEASE FORGET #1
	DO :3 <- :7
	DO :4 <- :8
	PLEASE DO (5530) NEXT
	DO .2 <- #630
	DO (1010) NEXT
	DO .1 <- .3
	DO .2 <- .8
	DO (1009) NEXT
	DO .1 <- .3~#2047
	DO .5 <- #2
	DO (5658) NEXT
(5661)	DO (1001) NEXT
	PLEASE FORGET #2
	DO .5 <- '?.7$#1'~#3
	DO (5666) NEXT
	DO .1 <- #1399
	DO .2 <- .8
	DO (1010) NEXT
	DO .2 <- .3~#2047
	DO :1 <- #32768$#0
	DO :2 <- #0
	DO :3 <- :7~'#65535$#65534'
	DO :4 <- '"'V:7~#1'$':8~"#0$#65534"'"~"#32768$#32767"'$
		':8~"#65535$#0"'
	PLEASE DO (5540) NEXT
	DO (1009) NEXT
	DO .1 <- .3
	PLEASE DO :2 <- '&"V:1~#64"'$'"':1~#63'$.5"~#2735'
	DO :1 <- :1~'#65528$#65520'
	DO .5 <- #2
	DO (5658) NEXT
(5666)	DO (1001) NEXT
	PLEASE FORGET #1
	DO :1 <- :7
	DO :2 <- :8
	DO .1 <- .8
	PLEASE DO .5 <- #2
	DO (5658) NEXT
(5655)	DO (1001) NEXT
	PLEASE FORGET #1
	DO (5658) NEXT
(5659)	DO (5661) NEXT
(5658)	PLEASE RETRIEVE .2 + .3 + .4 + .6 + .7 + .8 + :4 + :5 + :6 +
		:7 + :8
	PLEASE RESUME #2

(5670)	PLEASE STASH .2 + .3 + .5 + :3 + :4
	DO .1 <- :1~'#30720$#61440'
	DO .5 <- '?.1$#128'~#21845
	DO .5 <- '?"!1~.5'~'"?.5~.5"~#255'"$#1'~#3
	DO (5677) NEXT
	DO .5 <- :1~'#32768$#0'
	PLEASE DO :1 <- '"'"':1~"#0$#4095"'$#0"~"#4095$#1"'$#0"~"#8191$
		#3"'$'"'"':1~"#2047$#1"'$#32768"~"#4094$#32771"'$
		#0"~"#16383$#3"'
	DO :2 <- #0
	DO .2 <- #129
	PLEASE DO :3 <- #18912$#41917
	PLEASE DO :4 <- #3139$#18068
	DO (5550) NEXT
	DO .2 <- .5
	DO (5678) NEXT
(5677)	DO (1001) NEXT
	DO .2 <- .1
	DO .1 <- #129
	DO (1010) NEXT
	DO .2 <- :1~'#32768$#0'
	PLEASE DO :3 <- '"'"':1~"#0$#4095"'$#0"~"#4095$#1"'$#0"~"#8191$
		#3"'$'"'"':1~"#2047$#1"'$#32768"~"#4094$#32771"'$
		#0"~"#16383$#3"'
	DO :4 <- #0
	DO (5580) NEXT
	DO :1 <- ':3~"#0$#65535"'$'"':3~"#32767$#0"'$':4~"#32768$
		#0"'"~"#32767$#1"'
	DO :2 <- ':4~"#0$#65535"'$'"':4~"#32767$#0"'$#0"~"#32767$#1"'
(5678)	PLEASE FORGET #1
	PLEASE DO :3 <- '"?':1~"#65535$#0"'$#18912"~"#0$#65535"'$
		'"?':1~"#0$#65535"'$#41917"~"#0$#65535"'
	DO .5 <- '?"#3~'"'":1~:3"~"'?:3~:3'~'#32767$#65535'"'~#1"$
		"'":1~'#32768$#0'"~"':3~:3'~'#32768$#0'"'~#1"'"$#1'~#3
	DO (5671) NEXT
	DO (5560) NEXT
	PLEASE DO :3 <- #41917$#37824
	PLEASE DO :4 <- #18068$#6279
	DO (5500) NEXT
	DO .2 <- '?.2$#1'~#1
	DO (5672) NEXT
(5671)	DO (1001) NEXT
(5672)	PLEASE FORGET #1
	PLEASE DO :3 <- '"?':1~"#32767$#0"'$#20958"~"#0$#32767"'$
		'"?':1~"#0$#65535"'$#18913"~"#0$#65535"'
	DO .5 <- '?"':1~:3'~'"?:3~:3"~"#32767$#65535"'"$#1'~#3
	DO (5673) NEXT
	DO (5560) NEXT
	PLEASE DO :3 <- #18912$#41917
	PLEASE DO :4 <- #3139$#18068
	DO (5500) NEXT
	DO .1 <- #1024
	DO (5674) NEXT
(5673)	DO (1001) NEXT
	DO .1 <- #2048
(5674)	PLEASE FORGET #1
	DO :1 <- ':1~"#0$#65535"'$'"':1~"#32767$#0"'$':2~"#32768$
		#0"'"~"#32767$#1"'
	DO :2 <- ':2~"#0$#65535"'$'"':2~"#32767$#0"'$#0"~"#32767$#1"'
	DO .5 <- '?.2$#1'~#3
	DO (5675) NEXT
	DO (5560) NEXT
	DO (5676) NEXT
(5675)	DO (1001) NEXT
(5676)	PLEASE RETRIEVE .2 + .3 + .5 + :3 + :4
	PLEASE RESUME #2

(5680)	PLEASE STASH .1 + .2 + .3 + .5 + :5 + :6 + :7 + :8 + :9 + :10 +
		:11 + ;1
	DO .5 <- ':2~"#32768$#32768"'$'":1~:1"~"#32768$#1"'
	PLEASE DO .5 <- '?"'?".5~.5"~#9'~#1"$#1'~#3
	DO (5681) NEXT
	PLEASE DO (5693) NEXT
	DO :5 <- :1
	DO :6 <- :2
	DO :7 <- #0
	DO :8 <- #0
	PLEASE DO :9 <- #23159$#12120
	PLEASE DO :10 <- #2459$#20324
	DO :11 <- #32768$#0
	DO .1 <- #0
	DO (5685) NEXT
(5685)	PLEASE FORGET #1
	DO .3 <- .1
	DO (1020) NEXT
	DO .5 <- '?".1~#32"$#1'~#3
	DO (5688) NEXT
	DO :1 <- #0
	DO :2 <- :11
	DO :11 <- :11~'#65535$#65534'
	PLEASE DO .5 <- '?"'V":1~:1"$":2~:2"'~':11~:11'"$#1'~#3
	DO (5683) NEXT
	DO (5687) NEXT
(5688)	DO (1001) NEXT
	DO :1 <- ;1SUB.1#1
	DO :2 <- ;1SUB.1#2
(5687)	PLEASE FORGET #1
	DO :3 <- :5
	DO :4 <- :6
	DO .5 <- '?":5~'#32768$#0'"$#1'~#3
	DO (5684) NEXT
	DO (5500) NEXT
	DO :5 <- :1
	DO :6 <- :2
	PLEASE DO :1 <- :9
	DO :2 <- :10
	DO (5560) NEXT
	DO :3 <- :1
	DO :4 <- :2
	PLEASE STASH :3 + :4
	DO :3 <- :7
	DO :4 <- :8
	DO (5686) NEXT
(5684)	DO (1001) NEXT
	DO (5560) NEXT
	DO (5500) NEXT
	DO :5 <- :1
	DO :6 <- :2
	DO :3 <- :9
	DO :4 <- :10
	PLEASE STASH :3 + :4
	DO :1 <- :7
	DO :2 <- :8
	DO (5560) NEXT
	DO :3 <- :1
	DO :4 <- :2
(5686)	PLEASE FORGET #1
	PLEASE DO :1 <- :9
	DO :2 <- :10
	DO (5580) NEXT
	DO (5500) NEXT
	DO :9 <- :1
	DO :10 <- :2
	PLEASE RETRIEVE :3 + :4
	PLEASE DO :1 <- :7
	DO :2 <- :8
	DO (5580) NEXT
	DO (5500) NEXT
	DO :7 <- :1
	DO :8 <- :2
	DO .5 <- '?".1~#32"$#1'~#3
	DO (5685) NEXT
(5683)	DO (1001) NEXT
	PLEASE DO :1 <- :7
	DO :2 <- :8
	DO :3 <- :9
	DO :4 <- :10
	DO (5682) NEXT
(5681)	DO (1001) NEXT
	DO :3 <- #0$#32768
	DO :4 <- #0
	DO (5682) NEXT
(5682)	PLEASE RETRIEVE .1 + .2 + .3 + .5 + :5 + :6 + :7 + :8 + :9 +
		:10 + :11 + ;1
	PLEASE RESUME #3

(5690)	PLEASE DO ;1 <- #39
	PLEASE DO ,1 <- #39
	DO ;1SUB#1 <- #49152$#0
	DO ,1SUB#1 <- #3
	PLEASE DO ;1SUB#2 <- #40960$#32768
	DO ,1SUB#2 <- #6
	DO ;1SUB#3 <- #61440$#49152
	DO ,1SUB#3 <- #9
	PLEASE DO ;1SUB#4 <- #40960$#26624
	DO ,1SUB#4 <- #13
	DO ;1SUB#5 <- #36864$#39936
	DO ,1SUB#5 <- #16
	PLEASE DO ;1SUB#6 <- #50176$#57856
	DO ,1SUB#6 <- #19
	DO ;1SUB#7 <- #43392$#17920
	DO ,1SUB#7 <- #23
	PLEASE DO ;1SUB#8 <- #65088$#26112
	DO ,1SUB#8 <- #26
	DO ;1SUB#9 <- #63328$#43264
	DO ,1SUB#9 <- #29
	PLEASE DO ;1SUB#10 <- #33248$#28880
	DO ,1SUB#10 <- #33
	DO ;1SUB#11 <- #61904$#18808
	DO ,1SUB#11 <- #36
	PLEASE DO ;1SUB#12 <- #59584$#36404
	DO ,1SUB#12 <- #39
	DO ;1SUB#13 <- #35031$#21168
	DO ,1SUB#13 <- #43
	PLEASE DO ;1SUB#14 <- #52556$#31247
	DO ,1SUB#14 <- #46
	DO ;1SUB#15 <- #54245$#40724
	DO ,1SUB#15 <- #49
	PLEASE DO ;1SUB#16 <- #45999$#9623
	DO ,1SUB#16 <- #53
	DO ;1SUB#17 <- #52711$#20579
	DO ,1SUB#17 <- #56
	PLEASE DO ;1SUB#18 <- #45943$#57748
	DO ,1SUB#18 <- #59
	DO ;1SUB#19 <- #47440$#2835
	DO ,1SUB#19 <- #63
	PLEASE DO ;1SUB#20 <- #59129$#15514
	DO ,1SUB#20 <- #66
	DO ;1SUB#21 <- #43357$#53031
	DO ,1SUB#21 <- #69
	PLEASE DO ;1SUB#22 <- #39269$#12996
	DO ,1SUB#22 <- #73
	DO ;1SUB#23 <- #58903$#6247
	DO ,1SUB#23 <- #76
	PLEASE DO ;1SUB#24 <- #39227$#55387
	DO ,1SUB#24 <- #79
	DO ;1SUB#25 <- #33284$#11737
	DO ,1SUB#25 <- #83
	PLEASE DO ;1SUB#26 <- #51151$#15156
	DO ,1SUB#26 <- #86
	DO ;1SUB#27 <- #48054$#43312
	DO ,1SUB#27 <- #89
	PLEASE DO ;1SUB#28 <- #34662$#5981
	DO ,1SUB#28 <- #93
	DO ;1SUB#29 <- #51993$#4927
	DO ,1SUB#29 <- #96
	PLEASE DO ;1SUB#30 <- #44458$#40091
	DO ,1SUB#30 <- #99
	DO ;1SUB#31 <- #59232$#60392
	DO ,1SUB#31 <- #102
	PLEASE DO ;1SUB#32 <- #43246$#31536
	DO ,1SUB#32 <- #106
	DO ;1SUB#33 <- #34081$#46932
	DO ,1SUB#33 <- #109
	PLEASE DO ;1SUB#34 <- #55473$#58111
	DO ,1SUB#34 <- #112
	DO ;1SUB#35 <- #45369$#17686
	DO ,1SUB#35 <- #116
	PLEASE DO ;1SUB#36 <- #35254$#34734
	DO ,1SUB#36 <- #119
	DO ;1SUB#37 <- #52883$#51077
	DO ,1SUB#37 <- #122
	PLEASE DO ;1SUB#38 <- #38304$#28253
	DO ,1SUB#38 <- #126
	DO ;1SUB#39 <- #57468$#26227
	DO ,1SUB#39 <- #129
	PLEASE RESUME #1

(5691)	PLEASE DO ;1 <- #26 BY #2
	DO ;1SUB#1#1 <- #714$#2352
	DO ;1SUB#1#2 <- #2418$#44457
	PLEASE DO ;1SUB#2#1 <- #1394$#55
	DO ;1SUB#2#2 <- #943$#11147
	DO ;1SUB#3#1 <- #138$#1076
	DO ;1SUB#3#2 <- #52079$#30302
	PLEASE DO ;1SUB#4#1 <- #591$#2
	DO ;1SUB#4#2 <- #36307$#44292
	DO ;1SUB#5#1 <- #32$#519
	DO ;1SUB#5#2 <- #38032$#25317
	PLEASE DO ;1SUB#6#1 <- #273$#0
	DO ;1SUB#6#2 <- #64569$#9562
	DO ;1SUB#7#1 <- #8$#256
	DO ;1SUB#7#2 <- #2221$#63237
	PLEASE DO ;1SUB#8#1 <- #32800		
	DO ;1SUB#8#2 <- #16352$#554
	DO ;1SUB#9#1 <- #16392
	DO ;1SUB#9#2 <- #133$#8056
	PLEASE DO ;1SUB#10#1 <- #8194
	DO ;1SUB#10#2 <- #2047$#33
	DO ;1SUB#11#1 <- #4096
	DO ;1SUB#11#2 <- #32776$#1015
	PLEASE DO ;1SUB#12#1 <- #2048
	DO ;1SUB#12#2 <- #16639$#2
	DO ;1SUB#13#1 <- #1024
	DO ;1SUB#13#2 <- #8192$#127
	PLEASE DO ;1SUB#14#1 <- #512
	DO ;1SUB#14#2 <- #4127$#0
	DO ;1SUB#15#1 <- #256
	DO ;1SUB#15#2 <- #2048$#15
	PLEASE DO ;1SUB#16#1 <- #128
	DO ;1SUB#16#2 <- #1027$#0
	DO ;1SUB#17#1 <- #64
	DO ;1SUB#17#2 <- #512$#1
	PLEASE DO ;1SUB#18#1 <- #32
	DO ;1SUB#18#2 <- #256$#0
	DO ;1SUB#19#1 <- #16
	DO ;1SUB#19#2 <- #32768
	PLEASE DO ;1SUB#20#1 <- #8
	DO ;1SUB#20#2 <- #8192
	DO ;1SUB#21#1 <- #4
	DO ;1SUB#21#2 <- #2048
	PLEASE DO ;1SUB#22#1 <- #2
	DO ;1SUB#22#2 <- #512
	DO ;1SUB#23#1 <- #1
	DO ;1SUB#23#2 <- #128
	PLEASE DO ;1SUB#24#1 <- #0
	DO ;1SUB#24#2 <- #32772$#0
	DO ;1SUB#25#1 <- #0
	DO ;1SUB#25#2 <- #2$#32768
	PLEASE DO ;1SUB#26#1 <- #0
	DO ;1SUB#26#2 <- #16385$#0
	PLEASE RESUME #1

(5692)	PLEASE DO ;1 <- #32 BY #2
	DO ;1SUB#1#1 <- #42306$#17867
	DO ;1SUB#1#2 <- #2944$#5824
	PLEASE DO ;1SUB#2#1 <- #39940$#43084
	DO ;1SUB#2#2 <- #48096$#35184
	DO ;1SUB#3#1 <- #51944$#40133
	DO ;1SUB#3#2 <- #33328$#62272
	PLEASE DO ;1SUB#4#1 <- #51163$#52407
	DO ;1SUB#4#2 <- #54240$#64048
	DO ;1SUB#5#1 <- #58150$#51158
	DO ;1SUB#5#2 <- #19712$#40320
	PLEASE DO ;1SUB#6#1 <- #57854$#58249
	DO ;1SUB#6#2 <- #51072$#36640
	DO ;1SUB#7#1 <- #61666$#57853
	DO ;1SUB#7#2 <- #16016$#44336
	PLEASE DO ;1SUB#8#1 <- #61567$#61680
	DO ;1SUB#8#2 <- #62928$#36608
	DO ;1SUB#9#1 <- #63548$#61567
	DO ;1SUB#9#2 <- #8672$#56672
	PLEASE DO ;1SUB#10#1 <- #63519$#63550
	DO ;1SUB#10#2 <- #65456$#2144
	DO ;1SUB#11#1 <- #64527$#63519
	DO ;1SUB#11#2 <- #33280$#65008
	PLEASE DO ;1SUB#12#1 <- #64519$#64527
	DO ;1SUB#12#2 <- #65520$#49296
	DO ;1SUB#13#1 <- #65027$#64519
	DO ;1SUB#13#2 <- #61472$#65488
	PLEASE DO ;1SUB#14#1 <- #65025$#65027
	DO ;1SUB#14#2 <- #65520$#63504
	DO ;1SUB#15#1 <- #65280$#65025
	DO ;1SUB#15#2 <- #65024$#65520
	PLEASE DO ;1SUB#16#1 <- #65280$#65280
	DO ;1SUB#16#2 <- #32752$#65296
	DO ;1SUB#17#1 <- #65408$#65280
	DO ;1SUB#17#2 <- #16320$#32752
	PLEASE DO ;1SUB#18#1 <- #65408$#65408
	DO ;1SUB#18#2 <- #8176$#16368
	DO ;1SUB#19#1 <- #65472$#65408
	DO ;1SUB#19#2 <- #4096$#0
	PLEASE DO ;1SUB#20#1 <- #65472$#65472
	DO ;1SUB#20#2 <- #2048$#0
	DO ;1SUB#21#1 <- #65504$#65472
	DO ;1SUB#21#2 <- #1024$#0
	PLEASE DO ;1SUB#22#1 <- #65504$#65504
	DO ;1SUB#22#2 <- #512$#0
	DO ;1SUB#23#1 <- #65520$#65504
	DO ;1SUB#23#2 <- #256$#0
	PLEASE DO ;1SUB#24#1 <- #65520$#65520
	DO ;1SUB#24#2 <- #32768
	DO ;1SUB#25#1 <- #65528$#65520
	DO ;1SUB#25#2 <- #8192
	PLEASE DO ;1SUB#26#1 <- #65528$#65528
	DO ;1SUB#26#2 <- #2048
	DO ;1SUB#27#1 <- #65532$#65528
	DO ;1SUB#27#2 <- #512
	PLEASE DO ;1SUB#28#1 <- #65532$#65532
	DO ;1SUB#28#2 <- #0
	DO ;1SUB#29#1 <- #65534$#65532
	DO ;1SUB#29#2 <- #0
	PLEASE DO ;1SUB#30#1 <- #65534$#65534
	DO ;1SUB#30#2 <- #0
	DO ;1SUB#31#1 <- #65535$#65534
	DO ;1SUB#31#2 <- #0
	PLEASE DO ;1SUB#32#1 <- #65535$#65535
	DO ;1SUB#32#2 <- #0
	PLEASE RESUME #1

(5693)	PLEASE DO ;1 <- #31 BY #2
	DO ;1SUB#1#1 <- #20958$#18912
	DO ;1SUB#1#2 <- #41802$#3139
	PLEASE DO ;1SUB#2#1 <- #11856$#29363
	DO ;1SUB#2#2 <- #20278$#38329
	DO ;1SUB#3#1 <- #16126$#13134
	DO ;1SUB#3#2 <- #36988$#26789
	PLEASE DO ;1SUB#4#1 <- #7293$#16290
	DO ;1SUB#4#2 <- #62389$#4572
	DO ;1SUB#5#1 <- #8181$#7710
	DO ;1SUB#5#2 <- #52198$#46965
	PLEASE DO ;1SUB#6#1 <- #3971$#8189
	DO ;1SUB#6#2 <- #63827$#18313
	DO ;1SUB#7#1 <- #4095$#4032
	DO ;1SUB#7#2 <- #43913$#64878
	PLEASE DO ;1SUB#8#1 <- #2032$#4095
	DO ;1SUB#8#2 <- #8178$#60047
	DO ;1SUB#9#1 <- #2047$#2040
	DO ;1SUB#9#2 <- #64855$#2042
	PLEASE DO ;1SUB#10#1 <- #1022$#2047
	DO ;1SUB#10#2 <- #254$#65366
	DO ;1SUB#11#1 <- #1023$#1023
	DO ;1SUB#11#2 <- #65515$#62
	PLEASE DO ;1SUB#12#1 <- #511$#1023
	DO ;1SUB#12#2 <- #49159$#65531
	DO ;1SUB#13#1 <- #511$#511
	DO ;1SUB#13#2 <- #65535$#57345
	PLEASE DO ;1SUB#14#1 <- #255$#511
	DO ;1SUB#14#2 <- #63488$#65535
	DO ;1SUB#15#1 <- #65535
	DO ;1SUB#15#2 <- #65535$#64513
	PLEASE DO ;1SUB#16#1 <- #32767
	DO ;1SUB#16#2 <- #65280$#65535
	DO ;1SUB#17#1 <- #16383
	DO ;1SUB#17#2 <- #65535$#65409
	PLEASE DO ;1SUB#18#1 <- #8191
	DO ;1SUB#18#2 <- #65504$#65535
	DO ;1SUB#19#1 <- #4095
	DO ;1SUB#19#2 <- #65535$#65521
	PLEASE DO ;1SUB#20#1 <- #2047
	DO ;1SUB#20#2 <- #65532$#65535
	DO ;1SUB#21#1 <- #1023
	DO ;1SUB#21#2 <- #65535$#65535
	PLEASE DO ;1SUB#22#1 <- #512
	DO ;1SUB#22#2 <- #0
	DO ;1SUB#23#1 <- #256
	DO ;1SUB#23#2 <- #0
	PLEASE DO ;1SUB#24#1 <- #128
	DO ;1SUB#24#2 <- #0
	DO ;1SUB#25#1 <- #64
	DO ;1SUB#25#2 <- #0
	PLEASE DO ;1SUB#26#1 <- #32
	DO ;1SUB#26#2 <- #0
	DO ;1SUB#27#1 <- #16
	DO ;1SUB#27#2 <- #0
	PLEASE DO ;1SUB#28#1 <- #8
	DO ;1SUB#28#2 <- #0
	DO ;1SUB#29#1 <- #4
	DO ;1SUB#29#2 <- #0
	PLEASE DO ;1SUB#30#1 <- #2
	DO ;1SUB#30#2 <- #0
	DO ;1SUB#31#1 <- #1
	DO ;1SUB#31#2 <- #0
	PLEASE RESUME #1