1house cloner 2 3 framer mission be active first cloner1 4 5 frame start 6 print start 7 go abort if elapsed > 3 8 9 frame cloner1 in start 10 print cloner1 11 put 0 into counter of framer 12 put 1 into limit of frame 13 aux orig1 as clone1 14 go next if aux clone1 is done 15 16 frame cloner2 in start 17 print cloner2 18 put 0 into counter of framer 19 aux orig2 as clone2 20 go next if aux clone2 is done 21 22 frame cloner3 in start 23 print cloner3 24 put 0 into counter of framer 25 put 1 into limit of frame 26 aux orig1 as clone4 27 go next if all is done 28 29 frame cloner5 in start 30 print cloner5 31 aux orig4 as clone5 32 go next if all is done 33 34 frame done 35 print "Success" 36 bid stop all 37 38 frame abort 39 print "Failure" 40 put "Clone" into meta.failure 41 bid stop all 42 43 44 framer orig1 be moot first A 45 46 frame A 47 print A 48 put 2 into counter of framer 49 go next if counter of framer main == 0 50 51 frame B 52 print B 53 inc counter of framer with 1 54 go next if limit of frame main == 1 55 56 frame C 57 done 58 59 60 framer orig2 be moot first R 61 62 frame R 63 print R 64 aux orig3 as RCloneOrig3 65 go next if aux RCloneOrig3 is done 66 67 frame S 68 print S 69 inc counter of framer with 1 70 go next 71 72 frame T 73 done 74 75 framer orig3 be moot first X 76 77 frame X 78 print X 79 put 0 into counter of framer 80 go next 81 82 frame Y 83 print Y 84 inc counter of framer with 1 85 go next 86 87 frame Z 88 done 89 90 91 framer orig4 be moot first D 92 93 frame D 94 print D 95 aux orig5 as moot 96 go next if all is done 97 98 frame E 99 print E 100 inc counter of framer with 1 101 go next 102 103 frame F 104 done 105 106 framer orig5 be moot first G 107 108 frame G 109 print G 110 put 0 into counter of framer 111 go next 112 113 frame H 114 print H 115 inc counter of framer with 1 116 go next 117 118 frame I 119 done 120