Mercurial > repo
comparison interps/clc-intercal/CLC-INTERCAL-Base-1.-94.-2/INTERCAL/Include/sick.iacc @ 996:859f9b4339e6
<Gregor> tar xf egobot.tar.xz
| author | HackBot |
|---|---|
| date | Sun, 09 Dec 2012 19:30:08 +0000 |
| parents | |
| children |
comparison
equal
deleted
inserted
replaced
| 995:6883f5911eb7 | 996:859f9b4339e6 |
|---|---|
| 1 PLEASE NOTE: IACC FILE TO GENERATE A COMPILER FOR CLC-INTERCAL | |
| 2 | |
| 3 Copyright (c) 2006-2008 Claudio Calvelli, all rights reserved. | |
| 4 | |
| 5 CLC-INTERCAL is copyrighted software. However, permission to use, modify, | |
| 6 and distribute it is granted provided that the conditions set out in the | |
| 7 licence agreement are met. See files README and COPYING in the distribution. | |
| 8 | |
| 9 PERVERSION "CLC-INTERCAL INTERCAL/Include/sick.iacc 1.-94.-2" | |
| 10 | |
| 11 DO %BA <- #2 | |
| 12 DO %RT <- ?CLC | |
| 13 DO %WT <- #0 | |
| 14 DO %IO <- ?CLC | |
| 15 DO %CR <- ?ASCII | |
| 16 DO %CW <- ?ASCII | |
| 17 DO %CF <- #0 | |
| 18 DO %DM <- #0 | |
| 19 DO %RM <- #1 | |
| 20 DO ?TYPE <- ?COMPILER | |
| 21 DO CREATE _2 ?PROGRAM ?STATEMENT AS ?STATEMENT #1 | |
| 22 DO CREATE _2 ?CALC_EXPR ?EXPRESSION AS STS + * + ROU + #1 + | |
| 23 ?EXPRESSION #1 | |
| 24 DO CREATE _2 ?CALC_EXPR ?CALCULATION AS STS + * + ?CALCULATION | |
| 25 #1 | |
| 26 DO CREATE _2 ?CALC_FULL ?EXPRESSION AS STS + * + ROU + #1 + | |
| 27 ?EXPRESSION #1 | |
| 28 DO CREATE _2 ?CALC_FULL ?STATEMENT AS ?STATEMENT #1 | |
| 29 DO CREATE _2 ?END_JUNK ?STMT_LABEL AS ,, | |
| 30 DO CREATE _2 ?END_JUNK ?DO_PLEASE AS ,, | |
| 31 DO CREATE _2 ?STATEMENT ?MAYBE_STMT_LABEL ?DO_PLEASE | |
| 32 ?QUALIFIERS ?WVERB AS STS + * + ?MAYBE_STMT_LABEL #1 + | |
| 33 ?QUALIFIERS #1 + ?WVERB #1 | |
| 34 DO CREATE _2 ?STMT_LABEL ,#40, ?CONSTANT ,#41, AS ?CONSTANT #1 | |
| 35 DO CREATE _2 ?MAYBE_STMT_LABEL ,, AS ,, | |
| 36 DO CREATE _2 ?MAYBE_STMT_LABEL ?STMT_LABEL AS LAB + ?STMT_LABEL | |
| 37 #1 | |
| 38 DO CREATE _2 ?DO_PLEASE ,DO, AS ,, | |
| 39 DO CREATE _2 ?DO_PLEASE ,PLEASE, AS ,, | |
| 40 DO CREATE _2 ?DO_PLEASE ,PLEASE, ,DO, AS ,, | |
| 41 DO CREATE _2 ?QUALIFIERS ,, AS ,, | |
| 42 DO CREATE _2 ?QUALIFIERS ?DOUBLE_OH_SEVEN ?QUALIFIERS AS | |
| 43 ?DOUBLE_OH_SEVEN #1 + ?QUALIFIERS #1 | |
| 44 DO CREATE _2 ?QUALIFIERS ?NOT ?QUALIFIERS AS ?NOT #1 + | |
| 45 ?QUALIFIERS #1 | |
| 46 DO CREATE _2 ?DOUBLE_OH_SEVEN ,#37, ?CONSTANT AS DSX + | |
| 47 ?CONSTANT #1 | |
| 48 DO CREATE _2 ?DOUBLE_OH_SEVEN ,#37, ?EXPRESSION AS DSX + | |
| 49 ?EXPRESSION #1 | |
| 50 DO CREATE _2 ?NOT ,NOT, AS NOT | |
| 51 DO CREATE _2 ?NOT ,N, ,#39, ,T, AS NOT | |
| 52 DO CREATE _2 ?NOT ,#172, AS NOT | |
| 53 DO CREATE _2 ?WVERB ?NOT ?JUNK AS NOT + MSP + #0 + #1 + ?JUNK | |
| 54 #1 | |
| 55 DO CREATE _2 ?WVERB ?VERB ?MAYBE_WHILE AS ?MAYBE_WHILE #1 + | |
| 56 ?VERB #1 | |
| 57 DO CREATE _2 ?WVERB ?EXPRESSION ,WHILE, ?VERB AS ECB + | |
| 58 ?EXPRESSION #1 + ?VERB #1 | |
| 59 DO CREATE _2 ?MAYBE_WHILE ,, AS ,, | |
| 60 DO CREATE _2 ?MAYBE_WHILE ,WHILE, ?VERB AS CWB + ?VERB #1 | |
| 61 DO CREATE _2 ?MAYBE_WHILE ,WHILE, ?EXPRESSION AS EBC + | |
| 62 ?EXPRESSION #1 | |
| 63 DO CREATE _2 ?TEMPLATE ,CONDITION, ,WHILE, ,BODY, AS CWB | |
| 64 DO CREATE _2 ?TEMPLATE ,BODY, ,WHILE, ,CONDITION, AS BWC | |
| 65 DO CREATE _2 ?TEMPLATE ,EXPRESSION, ,WHILE, ,STATEMENT, AS ECB | |
| 66 DO CREATE _2 ?TEMPLATE ,STATEMENT, ,WHILE, ,EXPRESSION, AS EBC | |
| 67 DO CREATE _2 ?GERUND ,LOOPING,=4 AS CWB + BWC + ECB + EBC | |
| 68 DO CREATE _2 ?GERUND ,WHILING,=4 AS CWB + BWC + ECB + EBC | |
| 69 DO CREATE _2 ?GERUND ,COMMENTING,=1 AS MSP | |
| 70 DO CREATE _2 ?GERUND ,COMMENTS,=1 AS MSP | |
| 71 DO CREATE _2 ?GERUND ,COMPILER, ,BUG,=1 AS BUG | |
| 72 DO CREATE _2 ?GERUND ,QUANTUM, ,COMPUTING,=1 AS QUA | |
| 73 DO CREATE _2 ?CALCULATION ?EXPRESSION ,#60, ,#45, ?EXPR_OR_DIM | |
| 74 ?Q_CALCULATE AS ?Q_CALCULATE #1 + STO + ?EXPR_OR_DIM #1 + | |
| 75 ?EXPRESSION #1 | |
| 76 DO CREATE _2 ?VERB ?CALCULATION AS ?CALCULATION #1 | |
| 77 DO CREATE _2 ?GERUND ,CALCULATING,=1 AS STO | |
| 78 DO CREATE _2 ?TEMPLATE ?REG_EXPR ,#60, ,#45, ,EXPRESSION, | |
| 79 ?MAYBE_LIST AS STO | |
| 80 DO CREATE _2 ?Q_CALCULATE ,, AS ,, | |
| 81 DO CREATE _2 ?Q_CALCULATE ,WHILE, ,NOT, ,ASSIGNING, ,TO, ,IT, | |
| 82 AS QUA | |
| 83 DO CREATE _2 ?VERB ,STASH, ?NAMES ?Q_STASH AS ?Q_STASH #1 + STA | |
| 84 + !NAMES #1 + ?NAMES #1 | |
| 85 DO CREATE _2 ?GERUND ,STASHING,=1 AS STA | |
| 86 DO CREATE _2 ?TEMPLATE ,STASH, ,REGISTER, ?MAYBE_LIST AS STA | |
| 87 DO CREATE _2 ?Q_STASH ,, AS ,, | |
| 88 DO CREATE _2 ?Q_STASH ,WHILE, ,NOT, ,STASHING, ?IT AS QUA | |
| 89 DO CREATE _2 ?VERB ,RETRIEVE, ?NAMES ?Q_RETRIEVE AS ?Q_RETRIEVE | |
| 90 #1 + RET + !NAMES #1 + ?NAMES #1 | |
| 91 DO CREATE _2 ?GERUND ,RETRIEVING,=1 AS RET | |
| 92 DO CREATE _2 ?TEMPLATE ,RETRIEVE, ,REGISTER, ?MAYBE_LIST AS RET | |
| 93 DO CREATE _2 ?Q_RETRIEVE ,, AS ,, | |
| 94 DO CREATE _2 ?Q_RETRIEVE ,WHILE, ,NOT, ,RETRIEVING, ?IT AS QUA | |
| 95 DO CREATE _2 ?VERB ,IGNORE, ?NAMES ?Q_IGNORE AS ?Q_IGNORE #1 + | |
| 96 IGN + !NAMES #1 + ?NAMES #1 | |
| 97 DO CREATE _2 ?GERUND ,IGNORING,=1 AS IGN | |
| 98 DO CREATE _2 ?TEMPLATE ,IGNORE, ,REGISTER, ?MAYBE_LIST AS IGN | |
| 99 DO CREATE _2 ?Q_IGNORE ,, AS ,, | |
| 100 DO CREATE _2 ?Q_IGNORE ,WHILE, ,REMEMBERING, ?IT AS QUA | |
| 101 DO CREATE _2 ?VERB ,REMEMBER, ?NAMES ?Q_REMEMBER AS ?Q_REMEMBER | |
| 102 #1 + REM + !NAMES #1 + ?NAMES #1 | |
| 103 DO CREATE _2 ?GERUND ,REMEMBERING,=1 AS REM | |
| 104 DO CREATE _2 ?TEMPLATE ,REMEMBER, ,REGISTER, ?MAYBE_LIST AS REM | |
| 105 DO CREATE _2 ?Q_REMEMBER ,, AS ,, | |
| 106 DO CREATE _2 ?Q_REMEMBER ,WHILE, ,IGNORING, ?IT AS QUA | |
| 107 DO CREATE _2 ?VERB ,ABSTAIN, ,FROM, ?ABSTAIN ?Q_ABSTAIN AS | |
| 108 ?Q_ABSTAIN #1 + ?ABSTAIN #1 | |
| 109 DO CREATE _2 ?ABSTAIN ?LABEL AS ABL + ?LABEL #1 | |
| 110 DO CREATE _2 ?ABSTAIN ?GERUNDS AS ABG + !GERUNDS #1 + ?GERUNDS | |
| 111 #1 | |
| 112 DO CREATE _2 ?GERUND ,ABSTAINING,=2 ,FROM, AS ABL + ABG | |
| 113 DO CREATE _2 ?GERUND ,ABSTAINING,=2 AS ABL + ABG | |
| 114 DO CREATE _2 ?TEMPLATE ,ABSTAIN, ,FROM, ,LABEL, AS ABL | |
| 115 DO CREATE _2 ?TEMPLATE ,ABSTAIN, ,FROM, ,GERUND, ?MAYBE_LIST AS | |
| 116 ABG | |
| 117 DO CREATE _2 ?Q_ABSTAIN ,, AS ,, | |
| 118 DO CREATE _2 ?Q_ABSTAIN ,WHILE, ,REINSTATING, ?IT AS QUA | |
| 119 DO CREATE _2 ?VERB ,REINSTATE, ?REINSTATE ?Q_REINSTATE AS | |
| 120 ?Q_REINSTATE #1 + ?REINSTATE #1 | |
| 121 DO CREATE _2 ?REINSTATE ?LABEL AS REL + ?LABEL #1 | |
| 122 DO CREATE _2 ?REINSTATE ?GERUNDS AS REG + !GERUNDS #1 + | |
| 123 ?GERUNDS #1 | |
| 124 DO CREATE _2 ?GERUND ,REINSTATING,=2 AS REL + REG | |
| 125 DO CREATE _2 ?TEMPLATE ,REINSTATE, ,LABEL, AS REL | |
| 126 DO CREATE _2 ?TEMPLATE ,REINSTATE, ,GERUND, ?MAYBE_LIST AS REG | |
| 127 DO CREATE _2 ?GERUND ?TEMPLATE=1 AS ?TEMPLATE #1 | |
| 128 DO CREATE _2 ?GERUNDS ?GERUND=* AS ?GERUND #1 | |
| 129 DO CREATE _2 ?GERUNDS ?GERUND=* ,#43, ?GERUNDS=* AS ?GERUND #1 | |
| 130 + ?GERUNDS #1 | |
| 131 DO CREATE _2 ?Q_REINSTATE ,, AS ,, | |
| 132 DO CREATE _2 ?Q_REINSTATE ,WHILE, ,ABSTAINING, ,FROM, ?IT AS | |
| 133 QUA | |
| 134 DO CREATE _2 ?VERB ,GIVE, ,UP, ?Q_GIVE_UP AS ?Q_GIVE_UP #1 + | |
| 135 GUP | |
| 136 DO CREATE _2 ?GERUND ,GIVING, ,UP,=1 AS GUP | |
| 137 DO CREATE _2 ?GERUND ,GIVING,=1 AS GUP | |
| 138 DO CREATE _2 ?TEMPLATE ,GIVE, ,UP, AS GUP | |
| 139 DO CREATE _2 ?Q_GIVE_UP ,, AS ,, | |
| 140 DO CREATE _2 ?Q_GIVE_UP ,WHILE, ,CONTINUING, ,TO, ,RUN, AS QUA | |
| 141 DO CREATE _2 ?VERB ,WRITE, ,IN, ?E_LIST ?Q_WRITE_IN AS | |
| 142 ?Q_WRITE_IN #1 + WIN + !E_LIST #1 + ?E_LIST #1 | |
| 143 DO CREATE _2 ?GERUND ,WRITING, ,IN,=1 AS WIN | |
| 144 DO CREATE _2 ?GERUND ,WRITING,=1 AS WIN | |
| 145 DO CREATE _2 ?TEMPLATE ,WRITE, ,IN, ?REG_EXPR ?MAYBE_LIST AS | |
| 146 WIN | |
| 147 DO CREATE _2 ?Q_WRITE_IN ,, AS ,, | |
| 148 DO CREATE _2 ?Q_WRITE_IN ,WHILE, ,NOT, ,WRITING, ?IT ?MAYBE_IN | |
| 149 AS QUA | |
| 150 DO CREATE _2 ?MAYBE_IN ,, AS ,, | |
| 151 DO CREATE _2 ?MAYBE_IN ,IN, AS ,, | |
| 152 DO CREATE _2 ?VERB ,READ, ,OUT, ?E_LIST AS ROU + !E_LIST #1 + | |
| 153 ?E_LIST #1 | |
| 154 DO CREATE _2 ?GERUND ,READING, ,OUT,=1 AS ROU | |
| 155 DO CREATE _2 ?GERUND ,READING,=1 AS ROU | |
| 156 DO CREATE _2 ?TEMPLATE ,READ, ,OUT, ?REG_EXPR ?MAYBE_LIST AS | |
| 157 ROU | |
| 158 PLEASE NOTE: NO QUANTUM OUTPUT (YET) | |
| 159 DO CREATE _2 ?VERB ,COME, ,FROM, ?COME_FROM ?Q_COME_FROM AS | |
| 160 ?Q_COME_FROM #1 + ?COME_FROM #1 | |
| 161 DO CREATE _2 ?COME_FROM ?LABEL AS CFL + ?LABEL #1 | |
| 162 DO CREATE _2 ?COME_FROM ?GERUNDS AS CFG + !GERUNDS #1 + | |
| 163 ?GERUNDS #1 | |
| 164 DO CREATE _2 ?GERUND ,COMING, ,FROM,=2 AS CFL + CFG | |
| 165 DO CREATE _2 ?GERUND ,COMING,=2 AS CFL + CFG | |
| 166 DO CREATE _2 ?TEMPLATE ,COME, ,FROM, ,LABEL, AS CFL | |
| 167 DO CREATE _2 ?TEMPLATE ,COME, ,FROM, ,GERUND, ?MAYBE_LIST AS | |
| 168 CFG | |
| 169 DO CREATE _2 ?Q_COME_FROM ,, AS ,, | |
| 170 DO CREATE _2 ?Q_COME_FROM ,WHILE, ,NOT, ,COMING, ,FROM, ,THERE, | |
| 171 AS QUA | |
| 172 DO CREATE _2 ?VERB ,ENSLAVE, ?RNAME ,TO, ?RNAME ?Q_ENSLAVE AS | |
| 173 ?Q_ENSLAVE #1 + ENS + ?RNAME #1 + ?RNAME #2 | |
| 174 DO CREATE _2 ?GERUND ,ENSLAVING,=1 AS ENS | |
| 175 DO CREATE _2 ?TEMPLATE ,ENSLAVE, ,REGISTER, ,TO, ,REGISTER, AS | |
| 176 ENS | |
| 177 DO CREATE _2 ?Q_ENSLAVE ,, AS ,, | |
| 178 DO CREATE _2 ?Q_ENSLAVE ,WHILE, ,LEAVING, ,IT, ,FREE, AS QUA | |
| 179 DO CREATE _2 ?VERB ,FREE, ?RNAME ,FROM, ?RNAME ?Q_FREE AS | |
| 180 ?Q_FREE #1 + FRE + ?RNAME #1 + ?RNAME #2 | |
| 181 DO CREATE _2 ?GERUND ,FREEING,=1 AS FRE | |
| 182 DO CREATE _2 ?TEMPLATE ,FREE, ,REGISTER, ,FROM, ,REGISTER, AS | |
| 183 FRE | |
| 184 DO CREATE _2 ?Q_FREE ,, AS ,, | |
| 185 DO CREATE _2 ?Q_FREE ,WHILE, ,LEAVING, ,IT, ,IN, ,SLAVERY, AS | |
| 186 QUA | |
| 187 DO CREATE _2 ?VERB ,STUDY, ?EXPRESSION ,AT, ?LABEL ,IN, ,CLASS, | |
| 188 ?RNAME ?Q_STUDY AS ?Q_STUDY #1 + STU + ?EXPRESSION #1 + | |
| 189 ?LABEL #1 + ?RNAME #1 | |
| 190 DO CREATE _2 ?GERUND ,STUDYING,=1 AS STU | |
| 191 DO CREATE _2 ?TEMPLATE ,STUDY, ?EXPR_OR_SUBJECT ,AT, ,LABEL, | |
| 192 ,IN, ,CLASS, ,REGISTER, AS STU | |
| 193 DO CREATE _2 ?EXPR_OR_SUBJECT ,EXPRESSION, AS ,, | |
| 194 DO CREATE _2 ?EXPR_OR_SUBJECT ,SUBJECT, AS ,, | |
| 195 DO CREATE _2 ?Q_STUDY ,, AS ,, | |
| 196 DO CREATE _2 ?Q_STUDY ,WHILE, ,NOT, ,STUDYING, ,IT, AS QUA | |
| 197 DO CREATE _2 ?VERB ,ENROL, ?RNAME ,TO, ,LEARN, ?E_LIST ?Q_ENROL | |
| 198 AS ?Q_ENROL #1 + ENR + !E_LIST #1 + ?E_LIST #1 + ?RNAME #1 | |
| 199 DO CREATE _2 ?GERUND ,ENROLLING,=1 AS ENR | |
| 200 DO CREATE _2 ?TEMPLATE ,ENROL, ,REGISTER, ,TO, ,LEARN, | |
| 201 ?EXPR_OR_SUBJECT ?MAYBE_LIST AS ENR | |
| 202 DO CREATE _2 ?Q_ENROL ,, AS ,, | |
| 203 DO CREATE _2 ?Q_ENROL ,WHILE, ,NOT, ,ENROLLING, AS QUA | |
| 204 DO CREATE _2 ?VERB ?RNAME ,LEARNS, ?EXPRESSION ?Q_LEARNS AS | |
| 205 ?Q_LEARNS #1 + LEA + ?EXPRESSION #1 + ?RNAME #1 | |
| 206 DO CREATE _2 ?GERUND ,LEARNING,=1 AS LEA | |
| 207 DO CREATE _2 ?TEMPLATE ,REGISTER, ,LEARNS, ?EXPR_OR_SUBJECT AS | |
| 208 LEA | |
| 209 DO CREATE _2 ?Q_LEARNS ,, AS ,, | |
| 210 DO CREATE _2 ?Q_LEARNS ,WHILE, ,NOT, ,LEARNING, ,IT, AS QUA | |
| 211 DO CREATE _2 ?VERB ,FINISH, ,LECTURE, ?Q_FINISH AS ?Q_FINISH #1 | |
| 212 + FIN | |
| 213 DO CREATE _2 ?GERUND ,FINISHING, ,LECTURE,=1 AS FIN | |
| 214 DO CREATE _2 ?GERUND ,FINISHING,=1 AS FIN | |
| 215 DO CREATE _2 ?TEMPLATE ,FINISH, ,LECTURE, AS FIN | |
| 216 DO CREATE _2 ?Q_FINISH ,, AS ,, | |
| 217 DO CREATE _2 ?Q_FINISH ,WHILE, ,CONTINUING, ,IT, AS QUA | |
| 218 DO CREATE _2 ?VERB ?RNAME ,GRADUATES, ?Q_GRADUATES AS | |
| 219 ?Q_GRADUATES #1 + GRA + ?RNAME #1 | |
| 220 DO CREATE _2 ?GERUND ,GRADUATING,=1 AS GRA | |
| 221 DO CREATE _2 ?TEMPLATE ,REGISTER, ,GRADUATES, AS GRA | |
| 222 DO CREATE _2 ?Q_GRADUATES ,, AS ,, | |
| 223 DO CREATE _2 ?Q_GRADUATES ,WHILE, ,REMAINING, ,A, ,STUDENT, AS | |
| 224 QUA | |
| 225 DO CREATE _2 ?VERB ,NEXT, ,FROM, ?NEXT_FROM ?Q_NEXT_FROM AS | |
| 226 ?Q_NEXT_FROM #1 + ?NEXT_FROM #1 | |
| 227 DO CREATE _2 ?NEXT_FROM ?LABEL AS NXL + ?LABEL #1 | |
| 228 DO CREATE _2 ?MEXT_FROM ?GERUNDS AS NXG + !GERUNDS #1 + | |
| 229 ?GERUNDS #1 | |
| 230 DO CREATE _2 ?GERUND ,NEXTING, ,FROM,=2 AS NXL + NXG | |
| 231 DO CREATE _2 ?TEMPLATE ,NEXT, ,FROM, ,LABEL, AS NXL | |
| 232 DO CREATE _2 ?TEMPLATE ,NEXT, ,FROM, ,GERUND, ?MAYBE_LIST AS | |
| 233 NXG | |
| 234 DO CREATE _2 ?Q_NEXT_FROM ,, AS ,, | |
| 235 DO CREATE _2 ?Q_NEXT_FROM ,WHILE, ,NOT, ,NEXTING, ,FROM, | |
| 236 ,THERE, AS QUA | |
| 237 DO CREATE _2 ?VERB ,CONVERT, ?TEMPLATE ,TO, ?TEMPLATE | |
| 238 ?Q_CONVERT AS ?Q_CONVERT #1 + CON + ?TEMPLATE #1 + ?TEMPLATE | |
| 239 #2 | |
| 240 DO CREATE _2 ?GERUND ,CONVERTING,=3 AS CON | |
| 241 DO CREATE _2 ?TEMPLATE ,CONVERT, ,STATEMENT, ,TO, ,STATEMENT, | |
| 242 AS CON | |
| 243 DO CREATE _2 ?Q_CONVERT ,, AS ,, | |
| 244 DO CREATE _2 ?Q_CONVERT ,WHILE, ,LEAVING, ,IT, ,UNCHANGED, AS | |
| 245 QUA | |
| 246 DO CREATE _2 ?VERB ,SWAP, ?TEMPLATE ,AND, ?TEMPLATE ?Q_SWAP AS | |
| 247 ?Q_SWAP #1 + SWA + ?TEMPLATE #1 + ?TEMPLATE #2 | |
| 248 DO CREATE _2 ?GERUND ,SWAPPING,=2 AS SWA | |
| 249 DO CREATE _2 ?TEMPLATE ,SWAP, ,STATEMENT, ,AND, ,STATEMENT, AS | |
| 250 SWA | |
| 251 DO CREATE _2 ?Q_SWAP ,, AS ,, | |
| 252 DO CREATE _2 ?Q_SWAP ,WHILE, ,LEAVING, ,THEM, ,UNCHANGED, AS | |
| 253 QUA | |
| 254 DO CREATE _2 ?VERB ,CREATE, ?GSYMBOL ?LEFT ,AS, ?RIGHT | |
| 255 ?Q_CREATE AS ?Q_CREATE #1 + CRE + #1 + ?GSYMBOL #1 + !LEFT | |
| 256 #1 + ?LEFT #1 + !RIGHT #1 + ?RIGHT #1 | |
| 257 DO CREATE _2 ?GERUND ,CREATING,=1 AS CRE | |
| 258 DO CREATE _2 ?TEMPLATE ,CREATE, ,SYMBOL, ,LEFT, ,AS, ,RIGHT, AS | |
| 259 CRE | |
| 260 DO CREATE _2 ?Q_CREATE ,, AS ,, | |
| 261 DO CREATE _2 ?Q_CREATE ,WHILE, ,NOT, ,CREATING, ,IT, AS QUA | |
| 262 DO CREATE _2 ?VERB ,DESTROY, ?GSYMBOL ?LEFT ?Q_DESTROY AS | |
| 263 ?Q_DESTROY #1 + DES + #1 + ?GSYMBOL #1 + !LEFT #1 + ?LEFT #1 | |
| 264 DO CREATE _2 ?GERUND ,DESTROYING,=1 AS DES | |
| 265 DO CREATE _2 ?TEMPLATE ,DESTROY, ,SYMBOL, ,EXPRESSION, ,LEFT, | |
| 266 AS DES | |
| 267 DO CREATE _2 ?Q_DESTROY ,, AS ,, | |
| 268 DO CREATE _2 ?Q_DESTROY ,WHILE, ,NOT, ,DESTROYING, ,IT, AS QUA | |
| 269 DO CREATE _2 ?VERB ,RESUME, ?EXPRESSION ?Q_RESUME AS ?Q_RESUME | |
| 270 #1 + RES + ?EXPRESSION #1 | |
| 271 DO CREATE _2 ?GERUND ,RESUMING,=1 AS RES | |
| 272 DO CREATE _2 ?TEMPLATE ,RESUME, ,EXPRESSION, AS RES | |
| 273 DO CREATE _2 ?Q_RESUME ,, AS ,, | |
| 274 DO CREATE _2 ?Q_RESUME ,WHILE, ,NOT, ,RESUMING, AS QUA | |
| 275 DO CREATE _2 ?VERB ,FORGET, ?EXPRESSION ?Q_FORGET AS ?Q_FORGET | |
| 276 #1 + FOR + ?EXPRESSION #1 | |
| 277 DO CREATE _2 ?GERUND ,FORGETTING,=1 AS FOR | |
| 278 DO CREATE _2 ?TEMPLATE ,FORGET, ,EXPRESSION, AS FOR | |
| 279 DO CREATE _2 ?Q_FORGET ,, AS ,, | |
| 280 DO CREATE _2 ?Q_FORGET ,WHILE, ,NOT, ,FORGETTING, AS QUA | |
| 281 DO CREATE _2 ?Q_FORGET ,WHILE, ,REMEMBERING, AS QUA | |
| 282 DO CREATE _2 ?NAMES ?RNAME=1 AS ?RNAME #1 | |
| 283 DO CREATE _2 ?NAMES ?RNAME=1 ,#43, ?NAMES=* AS ?RNAME #1 + | |
| 284 ?NAMES #1 | |
| 285 DO CREATE _2 ?RTYPE ,#46, AS SPO | |
| 286 DO CREATE _2 ?RTYPE ,#58, AS TSP | |
| 287 DO CREATE _2 ?RTYPE ,#44, AS TAI | |
| 288 DO CREATE _2 ?RTYPE ,#59, AS HYB | |
| 289 DO CREATE _2 ?RTYPE ,#64, AS WHP | |
| 290 DO CREATE _2 ?RTYPE ,_, AS CHO | |
| 291 DO CREATE _2 ?RTYPE ,#43, ?REGISTER AS TYP + ?REGISTER #1 | |
| 292 DO CREATE _2 ?RNUMBER ?CONSTANT AS ?CONSTANT #1 | |
| 293 DO CREATE _2 ?RNUMBER ,#45, ?REGISTER AS NUM + ?REGISTER #1 | |
| 294 DO CREATE _2 ?RNAME ?OWNER ?RTYPE ?RNUMBER AS ?OWNER #1 + | |
| 295 ?RTYPE #1 + ?RNUMBER #1 | |
| 296 DO CREATE _2 ?REGISTER ?OWNER ?RTYPE ?UNARIES ?RNUMBER AS | |
| 297 ?UNARIES #1 + ?OWNER #1 + ?RTYPE #1 + ?RNUMBER #1 | |
| 298 DO CREATE _2 ?REGISTER ?OWNER ,#43, ?UNARIES ?REGISTER ?RNUMBER | |
| 299 AS ?UNARIES #1 + ?OWNER #1 + TYP + ?REGISTER #1 + ?RNUMBER | |
| 300 #1 | |
| 301 DO CREATE _2 ?OWNER ,, AS ,, | |
| 302 DO CREATE _2 ?OWNER ?MASTER ?OWNER AS ?OWNER #1 + ?MASTER #1 | |
| 303 DO CREATE _2 ?MASTER ,#36, AS OWN + #1 | |
| 304 DO CREATE _2 ?MASTER ,1, AS OWN + #1 | |
| 305 DO CREATE _2 ?MASTER ,2, AS OWN + #2 | |
| 306 DO CREATE _2 ?MASTER ,3, AS OWN + #3 | |
| 307 DO CREATE _2 ?MASTER ,4, AS OWN + #4 | |
| 308 DO CREATE _2 ?MASTER ,5, AS OWN + #5 | |
| 309 DO CREATE _2 ?MASTER ,6, AS OWN + #6 | |
| 310 DO CREATE _2 ?MASTER ,7, AS OWN + #7 | |
| 311 DO CREATE _2 ?MASTER ,8, AS OWN + #8 | |
| 312 DO CREATE _2 ?MASTER ,9, AS OWN + #9 | |
| 313 DO CREATE _2 ?ELEMENT ?OWNER ?RTYPE ?UNARIES ?CONSTANT | |
| 314 ?SUBSCRIPTS AS ?UNARIES #1 + ?SUBSCRIPTS #1 + ?OWNER #1 + | |
| 315 ?RTYPE #1 + ?CONSTANT #1 | |
| 316 DO CREATE _2 ?LELEMENT ?OWNER ?RTYPE ?CONSTANT ?SUBSCRIPTS AS | |
| 317 ?SUBSCRIPTS #1 + ?OWNER #1 + ?RTYPE #1 + ?CONSTANT #1 | |
| 318 DO CREATE _2 ?SUBSCRIPTS ,SUB, ?EXPRESSION ?MORE_SUBSCRIPTS AS | |
| 319 ?MORE_SUBSCRIPTS #1 + SUB + ?EXPRESSION #1 | |
| 320 DO CREATE _2 ?MORE_SUBSCRIPTS ,, AS ,, | |
| 321 DO CREATE _2 ?MORE_SUBSCRIPTS ,SUB, ?EXPRESSION | |
| 322 ?MORE_SUBSCRIPTS AS ?MORE_SUBSCRIPTS #1 + SUB + ?EXPRESSION | |
| 323 #1 | |
| 324 DO CREATE _2 ?NONUNARIES ?REGISTER AS ?REGISTER #1 | |
| 325 DO CREATE _2 ?NONUNARIES ?ELEMENT AS ?ELEMENT #1 | |
| 326 DO CREATE _2 ?NONUNARIES ,#45, ?REGISTER AS NUM + ?REGISTER #1 | |
| 327 DO CREATE _2 ?NONUNARIES ,#35, ?UNARIES ?CONSTANT AS ?UNARIES | |
| 328 #1 + ?CONSTANT #1 | |
| 329 DO CREATE _2 ?NONUNARIES ,#39, ?UNARIES ?EXPRESSION ,#39, AS | |
| 330 ?UNARIES #1 + ?EXPRESSION #1 | |
| 331 DO CREATE _2 ?NONUNARIES ,#34, ?UNARIES ?EXPRESSION ,#34, AS | |
| 332 ?UNARIES #1 + ?EXPRESSION #1 | |
| 333 DO CREATE _2 ?NONUNARIES ,#42, AS SPL | |
| 334 DO CREATE _2 ?BANG ?RNUMBER AS SPO + ?RNUMBER #1 | |
| 335 DO CREATE _2 ?BANG_U ?UNARIES ?RNUMBER AS ?UNARIES #1 + SPO + | |
| 336 ?RNUMBER #1 | |
| 337 DO CREATE _2 ?NONUNARIES ?BANG_U ?MAYBE_BINARY ,#39, AS | |
| 338 ?MAYBE_BINARY #1 + ?BANG_U #1 | |
| 339 DO CREATE _2 ?NONUNARIES ?BANG ,#47, ?EXPRESSION ,#39, AS OVR + | |
| 340 ?EXPRESSION #1 + ?BANG #1 | |
| 341 DO CREATE _2 ?NONUNARIES ?BANG_U ,#92, ?EXPRESSION ,#39, AS OVM | |
| 342 + ?EXPRESSION #1 + ?BANG_U #1 | |
| 343 DO CREATE _2 ?RABBIT_U ,#34 + #8 + #46, ?UNARIES ?CONSTANT AS | |
| 344 ?UNARIES #1 + SPO + ?CONSTANT #1 | |
| 345 DO CREATE _2 ?RABBIT ,#34 + #8 + #46, ?CONSTANT AS SPO + | |
| 346 ?CONSTANT #1 | |
| 347 DO CREATE _2 ?NONUNARIES ?RABBIT_U ?MAYBE_BINARY ,#34, AS | |
| 348 ?MAYBE_BINARY #1 + ?RABBIT_U #1 | |
| 349 DO CREATE _2 ?NONUNARIES ?RABBIT ,#47, ?EXPRESSION ,#34, AS OVR | |
| 350 + ?EXPRESSION #1 + ?RABBIT #1 | |
| 351 DO CREATE _2 ?NONUNARIES ?RABBIT_U ,#92, ?EXPRESSION ,#34, AS | |
| 352 OVM + ?EXPRESSION #1 + ?RABBIT_U #1 | |
| 353 DO CREATE _2 ?EXPRESSION ?NONUNARIES ?MAYBE_BINARY AS | |
| 354 ?MAYBE_BINARY #1 + ?NONUNARIES #1 | |
| 355 DO CREATE _2 ?EXPRESSION ?OVERLOADABLE ,#47, ?EXPRESSION AS OVR | |
| 356 + ?EXPRESSION #1 + ?OVERLOADABLE #1 | |
| 357 DO CREATE _2 ?EXPRESSION ?NONUNARIES ,#92, ?EXPRESSION AS OVM + | |
| 358 ?EXPRESSION #1 + ?NONUNARIES #1 | |
| 359 DO CREATE _2 ?E_LIST ?EXPRESSION=1 AS ?EXPRESSION #1 | |
| 360 DO CREATE _2 ?E_LIST ?EXPRESSION=1 ,#43, ?E_LIST=* AS | |
| 361 ?EXPRESSION #1 + ?E_LIST #1 | |
| 362 DO CREATE _2 ?UNARIES ,, AS ,, | |
| 363 DO CREATE _2 ?UNARIES ?UNARY ?UNARIES AS ?UNARY #1 + ?UNARIES | |
| 364 #1 | |
| 365 DO CREATE _2 ?UNARY ,V, AS BUT + #7 | |
| 366 DO CREATE _2 ?UNARY ,#38, AS BUT + #0 | |
| 367 DO CREATE _2 ?UNARY ,#86 + #8 + #45, AS SWB | |
| 368 DO CREATE _2 ?UNARY ,#165, AS SWB | |
| 369 DO CREATE _2 ?UNARY ,#63, AS BUT + #1 | |
| 370 DO CREATE _2 ?UNARY ,1, ,#63, AS BUT + #1 | |
| 371 DO CREATE _2 ?UNARY ,2, ,#63, AS BUT + #2 | |
| 372 DO CREATE _2 ?UNARY ,3, ,#63, AS BUT + #3 | |
| 373 DO CREATE _2 ?UNARY ,4, ,#63, AS BUT + #4 | |
| 374 DO CREATE _2 ?UNARY ,5, ,#63, AS BUT + #5 | |
| 375 DO CREATE _2 ?UNARY ,#124, AS AWC | |
| 376 DO CREATE _2 ?UNARY ,#45, AS UDV | |
| 377 DO CREATE _2 ?MAYBE_BINARY ,, AS ,, | |
| 378 DO CREATE _2 ?MAYBE_BINARY ?BINARY ?EXPRESSION AS ?BINARY #1 + | |
| 379 ?EXPRESSION #1 | |
| 380 DO CREATE _2 ?BINARY ,#126, AS RSE | |
| 381 DO CREATE _2 ?BINARY ,#67 + #8 + #47, AS RIN | |
| 382 DO CREATE _2 ?BINARY ,#67 + #8 + #124, AS RIN | |
| 383 DO CREATE _2 ?BINARY ,#162, AS RIN | |
| 384 DO CREATE _2 ?OVERLOADABLE ?REGISTER AS ?REGISTER #1 | |
| 385 DO CREATE _2 ?OVERLOADABLE ?LELEMENT AS ?LELEMENT #1 | |
| 386 DO CREATE _2 ?EXPR_OR_DIM ?EXPRESSION AS ?EXPRESSION #1 | |
| 387 DO CREATE _2 ?EXPR_OR_DIM ?DIMENSION AS MUL + !DIMENSION #1 + | |
| 388 ?DIMENSION #1 | |
| 389 DO CREATE _2 ?DIMENSION ?EXPRESSION=1 ,BY, ?EXPRESSION=1 | |
| 390 ?MORE_DIMENSION=* AS ?EXPRESSION #1 + ?EXPRESSION #2 + | |
| 391 ?MORE_DIMENSION #1 | |
| 392 DO CREATE _2 ?MORE_DIMENSION ,, AS ,, | |
| 393 DO CREATE _2 ?MORE_DIMENSION ,BY, ?DIMENSION=* AS ?DIMENSION #1 | |
| 394 DO CREATE _2 ?LABEL ,#40, ?CONSTANT ,#41, AS ?CONSTANT #1 | |
| 395 DO CREATE _2 ?LABEL ,#40, ?EXPRESSION ,#41, AS ?EXPRESSION #1 | |
| 396 DO CREATE _2 ?LABEL ?EXPRESSION AS ?EXPRESSION #1 | |
| 397 DO CREATE _2 ?IT ,IT, AS ,, | |
| 398 DO CREATE _2 ?IT ,THEM, AS ,, | |
| 399 DO CREATE _2 ?THEM ,THEM, AS ,, | |
| 400 DO CREATE _2 ?THEM ,IT, AS ,, | |
| 401 DO CREATE _2 ?LEFT ,, AS ,, | |
| 402 DO CREATE _2 ?LEFT ?LP=1 ?MAYBE_COUNT ?LEFT=* AS ?MAYBE_COUNT | |
| 403 #1 + ?LP #1 + ?LEFT #1 | |
| 404 DO CREATE _2 ?LP ?GSYMBOL AS #0 + ?GSYMBOL #1 | |
| 405 DO CREATE _2 ?LP ,#44, ?E_LIST ,#44, AS #1 + MUL + !E_LIST #1 + | |
| 406 ?E_LIST #1 | |
| 407 DO CREATE _2 ?LP ,#44, ,#44, AS #1 + STR + #0 | |
| 408 DO CREATE _2 ?LP ,#44, ?SYMBOL ,#44, AS #1 + ?SYMBOL #1 | |
| 409 DO CREATE _2 ?MAYBE_COUNT ,, AS #0 | |
| 410 DO CREATE _2 ?MAYBE_COUNT ,#61, ?CONSTANT AS ?CONSTANT #1 | |
| 411 DO CREATE _2 ?MAYBE_COUNT ,#61, ?EXPRESSION AS ?EXPRESSION #1 | |
| 412 DO CREATE _2 ?MAYBE_COUNT ,#61, ,#42, AS #65535 | |
| 413 DO CREATE _2 ?RIGHT ,, AS ,, | |
| 414 DO CREATE _2 ?RIGHT ?RIGHT_NONEMPTY=* AS ?RIGHT_NONEMPTY #1 | |
| 415 DO CREATE _2 ?RIGHT_NONEMPTY ?RP=1 ?MORE_RIGHT=* AS ?RP #1 + | |
| 416 ?MORE_RIGHT #1 | |
| 417 DO CREATE _2 ?MORE_RIGHT ,, AS ,, | |
| 418 DO CREATE _2 ?MORE_RIGHT ,#43, ?RIGHT_NONEMPTY=* AS | |
| 419 ?RIGHT_NONEMPTY #1 | |
| 420 DO CREATE _2 ?RP ?GSYMBOL ?EXPRESSION AS #0 + ?EXPRESSION #1 + | |
| 421 ?GSYMBOL #1 | |
| 422 DO CREATE _2 ?RP ,#44, ?E_LIST ,#44, ?EXPRESSION AS #1 + | |
| 423 ?EXPRESSION #1 + MUL + !E_LIST #1 + ?E_LIST #1 | |
| 424 DO CREATE _2 ?RP ,#44, ,#44, AS #4 + #0 | |
| 425 DO CREATE _2 ?RP ,#44, ?SYMBOL ,#44, ?EXPRESSION AS #1 + | |
| 426 ?EXPRESSION #1 + ?SYMBOL #1 | |
| 427 DO CREATE _2 ?RP ?BYTECODE AS #4 + !BYTECODE #1 + ?BYTECODE #1 | |
| 428 DO CREATE _2 ?RP ,#33, ?GSYMBOL ?EXPRESSION AS #6 + ?EXPRESSION | |
| 429 #1 + ?GSYMBOL #1 | |
| 430 DO CREATE _2 ?RP ,#42, AS #15 | |
| 431 DO CREATE _2 ?BYTECODE ?SPECIAL_REGISTER=* AS ?SPECIAL_REGISTER | |
| 432 #1 | |
| 433 DO CREATE _2 ?BYTECODE ?EXPRESSION=1 AS ?EXPRESSION #1 | |
| 434 DO CREATE _2 ?BC_LIST ?BYTECODE=* ?OTHER_BC=* AS ?BYTECODE #1 + | |
| 435 ?OTHER_BC #1 | |
| 436 DO CREATE _2 ?OTHER_BC ,, AS ,, | |
| 437 DO CREATE _2 ?OTHER_BC ,#43, ?BC_LIST=* AS ?BC_LIST #1 | |
| 438 DO CREATE _2 ?REG_EXPR ,REGISTER, AS ,, | |
| 439 DO CREATE _2 ?REG_EXPR ,EXPRESSION, AS ,, | |
| 440 DO CREATE _2 ?MAYBE_LIST ,, AS ,, | |
| 441 DO CREATE _2 ?MAYBE_LIST ,LIST, AS ,, | |
| 442 DO CREATE _2 ?GSYMBOL ,#63, ?SYMBOL AS ?SYMBOL #1 | |
| 443 | |
| 444 PLEASE NOTE: BYTECODE DEFINITION (FROM THE ASSEMBLER) | |
| 445 | |
| 446 PLEASE NOTE: NAMES OF "%" REGISTERS | |
| 447 DO CREATE _2 ?SPECIAL_REGISTER ,#37, ?REG69=* AS ?REG69 #1 | |
| 448 DO CREATE _2 ?REG69 ,WT,=2 AS %WT | |
| 449 DO CREATE _2 ?REG69 ,AR,=2 AS %AR | |
| 450 DO CREATE _2 ?REG69 ,AW,=2 AS %AW | |
| 451 DO CREATE _2 ?REG69 ,JS,=2 AS %JS | |
| 452 DO CREATE _2 ?REG69 ,SS,=2 AS %SS | |
| 453 DO CREATE _2 ?REG69 ,PS,=2 AS %PS | |
| 454 DO CREATE _2 ?REG69 ,FS,=2 AS %FS | |
| 455 DO CREATE _2 ?REG69 ,ES,=2 AS %ES | |
| 456 DO CREATE _2 ?REG69 ,IS,=2 AS %IS | |
| 457 DO CREATE _2 ?REG69 ,DM,=2 AS %DM | |
| 458 DO CREATE _2 ?REG69 ,SP,=2 AS %SP | |
| 459 DO CREATE _2 ?REG69 ,RT,=2 AS %RT | |
| 460 DO CREATE _2 ?REG69 ,TH,=2 AS %TH | |
| 461 DO CREATE _2 ?REG69 ,RM,=2 AS %RM | |
| 462 DO CREATE _2 ?REG69 ,IO,=2 AS %IO | |
| 463 DO CREATE _2 ?REG69 ,BA,=2 AS %BA | |
| 464 DO CREATE _2 ?REG69 ,CF,=2 AS %CF | |
| 465 DO CREATE _2 ?REG69 ,CR,=2 AS %CR | |
| 466 DO CREATE _2 ?REG69 ,CW,=2 AS %CW | |
| 467 DO CREATE _2 ?REG69 ,OS,=2 AS %OS | |
| 468 DO CREATE _2 ?REG69 ,TM,=2 AS %TM | |
| 469 | |
| 470 PLEASE NOTE: NAMES OF "@" REGISTERS | |
| 471 DO CREATE _2 ?SPECIAL_REGISTER ,#64, ?REG68=* AS ?REG68 #1 | |
| 472 DO CREATE _2 ?REG68 ,OR,=2 AS @OR | |
| 473 DO CREATE _2 ?REG68 ,OWFH,=2 AS @OWFH | |
| 474 DO CREATE _2 ?REG68 ,ORFH,=2 AS @ORFH | |
| 475 DO CREATE _2 ?REG68 ,OSFH,=2 AS @OSFH | |
| 476 DO CREATE _2 ?REG68 ,SNFH,=2 AS @SNFH | |
| 477 DO CREATE _2 ?REG68 ,TRFH,=2 AS @TRFH | |
| 478 | |
| 479 PLEASE NOTE: NAMES OF "^" REGISTERS | |
| 480 DO CREATE _2 ?SPECIAL_REGISTER ,#94, ?REG70=* AS ?REG70 #1 | |
| 481 DO CREATE _2 ?REG70 ,AV,=2 AS ^AV | |
| 482 DO CREATE _2 ?REG70 ,EV,=2 AS ^EV | |
| 483 | |
| 484 PLEASE NOTE: "BYTECODE" INSTRUCTION NAMES | |
| 485 DO CREATE _2 ?BYTECODE ,ABG,=1 AS ABG | |
| 486 DO CREATE _2 ?BYTECODE ,ABL,=1 AS ABL | |
| 487 DO CREATE _2 ?BYTECODE ,AWC,=1 AS AWC | |
| 488 DO CREATE _2 ?BYTECODE ,BAW,=1 AS BAW | |
| 489 DO CREATE _2 ?BYTECODE ,BBT,=1 AS BBT | |
| 490 DO CREATE _2 ?BYTECODE ,BSW,=1 AS BSW | |
| 491 DO CREATE _2 ?BYTECODE ,BUG,=1 AS BUG | |
| 492 DO CREATE _2 ?BYTECODE ,BUT,=1 AS BUT | |
| 493 DO CREATE _2 ?BYTECODE ,BWC,=1 AS BWC | |
| 494 DO CREATE _2 ?BYTECODE ,CFG,=1 AS CFG | |
| 495 DO CREATE _2 ?BYTECODE ,CFL,=1 AS CFL | |
| 496 DO CREATE _2 ?BYTECODE ,CHO,=1 AS CHO | |
| 497 DO CREATE _2 ?BYTECODE ,CON,=1 AS CON | |
| 498 DO CREATE _2 ?BYTECODE ,CRE,=1 AS CRE | |
| 499 DO CREATE _2 ?BYTECODE ,CSE,=1 AS CSE | |
| 500 DO CREATE _2 ?BYTECODE ,CWB,=1 AS CWB | |
| 501 DO CREATE _2 ?BYTECODE ,DES,=1 AS DES | |
| 502 DO CREATE _2 ?BYTECODE ,DOS,=1 AS DOS | |
| 503 DO CREATE _2 ?BYTECODE ,DSX,=1 AS DSX | |
| 504 DO CREATE _2 ?BYTECODE ,EBC,=1 AS EBC | |
| 505 DO CREATE _2 ?BYTECODE ,ECB,=1 AS ECB | |
| 506 DO CREATE _2 ?BYTECODE ,ENR,=1 AS ENR | |
| 507 DO CREATE _2 ?BYTECODE ,ENS,=1 AS ENS | |
| 508 DO CREATE _2 ?BYTECODE ,FIN,=1 AS FIN | |
| 509 DO CREATE _2 ?BYTECODE ,FLA,=1 AS FLA | |
| 510 DO CREATE _2 ?BYTECODE ,FOR,=1 AS FOR | |
| 511 DO CREATE _2 ?BYTECODE ,FRE,=1 AS FRE | |
| 512 DO CREATE _2 ?BYTECODE ,FRZ,=1 AS FRZ | |
| 513 DO CREATE _2 ?BYTECODE ,GRA,=1 AS GRA | |
| 514 DO CREATE _2 ?BYTECODE ,GUP,=1 AS GUP | |
| 515 DO CREATE _2 ?BYTECODE ,HSN,=1 AS HSN | |
| 516 DO CREATE _2 ?BYTECODE ,HYB,=1 AS HYB | |
| 517 DO CREATE _2 ?BYTECODE ,IGN,=1 AS IGN | |
| 518 DO CREATE _2 ?BYTECODE ,INT,=1 AS INT | |
| 519 DO CREATE _2 ?BYTECODE ,LAB,=1 AS LAB | |
| 520 DO CREATE _2 ?BYTECODE ,LEA,=1 AS LEA | |
| 521 DO CREATE _2 ?BYTECODE ,MKG,=1 AS MKG | |
| 522 DO CREATE _2 ?BYTECODE ,MSP,=1 AS MSP | |
| 523 DO CREATE _2 ?BYTECODE ,MUL,=1 AS MUL | |
| 524 DO CREATE _2 ?BYTECODE ,NOT,=1 AS NOT | |
| 525 DO CREATE _2 ?BYTECODE ,NUM,=1 AS NUM | |
| 526 DO CREATE _2 ?BYTECODE ,NXG,=1 AS NXG | |
| 527 DO CREATE _2 ?BYTECODE ,NXL,=1 AS NXL | |
| 528 DO CREATE _2 ?BYTECODE ,NXT,=1 AS NXT | |
| 529 DO CREATE _2 ?BYTECODE ,OPT,=1 AS OPT | |
| 530 DO CREATE _2 ?BYTECODE ,OSN,=1 AS OSN | |
| 531 DO CREATE _2 ?BYTECODE ,OVM,=1 AS OVM | |
| 532 DO CREATE _2 ?BYTECODE ,OVR,=1 AS OVR | |
| 533 DO CREATE _2 ?BYTECODE ,OWN,=1 AS OWN | |
| 534 DO CREATE _2 ?BYTECODE ,QUA,=1 AS QUA | |
| 535 DO CREATE _2 ?BYTECODE ,REG,=1 AS REG | |
| 536 DO CREATE _2 ?BYTECODE ,REL,=1 AS REL | |
| 537 DO CREATE _2 ?BYTECODE ,REM,=1 AS REM | |
| 538 DO CREATE _2 ?BYTECODE ,RES,=1 AS RES | |
| 539 DO CREATE _2 ?BYTECODE ,RET,=1 AS RET | |
| 540 DO CREATE _2 ?BYTECODE ,RIN,=1 AS RIN | |
| 541 DO CREATE _2 ?BYTECODE ,ROM,=1 AS ROM | |
| 542 DO CREATE _2 ?BYTECODE ,ROR,=1 AS ROR | |
| 543 DO CREATE _2 ?BYTECODE ,ROU,=1 AS ROU | |
| 544 DO CREATE _2 ?BYTECODE ,RSE,=1 AS RSE | |
| 545 DO CREATE _2 ?BYTECODE ,SEL,=1 AS SEL | |
| 546 DO CREATE _2 ?BYTECODE ,SHF,=1 AS SHF | |
| 547 DO CREATE _2 ?BYTECODE ,SMU,=1 AS SMU | |
| 548 DO CREATE _2 ?BYTECODE ,SPL,=1 AS SPL | |
| 549 DO CREATE _2 ?BYTECODE ,SPO,=1 AS SPO | |
| 550 DO CREATE _2 ?BYTECODE ,STA,=1 AS STA | |
| 551 DO CREATE _2 ?BYTECODE ,STE,=1 AS STE | |
| 552 DO CREATE _2 ?BYTECODE ,STO,=1 AS STO | |
| 553 DO CREATE _2 ?BYTECODE ,STR,=1 AS STR | |
| 554 DO CREATE _2 ?BYTECODE ,STS,=1 AS STS | |
| 555 DO CREATE _2 ?BYTECODE ,STU,=1 AS STU | |
| 556 DO CREATE _2 ?BYTECODE ,SUB,=1 AS SUB | |
| 557 DO CREATE _2 ?BYTECODE ,SWA,=1 AS SWA | |
| 558 DO CREATE _2 ?BYTECODE ,SWB,=1 AS SWB | |
| 559 DO CREATE _2 ?BYTECODE ,SYS,=1 AS SYS | |
| 560 DO CREATE _2 ?BYTECODE ,TAI,=1 AS TAI | |
| 561 DO CREATE _2 ?BYTECODE ,TSP,=1 AS TSP | |
| 562 DO CREATE _2 ?BYTECODE ,TYP,=1 AS TYP | |
| 563 DO CREATE _2 ?BYTECODE ,UDV,=1 AS UDV | |
| 564 DO CREATE _2 ?BYTECODE ,UNE,=1 AS UNE | |
| 565 DO CREATE _2 ?BYTECODE ,UNS,=1 AS UNS | |
| 566 DO CREATE _2 ?BYTECODE ,USG,=1 AS USG | |
| 567 DO CREATE _2 ?BYTECODE ,WHP,=1 AS WHP | |
| 568 DO CREATE _2 ?BYTECODE ,WIN,=1 AS WIN | |
| 569 | |
| 570 DO GIVE UP |