From 62c602eb8f8d42b4cf2f9067cdcb90d16ff083ac Mon Sep 17 00:00:00 2001 From: Thomas Leathers Date: Fri, 13 Aug 2021 20:45:06 -0400 Subject: [PATCH] Start some basic code cleanup in Bench using some SSTNPL macros. --- apps/bench/auto_bench.tdsk1 | 1502 ++++++++++++++------------ apps/bench/auto_xas.xas | 1 + apps/bench/bench/desktop2.stnp | 17 +- apps/bench/bench/desktop2.trom | 193 +++- apps/bench/bench/desktop2__stnp.tasm | 158 +-- apps/bench/bench/info.stnp | 3 + apps/bench/bench/info.trom | 1307 +++++++++++----------- apps/bench/bench/info__stnp.tasm | 26 +- apps/bench/lib/bench_lib.stnp | 16 + apps/bench/lib/bench_lib.stnpmfs | 4 + apps/bench/lib/bench_lib.tas0 | 102 ++ 11 files changed, 1818 insertions(+), 1511 deletions(-) create mode 100644 apps/bench/lib/bench_lib.stnp create mode 100644 apps/bench/lib/bench_lib.stnpmfs create mode 100644 apps/bench/lib/bench_lib.tas0 diff --git a/apps/bench/auto_bench.tdsk1 b/apps/bench/auto_bench.tdsk1 index ddda38a..1ec3279 100644 --- a/apps/bench/auto_bench.tdsk1 +++ b/apps/bench/auto_bench.tdsk1 @@ -9469,7 +9469,10 @@ SBTCVM Bench v0.3.0 -9100,2 -9600,-9559 -9600,-9804 --9460,-76 +-9841,-9699 +-9100,2 +-9600,-9477 +-9460,-103 -9460,-102 -9460,-121 -9460,-104 @@ -9490,9 +9493,6 @@ SBTCVM Bench v0.3.0 -9460,-29 -9460,-29 -9460,1 --9841,-9678 --9100,2 --9600,-9477 -9459,100 -9460,-104 -9460,-103 @@ -9518,7 +9518,18 @@ SBTCVM Bench v0.3.0 -9460,-77 -9460,-80 -9460,-77 --9460,-41 +-9460,-32 +-9460,-95 +-9460,-95 +-9460,-119 +-9460,-121 +-9460,-108 +-9460,-33 +-9460,-102 +-9460,-95 +-9460,-104 +-9460,-101 +-9460,-108 -9460,-95 -9460,-113 -9460,-108 @@ -9528,21 +9539,13 @@ SBTCVM Bench v0.3.0 -9460,-121 -9460,-106 -9460,-106 --9460,-95 --9460,-108 --9460,-107 --9460,-102 --9460,-95 --9460,-116 --9460,-107 --9460,-101 --9460,-108 --9460,-118 --9460,-41 -9460,1 -9100,0 -9596,0 --9460,-76 +-9841,-9626 +-9100,2 +-9600,-9477 +-9460,-103 -9460,-102 -9460,-121 -9460,-104 @@ -9562,9 +9565,6 @@ SBTCVM Bench v0.3.0 -9460,-29 -9460,-29 -9460,1 --9841,-9606 --9100,2 --9600,-9477 -9459,100 -9460,-104 -9460,-103 @@ -9589,30 +9589,33 @@ SBTCVM Bench v0.3.0 -9460,-77 -9460,-80 -9460,-77 --9460,-41 +-9460,-32 -9460,-95 --9460,-118 --9460,-107 --9460,-103 --9460,-29 --9460,-121 --9460,-106 --9460,-106 -9460,-95 +-9460,-119 +-9460,-121 -9460,-108 --9460,-107 +-9460,-33 -9460,-102 -9460,-95 --9460,-116 --9460,-107 +-9460,-104 -9460,-101 -9460,-108 +-9460,-95 -9460,-118 --9460,-41 +-9460,-107 +-9460,-103 +-9460,-29 +-9460,-121 +-9460,-106 +-9460,-106 -9460,1 -9100,0 -9596,0 --9460,-76 +-9841,-9556 +-9100,2 +-9600,-9477 +-9460,-103 -9460,-102 -9460,-121 -9460,-104 @@ -9636,9 +9639,6 @@ SBTCVM Bench v0.3.0 -9460,-29 -9460,-29 -9460,1 --9841,-9532 --9100,2 --9600,-9477 -9459,100 -9460,-104 -9460,-103 @@ -9667,7 +9667,18 @@ SBTCVM Bench v0.3.0 -9460,-77 -9460,-80 -9460,-77 --9460,-41 +-9460,-32 +-9460,-95 +-9460,-95 +-9460,-119 +-9460,-121 +-9460,-108 +-9460,-33 +-9460,-102 +-9460,-95 +-9460,-104 +-9460,-101 +-9460,-108 -9460,-95 -9460,-119 -9460,-104 @@ -9680,17 +9691,6 @@ SBTCVM Bench v0.3.0 -9460,-121 -9460,-106 -9460,-106 --9460,-95 --9460,-108 --9460,-107 --9460,-102 --9460,-95 --9460,-116 --9460,-107 --9460,-101 --9460,-108 --9460,-118 --9460,-41 -9460,1 -9100,0 -9596,0 @@ -9745,21 +9745,21 @@ SBTCVM Bench v0.3.0 -9496,-7352 -9841,-90 -9496,-7352 --9841,-7261 +-9841,-7176 -9496,-7356 -9841,-9421 -9100,2 -9600,-7341 -9841,-58 -9496,-7352 --9841,-7229 +-9841,-7144 -9496,-7356 -9841,-9414 -9100,2 -9600,-7341 -9841,-26 -9496,-7352 --9841,-7165 +-9841,-7080 -9496,-7356 -9841,-9407 -9100,2 @@ -11910,7 +11910,92 @@ SBTCVM Bench v0.3.0 -9600,-7298 -9459,1 -9457,5 -0,-7230 +-9459,1 +-9457,5 +-9460,-104 +-9460,-117 +-9460,-110 +-9460,-107 +-9460,-121 +-9460,-118 +-9460,-95 +-9460,-118 +-9460,-117 +-9460,-103 +-9460,-111 +-9460,-102 +-9460,-107 +-9460,-106 +-9460,-29 +-9460,-121 +-9460,-106 +-9460,-106 +-9460,-29 +-9460,-29 +-9460,-29 +-9460,1 +-9841,-7234 +-9100,2 +-9600,-7205 +-9460,-90 +-9460,-77 +-9460,-77 +-9460,-80 +-9460,-77 +-9460,-32 +-9460,-95 +-9460,-77 +-9460,-94 +-9460,-82 +-9460,-95 +-9460,-103 +-9460,-102 +-9460,-121 +-9460,-102 +-9460,-117 +-9460,-95 +-9460,-108 +-9460,-107 +-9460,-102 +-9460,-95 +-9460,-116 +-9460,-107 +-9460,-101 +-9460,-108 +-9460,-118 +-9460,-29 +-9460,1 +-9000,0 +-9459,100 +-9460,-104 +-9460,-103 +-9460,-102 +-9460,-110 +-9460,-118 +-9460,-95 +-9460,-65 +-9460,-95 +-9460,-118 +-9460,-117 +-9460,-103 +-9460,-111 +-9460,-102 +-9460,-107 +-9460,-106 +-9460,-29 +-9460,-120 +-9460,-121 +-9460,-119 +-9460,-111 +-9460,-29 +-9460,-102 +-9460,-104 +-9460,-113 +-9460,1 +-9459,1 +-9100,0 +-9596,0 +0,-7145 8,-7555 -1,0 3,-7557 @@ -11942,7 +12027,7 @@ SBTCVM Bench v0.3.0 8,-9756 -1,0 0,0 -0,-7166 +0,-7081 1,9084 0,-9841 0,9084 @@ -12006,7 +12091,7 @@ SBTCVM Bench v0.3.0 0,-9841 -1,0 0,0 -0,-7134 +0,-7049 8,-9841 -1,0 0,-9841 @@ -12241,6 +12326,7 @@ SBTCVM Bench v0.3.0 0,1 0,0 0,13 +0,2 -9500,-9835 -9492,526 -9459,701 @@ -12250,35 +12336,37 @@ SBTCVM Bench v0.3.0 -9460,-80 -9460,1 -9459,1 --9841,-9822 +-9841,-9821 -9100,2 --9600,-9490 +-9600,-9487 -9841,1 --9496,-9711 +-9496,-9708 -9841,2 --9496,-9710 +-9496,-9707 -9841,-90 --9496,-9708 +-9496,-9705 -9841,-121 +-9496,-9706 +-9841,-6767 -9496,-9709 --9841,-6772 --9496,-9712 --9841,-9809 +-9841,-9808 -9100,2 --9600,-9697 +-9600,-9694 -9841,1 --9496,-9711 --9496,-9710 --9841,72 -9496,-9708 --9841,-7572 --9496,-9712 --9841,-9799 +-9496,-9707 +-9841,72 +-9496,-9705 +-9841,-7567 +-9496,-9709 +-9841,-9798 -9100,2 --9600,-9697 --9841,-9796 +-9600,-9694 +-9500,-9834 +-9492,1100 +-9841,-9793 -9100,2 --9600,-9518 +-9600,-9515 -9460,-76 -9460,-102 -9460,-121 @@ -12378,84 +12466,84 @@ SBTCVM Bench v0.3.0 0,0 0,0 0,1 --9500,-9709 --9496,-9701 --9500,-9708 --9496,-9700 --9500,-9708 +-9500,-9706 +-9496,-9698 +-9500,-9705 +-9496,-9697 +-9500,-9705 -9492,502 --9500,-9709 +-9500,-9706 -9492,501 --9500,-9711 --9496,-9637 --9500,-9710 --9496,-9626 --9500,-9711 --9499,-9698 +-9500,-9708 +-9496,-9634 +-9500,-9707 +-9496,-9623 +-9500,-9708 +-9499,-9695 -9800,0 --9496,-9703 --9500,-9710 --9499,-9698 +-9496,-9700 +-9500,-9707 +-9499,-9695 -9800,0 --9496,-9702 --9500,-9703 +-9496,-9699 +-9500,-9700 -9492,509 --9500,-9702 +-9500,-9699 -9492,510 -9841,0 --9496,-9705 --9500,-9712 --9496,-9707 --9500,-9707 --9496,-9667 +-9496,-9702 +-9500,-9709 +-9496,-9704 +-9500,-9704 +-9496,-9664 -9500,0 --9496,-9706 --9500,-9706 --9499,-9698 +-9496,-9703 +-9500,-9703 +-9499,-9695 -9796,0 --9496,-9706 --9500,-9707 --9499,-9698 +-9496,-9703 +-9500,-9704 +-9499,-9695 -9800,0 --9496,-9707 --9500,-9707 --9496,-9699 --9600,-9646 --9500,-9699 +-9496,-9704 +-9500,-9704 +-9496,-9696 +-9600,-9643 +-9500,-9696 -9798,1 --9496,-9699 --9499,-9706 --9598,-9655 --9599,-9655 +-9496,-9696 +-9499,-9703 +-9598,-9652 +-9599,-9652 -9100,0 -9596,0 --9500,-9699 --9496,-9643 --9496,-9641 +-9500,-9696 +-9496,-9640 +-9496,-9638 -9500,0 -9492,505 -9498,0 -9840,-1 --9599,-9627 +-9599,-9624 -9798,1 -9790,0 -9798,1 -9492,509 -9794,1 -9492,508 --9499,-9701 +-9499,-9698 -9799,0 --9495,-9701 +-9495,-9698 -9491,501 --9600,-9654 --9500,-9700 +-9600,-9651 +-9500,-9697 -9798,0 --9496,-9700 +-9496,-9697 -9492,502 --9500,-9709 --9496,-9701 +-9500,-9706 +-9496,-9698 -9492,501 --9600,-9654 +-9600,-9651 -9459,1 -9457,5 0,-100 @@ -12477,36 +12565,36 @@ SBTCVM Bench v0.3.0 0,0 0,0 0,1 --9500,-9617 +-9500,-9614 -9492,1 --9500,-9616 +-9500,-9613 -9492,1 --9500,-9615 +-9500,-9612 -9492,1 --9500,-9614 +-9500,-9611 -9492,1 --9500,-9615 +-9500,-9612 -9492,1 --9500,-9613 +-9500,-9610 -9492,1 -9100,0 -9596,0 --9500,-9605 +-9500,-9602 -9492,527 --9500,-9604 +-9500,-9601 -9492,526 --9500,-9612 +-9500,-9609 -9492,505 -9490,303 -9492,501 -9492,503 -9840,2 -9799,0 --9495,-9607 +-9495,-9604 -9840,6 -9799,0 -9491,522 --9495,-9610 +-9495,-9607 -9490,304 -9492,502 -9840,8 @@ -12515,63 +12603,63 @@ SBTCVM Bench v0.3.0 -9840,6 -9799,0 -9491,523 --9495,-9609 -9495,-9606 +-9495,-9603 -9492,524 --9500,-9611 +-9500,-9608 -9492,505 -9492,506 --9500,-9610 +-9500,-9607 -9492,503 --9500,-9609 +-9500,-9606 -9492,504 -9492,506 --9500,-9612 +-9500,-9609 -9492,505 --9500,-9607 +-9500,-9604 -9492,501 --9500,-9606 --9492,502 -9500,-9603 +-9492,502 +-9500,-9600 -9492,509 --9500,-9602 +-9500,-9599 -9492,510 -9492,508 --9500,-9601 +-9500,-9598 -9492,525 --9500,-9601 +-9500,-9598 -9492,527 --9841,-9531 +-9841,-9528 -9100,2 --9600,-9529 +-9600,-9526 -9100,0 -9596,0 -9492,520 -9490,521 --9496,-9608 --9500,-9608 --9499,-9601 --9597,-9521 --9600,-9522 --9600,-9520 --9600,-9528 +-9496,-9605 +-9500,-9605 +-9499,-9598 +-9597,-9518 +-9600,-9519 +-9600,-9517 +-9600,-9525 -9100,0 -9596,0 --9500,-9601 +-9500,-9598 -9492,527 --9500,-9604 +-9500,-9601 -9492,525 --9841,-9511 +-9841,-9508 -9100,2 --9600,-9584 +-9600,-9581 -9490,300 --9496,-9600 --9500,-9600 --9499,-9599 --9599,-9505 --9600,-9504 --9600,-9503 --9600,-9514 +-9496,-9597 +-9500,-9597 +-9499,-9596 +-9599,-9502 +-9600,-9501 +-9600,-9500 +-9600,-9511 -9100,0 -9596,0 -9459,1 @@ -12585,52 +12673,52 @@ SBTCVM Bench v0.3.0 0,-99 0,3 0,1 --9500,-9498 +-9500,-9495 -9492,501 --9500,-9497 +-9500,-9494 -9492,509 --9500,-9496 +-9500,-9493 -9492,505 --9500,-9498 --9492,502 -9500,-9495 +-9492,502 +-9500,-9492 -9492,510 -9492,508 --9500,-9494 +-9500,-9491 -9492,505 --9500,-9493 +-9500,-9490 -9492,502 --9500,-9492 +-9500,-9489 -9492,510 -9492,508 -9841,3 --9496,-7706 --9496,-7705 +-9496,-7703 +-9496,-7702 -9841,-120 +-9496,-7701 +-9496,-7700 +-9841,-7611 -9496,-7704 --9496,-7703 --9841,-7614 --9496,-7707 --9841,-9461 +-9841,-9458 -9100,2 --9600,-7692 --9500,-9499 --9499,-9491 --9599,-9456 --9600,-9457 --9600,-9444 +-9600,-7689 +-9500,-9496 +-9499,-9488 +-9599,-9453 +-9600,-9454 +-9600,-9441 -9841,-9841 --9496,-9434 +-9496,-9431 -9841,-90 --9496,-9440 +-9496,-9437 -9841,-118 --9496,-9439 --9841,-9447 --9100,2 --9600,-9352 +-9496,-9436 -9841,-9444 -9100,2 --9600,-9348 +-9600,-9349 +-9841,-9441 +-9100,2 +-9600,-9345 -9100,0 -9596,0 -9459,1 @@ -12723,229 +12811,229 @@ SBTCVM Bench v0.3.0 0,13 0,14 0,15 --9500,-9440 --9496,-9432 +-9500,-9437 +-9496,-9429 -9100,0 -9596,0 --9500,-9437 +-9500,-9434 -9790,2 --9496,-9422 --9500,-9438 +-9496,-9419 +-9500,-9435 -9790,2 --9496,-9421 +-9496,-9418 -9490,702 --9496,-9423 +-9496,-9420 -9841,0 --9496,-9431 --9500,-9423 --9499,-9420 --9599,-9334 --9600,-9332 +-9496,-9428 +-9500,-9420 +-9499,-9417 +-9599,-9331 +-9600,-9329 -9100,0 -9596,0 --9500,-9423 --9499,-9419 --9599,-9328 --9600,-9325 --9841,-9325 +-9500,-9420 +-9499,-9416 +-9599,-9325 +-9600,-9322 +-9841,-9322 -9100,2 --9600,-8137 --9500,-9423 --9499,-9419 --9599,-9321 --9600,-9320 --9600,-9342 --9500,-9423 --9499,-9418 --9599,-9316 --9600,-9314 --9841,-9314 --9600,-9134 --9500,-9423 --9499,-9417 --9597,-9310 --9600,-9308 --9841,-9308 --9600,-9281 --9500,-9423 +-9600,-8134 +-9500,-9420 -9499,-9416 --9597,-9304 --9600,-9302 --9841,-9302 --9600,-9286 --9500,-9423 --9499,-9418 --9597,-9298 --9600,-9296 --9841,-9296 --9600,-9291 +-9599,-9318 +-9600,-9317 +-9600,-9339 +-9500,-9420 +-9499,-9415 +-9599,-9313 +-9600,-9311 +-9841,-9311 +-9600,-9131 +-9500,-9420 +-9499,-9414 +-9597,-9307 +-9600,-9305 +-9841,-9305 +-9600,-9278 +-9500,-9420 +-9499,-9413 +-9597,-9301 +-9600,-9299 +-9841,-9299 +-9600,-9283 +-9500,-9420 +-9499,-9415 +-9597,-9295 +-9600,-9293 +-9841,-9293 +-9600,-9288 -9841,123 --9499,-9423 +-9499,-9420 -9800,0 --9496,-9431 --9600,-9137 +-9496,-9428 +-9600,-9134 -9841,96 --9499,-9423 +-9499,-9420 -9800,0 --9496,-9431 --9600,-9137 +-9496,-9428 +-9600,-9134 -9841,95 --9499,-9423 +-9499,-9420 -9800,0 --9496,-9431 --9600,-9137 --9500,-9423 --9499,-9415 --9599,-9277 --9600,-9275 --9500,-9414 --9496,-9431 --9500,-9423 --9499,-9413 --9599,-9271 --9600,-9269 --9500,-9412 --9496,-9431 --9500,-9423 --9499,-9411 --9599,-9265 --9600,-9263 --9500,-9410 --9496,-9431 --9500,-9423 --9499,-9409 --9599,-9259 --9600,-9257 --9500,-9408 --9496,-9431 --9500,-9423 --9499,-9407 --9599,-9253 --9600,-9251 --9500,-9406 --9496,-9431 --9500,-9423 --9499,-9405 --9599,-9247 --9600,-9245 --9500,-9404 --9496,-9431 --9500,-9423 --9499,-9403 --9599,-9241 --9600,-9239 --9500,-9402 --9496,-9431 --9500,-9423 --9499,-9401 --9599,-9235 --9600,-9233 --9500,-9400 --9496,-9431 --9500,-9423 --9499,-9399 --9599,-9229 --9600,-9227 --9500,-9398 --9496,-9431 --9500,-9423 --9499,-9397 --9599,-9223 --9600,-9221 --9500,-9396 --9496,-9431 --9500,-9423 --9499,-9395 --9599,-9217 --9600,-9215 --9500,-9394 --9496,-9431 --9500,-9423 --9499,-9393 --9599,-9211 --9600,-9209 --9500,-9392 --9496,-9431 --9500,-9423 --9499,-9391 --9599,-9205 --9600,-9203 --9500,-9390 --9496,-9431 --9500,-9423 --9499,-9389 --9599,-9199 --9600,-9197 --9500,-9388 --9496,-9431 --9500,-9423 --9499,-9387 --9599,-9193 --9600,-9191 --9500,-9386 --9496,-9431 --9500,-9423 --9499,-9385 --9599,-9187 --9600,-9185 --9500,-9384 --9496,-9431 --9500,-9423 --9499,-9383 --9599,-9181 --9600,-9179 --9500,-9382 --9496,-9431 --9500,-9423 --9499,-9381 --9599,-9175 --9600,-9173 --9500,-9380 --9496,-9431 --9500,-9423 --9499,-9379 --9599,-9169 --9600,-9167 --9500,-9378 --9496,-9431 --9500,-9423 --9499,-9377 --9599,-9163 --9600,-9161 --9500,-9376 --9496,-9431 --9500,-9423 --9499,-9375 --9599,-9157 --9600,-9155 --9500,-9374 --9496,-9431 --9500,-9423 --9499,-9373 --9599,-9151 --9600,-9149 --9500,-9372 --9496,-9431 --9500,-9423 --9499,-9371 --9599,-9145 --9600,-9143 --9500,-9370 --9496,-9431 --9500,-9423 --9499,-9369 --9599,-9139 --9600,-9137 --9500,-9368 --9496,-9431 --9841,-9134 +-9496,-9428 +-9600,-9134 +-9500,-9420 +-9499,-9412 +-9599,-9274 +-9600,-9272 +-9500,-9411 +-9496,-9428 +-9500,-9420 +-9499,-9410 +-9599,-9268 +-9600,-9266 +-9500,-9409 +-9496,-9428 +-9500,-9420 +-9499,-9408 +-9599,-9262 +-9600,-9260 +-9500,-9407 +-9496,-9428 +-9500,-9420 +-9499,-9406 +-9599,-9256 +-9600,-9254 +-9500,-9405 +-9496,-9428 +-9500,-9420 +-9499,-9404 +-9599,-9250 +-9600,-9248 +-9500,-9403 +-9496,-9428 +-9500,-9420 +-9499,-9402 +-9599,-9244 +-9600,-9242 +-9500,-9401 +-9496,-9428 +-9500,-9420 +-9499,-9400 +-9599,-9238 +-9600,-9236 +-9500,-9399 +-9496,-9428 +-9500,-9420 +-9499,-9398 +-9599,-9232 +-9600,-9230 +-9500,-9397 +-9496,-9428 +-9500,-9420 +-9499,-9396 +-9599,-9226 +-9600,-9224 +-9500,-9395 +-9496,-9428 +-9500,-9420 +-9499,-9394 +-9599,-9220 +-9600,-9218 +-9500,-9393 +-9496,-9428 +-9500,-9420 +-9499,-9392 +-9599,-9214 +-9600,-9212 +-9500,-9391 +-9496,-9428 +-9500,-9420 +-9499,-9390 +-9599,-9208 +-9600,-9206 +-9500,-9389 +-9496,-9428 +-9500,-9420 +-9499,-9388 +-9599,-9202 +-9600,-9200 +-9500,-9387 +-9496,-9428 +-9500,-9420 +-9499,-9386 +-9599,-9196 +-9600,-9194 +-9500,-9385 +-9496,-9428 +-9500,-9420 +-9499,-9384 +-9599,-9190 +-9600,-9188 +-9500,-9383 +-9496,-9428 +-9500,-9420 +-9499,-9382 +-9599,-9184 +-9600,-9182 +-9500,-9381 +-9496,-9428 +-9500,-9420 +-9499,-9380 +-9599,-9178 +-9600,-9176 +-9500,-9379 +-9496,-9428 +-9500,-9420 +-9499,-9378 +-9599,-9172 +-9600,-9170 +-9500,-9377 +-9496,-9428 +-9500,-9420 +-9499,-9376 +-9599,-9166 +-9600,-9164 +-9500,-9375 +-9496,-9428 +-9500,-9420 +-9499,-9374 +-9599,-9160 +-9600,-9158 +-9500,-9373 +-9496,-9428 +-9500,-9420 +-9499,-9372 +-9599,-9154 +-9600,-9152 +-9500,-9371 +-9496,-9428 +-9500,-9420 +-9499,-9370 +-9599,-9148 +-9600,-9146 +-9500,-9369 +-9496,-9428 +-9500,-9420 +-9499,-9368 +-9599,-9142 +-9600,-9140 +-9500,-9367 +-9496,-9428 +-9500,-9420 +-9499,-9366 +-9599,-9136 +-9600,-9134 +-9500,-9365 +-9496,-9428 +-9841,-9131 -9100,2 --9600,-8129 --9500,-9432 --9499,-9435 +-9600,-8126 +-9500,-9429 +-9499,-9432 -9800,0 --9496,-9432 --9600,-9342 +-9496,-9429 +-9600,-9339 0,1 0,1 0,1 @@ -13938,428 +14026,428 @@ SBTCVM Bench v0.3.0 0,0 0,0 0,1 --9500,-9440 --9496,-9432 --9500,-9439 --9499,-9436 +-9500,-9437 +-9496,-9429 +-9500,-9436 +-9499,-9433 -9800,0 --9496,-9439 +-9496,-9436 -9100,0 -9596,0 --9500,-9434 --9492,505 -9500,-9431 +-9492,505 +-9500,-9428 -9790,16 --9499,-9420 +-9499,-9417 -9800,0 --9798,-9129 --9496,-8121 +-9798,-9126 +-9496,-8118 -9500,0 --9496,-9430 --9500,-9430 --9499,-9367 --9599,-8114 --9600,-8115 --9600,-8102 --9500,-9432 +-9496,-9427 +-9500,-9427 +-9499,-9364 +-9599,-8111 +-9600,-8112 +-9600,-8099 +-9500,-9429 -9492,501 -9492,503 --9500,-9439 --9499,-9421 +-9500,-9436 +-9499,-9418 -9800,0 -9492,504 --9500,-9439 --9499,-9438 +-9500,-9436 +-9499,-9435 -9800,0 -9492,502 -9492,506 --9500,-9431 +-9500,-9428 -9790,16 --9499,-9419 +-9499,-9416 -9800,0 --9798,-9129 --9496,-8096 +-9798,-9126 +-9496,-8093 -9500,0 --9496,-9430 --9500,-9430 --9499,-9367 --9599,-8089 --9600,-8090 --9600,-8079 --9500,-9432 +-9496,-9427 +-9500,-9427 +-9499,-9364 +-9599,-8086 +-9600,-8087 +-9600,-8076 +-9500,-9429 -9492,501 -9492,503 --9500,-9439 +-9500,-9436 -9492,502 --9500,-9439 --9499,-9438 +-9500,-9436 +-9499,-9435 -9800,0 -9492,504 -9492,506 --9500,-9431 +-9500,-9428 -9790,16 --9499,-9366 +-9499,-9363 -9800,0 --9798,-9129 --9496,-8073 +-9798,-9126 +-9496,-8070 -9500,0 --9496,-9430 --9500,-9430 --9499,-9367 --9599,-8066 --9600,-8067 --9600,-8056 --9500,-9432 +-9496,-9427 +-9500,-9427 +-9499,-9364 +-9599,-8063 +-9600,-8064 +-9600,-8053 +-9500,-9429 -9492,501 --9500,-9439 +-9500,-9436 -9492,502 -9492,504 --9500,-9432 --9499,-9437 +-9500,-9429 +-9499,-9434 -9800,0 -9492,503 -9492,506 --9500,-9431 +-9500,-9428 -9790,16 --9499,-9365 +-9499,-9362 -9800,0 --9798,-9129 --9496,-8050 +-9798,-9126 +-9496,-8047 -9500,0 --9496,-9430 --9500,-9430 --9499,-9367 --9599,-8043 --9600,-8044 --9600,-8031 --9500,-9432 --9499,-9437 +-9496,-9427 +-9500,-9427 +-9499,-9364 +-9599,-8040 +-9600,-8041 +-9600,-8028 +-9500,-9429 +-9499,-9434 -9800,0 -9492,501 --9500,-9439 +-9500,-9436 -9492,502 -9492,504 --9500,-9432 --9499,-9422 +-9500,-9429 +-9499,-9419 -9800,0 -9492,503 -9492,506 --9500,-9431 +-9500,-9428 -9790,16 --9499,-9364 +-9499,-9361 -9800,0 --9798,-9129 --9496,-8025 +-9798,-9126 +-9496,-8022 -9500,0 --9496,-9430 --9500,-9430 --9499,-9367 --9599,-8018 --9600,-8019 --9600,-8006 --9500,-9432 --9499,-9422 +-9496,-9427 +-9500,-9427 +-9499,-9364 +-9599,-8015 +-9600,-8016 +-9600,-8003 +-9500,-9429 +-9499,-9419 -9800,0 -9492,501 -9492,503 --9500,-9439 +-9500,-9436 -9492,502 --9500,-9439 --9499,-9438 +-9500,-9436 +-9499,-9435 -9800,0 -9492,504 -9492,506 --9500,-9431 +-9500,-9428 -9790,16 --9499,-9363 +-9499,-9360 -9800,0 --9798,-9129 --9496,-8000 +-9798,-9126 +-9496,-7997 -9500,0 --9496,-9430 --9500,-9430 --9499,-9367 --9599,-7993 --9600,-7994 --9600,-7979 --9500,-9432 --9499,-9422 +-9496,-9427 +-9500,-9427 +-9499,-9364 +-9599,-7990 +-9600,-7991 +-9600,-7976 +-9500,-9429 +-9499,-9419 -9800,0 -9492,501 -9492,503 --9500,-9439 --9499,-9421 +-9500,-9436 +-9499,-9418 -9800,0 -9492,504 --9500,-9439 --9499,-9438 +-9500,-9436 +-9499,-9435 -9800,0 -9492,502 -9492,506 --9500,-9431 +-9500,-9428 -9790,16 --9499,-9362 +-9499,-9359 -9800,0 --9798,-9129 --9496,-7973 +-9798,-9126 +-9496,-7970 -9500,0 --9496,-9430 --9500,-9430 --9499,-9367 --9599,-7966 --9600,-7967 --9600,-7952 --9500,-9432 --9499,-9422 +-9496,-9427 +-9500,-9427 +-9499,-9364 +-9599,-7963 +-9600,-7964 +-9600,-7949 +-9500,-9429 +-9499,-9419 -9800,0 -9492,501 --9500,-9439 --9499,-9421 +-9500,-9436 +-9499,-9418 -9800,0 -9492,502 -9492,504 --9500,-9432 --9499,-9437 +-9500,-9429 +-9499,-9434 -9800,0 -9492,503 -9492,506 --9500,-9431 +-9500,-9428 -9790,16 --9499,-9361 +-9499,-9358 -9800,0 --9798,-9129 --9496,-7946 +-9798,-9126 +-9496,-7943 -9500,0 --9496,-9430 --9500,-9430 --9499,-9367 --9599,-7939 --9600,-7940 --9600,-7927 --9500,-9432 --9499,-9437 +-9496,-9427 +-9500,-9427 +-9499,-9364 +-9599,-7936 +-9600,-7937 +-9600,-7924 +-9500,-9429 +-9499,-9434 -9800,0 -9492,501 --9500,-9439 --9499,-9421 +-9500,-9436 +-9499,-9418 -9800,0 -9492,502 -9492,504 --9500,-9432 +-9500,-9429 -9492,503 -9492,506 --9500,-9431 +-9500,-9428 -9790,16 --9499,-9360 +-9499,-9357 -9800,0 --9798,-9129 --9496,-7921 +-9798,-9126 +-9496,-7918 -9500,0 --9496,-9430 --9500,-9430 --9499,-9367 --9599,-7914 --9600,-7915 --9600,-7901 --9500,-9432 +-9496,-9427 +-9500,-9427 +-9499,-9364 +-9599,-7911 +-9600,-7912 +-9600,-7898 +-9500,-9429 -9492,501 --9500,-9439 +-9500,-9436 -9492,502 --9500,-9432 --9499,-9437 +-9500,-9429 +-9499,-9434 -9800,0 -9492,503 --9500,-9439 --9499,-9438 +-9500,-9436 +-9499,-9435 -9800,0 -9492,504 -9492,506 --9500,-9431 +-9500,-9428 -9790,16 --9499,-9359 +-9499,-9356 -9800,0 --9798,-9129 --9496,-7895 +-9798,-9126 +-9496,-7892 -9500,0 --9496,-9430 --9500,-9430 --9499,-9367 --9599,-7888 --9600,-7889 --9600,-7876 --9500,-9439 +-9496,-9427 +-9500,-9427 +-9499,-9364 +-9599,-7885 +-9600,-7886 +-9600,-7873 +-9500,-9436 -9492,502 --9500,-9432 --9499,-9437 +-9500,-9429 +-9499,-9434 -9800,0 -9492,501 -9492,503 --9500,-9439 --9499,-9438 +-9500,-9436 +-9499,-9435 -9800,0 -9492,504 -9492,506 --9500,-9431 +-9500,-9428 -9790,16 --9499,-9358 +-9499,-9355 -9800,0 --9798,-9129 --9496,-7870 +-9798,-9126 +-9496,-7867 -9500,0 --9496,-9430 --9500,-9430 --9499,-9367 --9599,-7863 --9600,-7864 --9600,-7848 --9500,-9432 --9499,-9422 +-9496,-9427 +-9500,-9427 +-9499,-9364 +-9599,-7860 +-9600,-7861 +-9600,-7845 +-9500,-9429 +-9499,-9419 -9800,0 -9492,501 --9500,-9439 +-9500,-9436 -9492,502 --9500,-9432 --9499,-9437 +-9500,-9429 +-9499,-9434 -9800,0 -9492,503 --9500,-9439 --9499,-9438 +-9500,-9436 +-9499,-9435 -9800,0 -9492,504 -9492,506 --9500,-9431 +-9500,-9428 -9790,16 --9499,-9357 +-9499,-9354 -9800,0 --9798,-9129 --9496,-7842 +-9798,-9126 +-9496,-7839 -9500,0 --9496,-9430 --9500,-9430 --9499,-9367 --9599,-7835 --9600,-7836 --9600,-7821 --9500,-9432 --9499,-9422 +-9496,-9427 +-9500,-9427 +-9499,-9364 +-9599,-7832 +-9600,-7833 +-9600,-7818 +-9500,-9429 +-9499,-9419 -9800,0 -9492,501 --9500,-9439 --9499,-9438 +-9500,-9436 +-9499,-9435 -9800,0 -9492,502 -9492,504 --9500,-9432 --9499,-9437 +-9500,-9429 +-9499,-9434 -9800,0 -9492,503 -9492,506 --9500,-9431 +-9500,-9428 -9790,16 --9499,-9356 +-9499,-9353 -9800,0 --9798,-9129 --9496,-7815 +-9798,-9126 +-9496,-7812 -9500,0 --9496,-9430 --9500,-9430 --9499,-9367 --9599,-7808 --9600,-7809 --9600,-7791 --9500,-9432 --9499,-9422 +-9496,-9427 +-9500,-9427 +-9499,-9364 +-9599,-7805 +-9600,-7806 +-9600,-7788 +-9500,-9429 +-9499,-9419 -9800,0 -9492,501 --9500,-9439 --9499,-9421 +-9500,-9436 +-9499,-9418 -9800,0 -9492,502 --9500,-9432 --9499,-9437 +-9500,-9429 +-9499,-9434 -9800,0 -9492,503 --9500,-9439 --9499,-9438 +-9500,-9436 +-9499,-9435 -9800,0 -9492,504 -9492,506 --9500,-9431 +-9500,-9428 -9790,16 --9499,-9355 +-9499,-9352 -9800,0 --9798,-9129 --9496,-7785 +-9798,-9126 +-9496,-7782 -9500,0 --9496,-9430 --9500,-9430 --9499,-9367 --9599,-7778 --9600,-7779 --9600,-7764 --9500,-9439 --9499,-9421 +-9496,-9427 +-9500,-9427 +-9499,-9364 +-9599,-7775 +-9600,-7776 +-9600,-7761 +-9500,-9436 +-9499,-9418 -9800,0 -9492,502 --9500,-9432 --9499,-9437 +-9500,-9429 +-9499,-9434 -9800,0 -9492,501 -9492,503 --9500,-9439 --9499,-9438 +-9500,-9436 +-9499,-9435 -9800,0 -9492,504 -9492,506 --9500,-9431 +-9500,-9428 -9790,16 --9499,-9354 +-9499,-9351 -9800,0 --9798,-9129 --9496,-7758 +-9798,-9126 +-9496,-7755 -9500,0 --9496,-9430 --9500,-9430 --9499,-9367 --9599,-7751 --9600,-7752 --9600,-7736 --9500,-9432 +-9496,-9427 +-9500,-9427 +-9499,-9364 +-9599,-7748 +-9600,-7749 +-9600,-7733 +-9500,-9429 -9492,501 --9500,-9439 --9499,-9421 +-9500,-9436 +-9499,-9418 -9800,0 -9492,502 --9500,-9432 --9499,-9437 +-9500,-9429 +-9499,-9434 -9800,0 -9492,503 --9500,-9439 --9499,-9438 +-9500,-9436 +-9499,-9435 -9800,0 -9492,504 -9492,506 --9500,-9431 +-9500,-9428 -9790,16 --9499,-9353 +-9499,-9350 -9800,0 --9798,-9129 --9496,-7730 +-9798,-9126 +-9496,-7727 -9500,0 --9496,-9430 --9500,-9430 --9499,-9367 --9599,-7723 --9600,-7724 --9600,-7711 --9500,-9432 +-9496,-9427 +-9500,-9427 +-9499,-9364 +-9599,-7720 +-9600,-7721 +-9600,-7708 +-9500,-9429 -9492,501 --9500,-9432 --9499,-9437 +-9500,-9429 +-9499,-9434 -9800,0 -9492,503 --9500,-9439 --9499,-9438 +-9500,-9436 +-9499,-9435 -9800,0 -9492,502 -9492,504 @@ -14383,85 +14471,85 @@ SBTCVM Bench v0.3.0 0,0 0,0 0,1 --9500,-7704 --9496,-7696 --9500,-7703 --9496,-7695 --9500,-7703 +-9500,-7701 +-9496,-7693 +-9500,-7700 +-9496,-7692 +-9500,-7700 -9492,502 --9500,-7704 +-9500,-7701 -9492,501 --9500,-7706 --9496,-7632 --9500,-7705 --9496,-7621 --9500,-7706 --9499,-7693 +-9500,-7703 +-9496,-7629 +-9500,-7702 +-9496,-7618 +-9500,-7703 +-9499,-7690 -9800,0 --9496,-7698 --9500,-7705 --9499,-7693 +-9496,-7695 +-9500,-7702 +-9499,-7690 -9800,0 --9496,-7697 --9500,-7698 +-9496,-7694 +-9500,-7695 -9492,509 --9500,-7697 +-9500,-7694 -9492,510 -9841,0 --9496,-7700 --9500,-7707 --9496,-7702 --9500,-7702 --9496,-7662 +-9496,-7697 +-9500,-7704 +-9496,-7699 +-9500,-7699 +-9496,-7659 -9500,0 --9496,-7701 --9500,-7701 --9499,-7693 +-9496,-7698 +-9500,-7698 +-9499,-7690 -9796,0 --9496,-7701 --9500,-7702 --9499,-7693 --9800,0 --9496,-7702 --9500,-7702 --9496,-7694 --9600,-7641 --9500,-7694 +-9496,-7698 +-9500,-7699 +-9499,-7690 +-9800,0 +-9496,-7699 +-9500,-7699 +-9496,-7691 +-9600,-7638 +-9500,-7691 -9798,1 --9496,-7694 --9499,-7701 --9598,-7650 --9599,-7650 +-9496,-7691 +-9499,-7698 +-9598,-7647 +-9599,-7647 -9100,0 -9596,0 --9500,-7694 --9496,-7638 --9496,-7636 +-9500,-7691 +-9496,-7635 +-9496,-7633 -9500,0 -9492,505 -9498,0 -9840,-1 --9599,-7622 +-9599,-7619 -9798,1 -9790,0 -9798,1 -9492,509 -9794,1 -9492,508 --9499,-7696 +-9499,-7693 -9799,0 --9495,-7696 +-9495,-7693 -9491,501 --9600,-7649 --9500,-7695 +-9600,-7646 +-9500,-7692 -9798,0 --9496,-7695 +-9496,-7692 -9492,502 --9500,-7704 --9496,-7696 +-9500,-7701 +-9496,-7693 -9492,501 --9600,-7649 -0,-7573 +-9600,-7646 +0,-7570 0,9841 0,-1502 6,9841 @@ -14503,7 +14591,9 @@ SBTCVM Bench v0.3.0 1,-5356 -1,0 0,0 -0,-6773 +-9459,1 +-9457,5 +0,-6768 7,5883 1,365 25,5883 @@ -15303,7 +15393,7 @@ SBTCVM Bench v0.3.0 239,4397 -1,0 0,0 -0,-4859 +0,-4854 49,5911 192,-9841 -1,0 diff --git a/apps/bench/auto_xas.xas b/apps/bench/auto_xas.xas index 71b703f..c789626 100644 --- a/apps/bench/auto_xas.xas +++ b/apps/bench/auto_xas.xas @@ -6,6 +6,7 @@ stnp --module bench/lib/ui.stnp stnp --module bench/lib/yn_dialog.stnp stnp --module bench/lib/sndkern_lib.stnp +stnp --module bench/lib/bench_lib.stnp xas bench/bench/bench.xas diff --git a/apps/bench/bench/desktop2.stnp b/apps/bench/bench/desktop2.stnp index b80dbb9..d373f48 100644 --- a/apps/bench/bench/desktop2.stnp +++ b/apps/bench/bench/desktop2.stnp @@ -66,29 +66,19 @@ loop end end - - - - label info - prline Starting info.app... gsub backup_self - vdi rstld -1 info.app - prline ERROR! info.app not found! + !b_lib.app_run(info.app) return label dos - prline Starting dos.app... gsub backup_self - vdi rstld -1 dos.app - prline ERROR! dos.app not found! + !b_lib.app_run(dos.app) return label credits - prline Starting credits.app... gsub backup_self - vdi rstld -1 credits.app - prline ERROR! credits.app not found! + !b_lib.app_run(credits.app) return @@ -139,6 +129,7 @@ include bench/lib/common as common include bench/lib/ui as ui include plrle_noalpha as pl include bench/lib/sndkern_lib as sklib +include bench/lib/bench_lib as b_lib asm include;bench/media/info.tas0;ICON_info asm include;bench/media/dos.tas0;ICON_dos asm include;bench/media/credits_icn.tas0;ICON_credits \ No newline at end of file diff --git a/apps/bench/bench/desktop2.trom b/apps/bench/bench/desktop2.trom index 828e057..9849761 100644 --- a/apps/bench/bench/desktop2.trom +++ b/apps/bench/bench/desktop2.trom @@ -137,7 +137,10 @@ -9100,2 -9600,-9559 -9600,-9804 --9460,-76 +-9841,-9699 +-9100,2 +-9600,-9477 +-9460,-103 -9460,-102 -9460,-121 -9460,-104 @@ -158,9 +161,6 @@ -9460,-29 -9460,-29 -9460,1 --9841,-9678 --9100,2 --9600,-9477 -9459,100 -9460,-104 -9460,-103 @@ -186,7 +186,18 @@ -9460,-77 -9460,-80 -9460,-77 --9460,-41 +-9460,-32 +-9460,-95 +-9460,-95 +-9460,-119 +-9460,-121 +-9460,-108 +-9460,-33 +-9460,-102 +-9460,-95 +-9460,-104 +-9460,-101 +-9460,-108 -9460,-95 -9460,-113 -9460,-108 @@ -196,21 +207,13 @@ -9460,-121 -9460,-106 -9460,-106 --9460,-95 --9460,-108 --9460,-107 --9460,-102 --9460,-95 --9460,-116 --9460,-107 --9460,-101 --9460,-108 --9460,-118 --9460,-41 -9460,1 -9100,0 -9596,0 --9460,-76 +-9841,-9626 +-9100,2 +-9600,-9477 +-9460,-103 -9460,-102 -9460,-121 -9460,-104 @@ -230,9 +233,6 @@ -9460,-29 -9460,-29 -9460,1 --9841,-9606 --9100,2 --9600,-9477 -9459,100 -9460,-104 -9460,-103 @@ -257,30 +257,33 @@ -9460,-77 -9460,-80 -9460,-77 --9460,-41 +-9460,-32 -9460,-95 --9460,-118 --9460,-107 --9460,-103 --9460,-29 --9460,-121 --9460,-106 --9460,-106 -9460,-95 +-9460,-119 +-9460,-121 -9460,-108 --9460,-107 +-9460,-33 -9460,-102 -9460,-95 --9460,-116 --9460,-107 +-9460,-104 -9460,-101 -9460,-108 +-9460,-95 -9460,-118 --9460,-41 +-9460,-107 +-9460,-103 +-9460,-29 +-9460,-121 +-9460,-106 +-9460,-106 -9460,1 -9100,0 -9596,0 --9460,-76 +-9841,-9556 +-9100,2 +-9600,-9477 +-9460,-103 -9460,-102 -9460,-121 -9460,-104 @@ -304,9 +307,6 @@ -9460,-29 -9460,-29 -9460,1 --9841,-9532 --9100,2 --9600,-9477 -9459,100 -9460,-104 -9460,-103 @@ -335,7 +335,18 @@ -9460,-77 -9460,-80 -9460,-77 --9460,-41 +-9460,-32 +-9460,-95 +-9460,-95 +-9460,-119 +-9460,-121 +-9460,-108 +-9460,-33 +-9460,-102 +-9460,-95 +-9460,-104 +-9460,-101 +-9460,-108 -9460,-95 -9460,-119 -9460,-104 @@ -348,17 +359,6 @@ -9460,-121 -9460,-106 -9460,-106 --9460,-95 --9460,-108 --9460,-107 --9460,-102 --9460,-95 --9460,-116 --9460,-107 --9460,-101 --9460,-108 --9460,-118 --9460,-41 -9460,1 -9100,0 -9596,0 @@ -413,21 +413,21 @@ -9496,-7352 -9841,-90 -9496,-7352 --9841,-7261 +-9841,-7176 -9496,-7356 -9841,-9421 -9100,2 -9600,-7341 -9841,-58 -9496,-7352 --9841,-7229 +-9841,-7144 -9496,-7356 -9841,-9414 -9100,2 -9600,-7341 -9841,-26 -9496,-7352 --9841,-7165 +-9841,-7080 -9496,-7356 -9841,-9407 -9100,2 @@ -2578,7 +2578,92 @@ -9600,-7298 -9459,1 -9457,5 -0,-7230 +-9459,1 +-9457,5 +-9460,-104 +-9460,-117 +-9460,-110 +-9460,-107 +-9460,-121 +-9460,-118 +-9460,-95 +-9460,-118 +-9460,-117 +-9460,-103 +-9460,-111 +-9460,-102 +-9460,-107 +-9460,-106 +-9460,-29 +-9460,-121 +-9460,-106 +-9460,-106 +-9460,-29 +-9460,-29 +-9460,-29 +-9460,1 +-9841,-7234 +-9100,2 +-9600,-7205 +-9460,-90 +-9460,-77 +-9460,-77 +-9460,-80 +-9460,-77 +-9460,-32 +-9460,-95 +-9460,-77 +-9460,-94 +-9460,-82 +-9460,-95 +-9460,-103 +-9460,-102 +-9460,-121 +-9460,-102 +-9460,-117 +-9460,-95 +-9460,-108 +-9460,-107 +-9460,-102 +-9460,-95 +-9460,-116 +-9460,-107 +-9460,-101 +-9460,-108 +-9460,-118 +-9460,-29 +-9460,1 +-9000,0 +-9459,100 +-9460,-104 +-9460,-103 +-9460,-102 +-9460,-110 +-9460,-118 +-9460,-95 +-9460,-65 +-9460,-95 +-9460,-118 +-9460,-117 +-9460,-103 +-9460,-111 +-9460,-102 +-9460,-107 +-9460,-106 +-9460,-29 +-9460,-120 +-9460,-121 +-9460,-119 +-9460,-111 +-9460,-29 +-9460,-102 +-9460,-104 +-9460,-113 +-9460,1 +-9459,1 +-9100,0 +-9596,0 +0,-7145 8,-7555 -1,0 3,-7557 @@ -2610,7 +2695,7 @@ 8,-9756 -1,0 0,0 -0,-7166 +0,-7081 1,9084 0,-9841 0,9084 @@ -2674,7 +2759,7 @@ 0,-9841 -1,0 0,0 -0,-7134 +0,-7049 8,-9841 -1,0 0,-9841 diff --git a/apps/bench/bench/desktop2__stnp.tasm b/apps/bench/bench/desktop2__stnp.tasm index 4d40d00..42af358 100644 --- a/apps/bench/bench/desktop2__stnp.tasm +++ b/apps/bench/bench/desktop2__stnp.tasm @@ -209,8 +209,13 @@ goto;>flowloop--con-x-2--start zerosize;;flowloop--con-x-2 #label zerosize;;info--label +#goto (extra code stores away return address.) +setreg1;>goto--jumper-70-0 +s1push1 +goto;>backup_self--label +zerosize;;goto--jumper-70-0 #prline -fopwri1;:S +fopwri1;:s fopwri1;:t fopwri1;:a fopwri1;:r @@ -231,11 +236,6 @@ fopwri1;:. fopwri1;:. fopwri1;:. fopwri1;:\n -#goto (extra code stores away return address.) -setreg1;>goto--jumper-75-0 -s1push1 -goto;>backup_self--label -zerosize;;goto--jumper-75-0 #vdi fopset1;>vdi.cli.in fopwri1;:r @@ -263,7 +263,18 @@ fopwri1;:R fopwri1;:R fopwri1;:O fopwri1;:R -fopwri1;:! +fopwri1;:: +fopwri1;:\s +fopwri1;:\s +fopwri1;:c +fopwri1;:a +fopwri1;:n +fopwri1;:' +fopwri1;:t +fopwri1;:\s +fopwri1;:r +fopwri1;:u +fopwri1;:n fopwri1;:\s fopwri1;:i fopwri1;:n @@ -273,25 +284,19 @@ fopwri1;:. fopwri1;:a fopwri1;:p fopwri1;:p -fopwri1;:\s -fopwri1;:n -fopwri1;:o -fopwri1;:t -fopwri1;:\s -fopwri1;:f -fopwri1;:o -fopwri1;:u -fopwri1;:n -fopwri1;:d -fopwri1;:! fopwri1;:\n #return from subroutine. s1pop1 gotoreg1 #label zerosize;;dos--label +#goto (extra code stores away return address.) +setreg1;>goto--jumper-75-0 +s1push1 +goto;>backup_self--label +zerosize;;goto--jumper-75-0 #prline -fopwri1;:S +fopwri1;:s fopwri1;:t fopwri1;:a fopwri1;:r @@ -311,11 +316,6 @@ fopwri1;:. fopwri1;:. fopwri1;:. fopwri1;:\n -#goto (extra code stores away return address.) -setreg1;>goto--jumper-82-0 -s1push1 -goto;>backup_self--label -zerosize;;goto--jumper-82-0 #vdi fopset1;>vdi.cli.in fopwri1;:r @@ -342,34 +342,39 @@ fopwri1;:R fopwri1;:R fopwri1;:O fopwri1;:R -fopwri1;:! +fopwri1;:: fopwri1;:\s -fopwri1;:d -fopwri1;:o -fopwri1;:s -fopwri1;:. -fopwri1;:a -fopwri1;:p -fopwri1;:p fopwri1;:\s +fopwri1;:c +fopwri1;:a fopwri1;:n -fopwri1;:o +fopwri1;:' fopwri1;:t fopwri1;:\s -fopwri1;:f -fopwri1;:o +fopwri1;:r fopwri1;:u fopwri1;:n +fopwri1;:\s fopwri1;:d -fopwri1;:! +fopwri1;:o +fopwri1;:s +fopwri1;:. +fopwri1;:a +fopwri1;:p +fopwri1;:p fopwri1;:\n #return from subroutine. s1pop1 gotoreg1 #label zerosize;;credits--label +#goto (extra code stores away return address.) +setreg1;>goto--jumper-80-0 +s1push1 +goto;>backup_self--label +zerosize;;goto--jumper-80-0 #prline -fopwri1;:S +fopwri1;:s fopwri1;:t fopwri1;:a fopwri1;:r @@ -393,11 +398,6 @@ fopwri1;:. fopwri1;:. fopwri1;:. fopwri1;:\n -#goto (extra code stores away return address.) -setreg1;>goto--jumper-89-0 -s1push1 -goto;>backup_self--label -zerosize;;goto--jumper-89-0 #vdi fopset1;>vdi.cli.in fopwri1;:r @@ -428,7 +428,18 @@ fopwri1;:R fopwri1;:R fopwri1;:O fopwri1;:R -fopwri1;:! +fopwri1;:: +fopwri1;:\s +fopwri1;:\s +fopwri1;:c +fopwri1;:a +fopwri1;:n +fopwri1;:' +fopwri1;:t +fopwri1;:\s +fopwri1;:r +fopwri1;:u +fopwri1;:n fopwri1;:\s fopwri1;:c fopwri1;:r @@ -441,17 +452,6 @@ fopwri1;:. fopwri1;:a fopwri1;:p fopwri1;:p -fopwri1;:\s -fopwri1;:n -fopwri1;:o -fopwri1;:t -fopwri1;:\s -fopwri1;:f -fopwri1;:o -fopwri1;:u -fopwri1;:n -fopwri1;:d -fopwri1;:! fopwri1;:\n #return from subroutine. s1pop1 @@ -504,10 +504,10 @@ fopwri1;:P fopwri1;:\n fopset1;>io.ttywr #goto (extra code stores away return address.) -setreg1;>goto--jumper-101-0 +setreg1;>goto--jumper-91-0 s1push1 goto;>ui.base_draw--label -zerosize;;goto--jumper-101-0 +zerosize;;goto--jumper-91-0 #val (used with set to change variable value during runtime.) setreg1;10x3 #set(1) (used after 2-op math, asm code, or get) @@ -525,61 +525,63 @@ setreg1;10x-90 #set(1) (used after 2-op math, asm code, or get) datawrite1;>pl.posy #___RAW ASSEMBLY CODE___ -#_______NOTE: this corresponds to SSTNPL source line #116-0 -setreg1;>ICON_info#SSTNPL Source Line: '116-0' +#_______NOTE: this corresponds to SSTNPL source line #106-0 +setreg1;>ICON_info#SSTNPL Source Line: '106-0' #set(1) (used after 2-op math, asm code, or get) datawrite1;>pl.offset #goto (extra code stores away return address.) -setreg1;>goto--jumper-118-0 +setreg1;>goto--jumper-108-0 s1push1 goto;>pl.decode--label -zerosize;;goto--jumper-118-0 +zerosize;;goto--jumper-108-0 #val (used with set to change variable value during runtime.) setreg1;10x-58 #set(1) (used after 2-op math, asm code, or get) datawrite1;>pl.posy #___RAW ASSEMBLY CODE___ -#_______NOTE: this corresponds to SSTNPL source line #123-0 -setreg1;>ICON_dos#SSTNPL Source Line: '123-0' +#_______NOTE: this corresponds to SSTNPL source line #113-0 +setreg1;>ICON_dos#SSTNPL Source Line: '113-0' #set(1) (used after 2-op math, asm code, or get) datawrite1;>pl.offset #goto (extra code stores away return address.) -setreg1;>goto--jumper-125-0 +setreg1;>goto--jumper-115-0 s1push1 goto;>pl.decode--label -zerosize;;goto--jumper-125-0 +zerosize;;goto--jumper-115-0 #val (used with set to change variable value during runtime.) setreg1;10x-26 #set(1) (used after 2-op math, asm code, or get) datawrite1;>pl.posy #___RAW ASSEMBLY CODE___ -#_______NOTE: this corresponds to SSTNPL source line #130-0 -setreg1;>ICON_credits#SSTNPL Source Line: '130-0' +#_______NOTE: this corresponds to SSTNPL source line #120-0 +setreg1;>ICON_credits#SSTNPL Source Line: '120-0' #set(1) (used after 2-op math, asm code, or get) datawrite1;>pl.offset #goto (extra code stores away return address.) -setreg1;>goto--jumper-132-0 +setreg1;>goto--jumper-122-0 s1push1 goto;>pl.decode--label -zerosize;;goto--jumper-132-0 +zerosize;;goto--jumper-122-0 #return from subroutine. s1pop1 gotoreg1 -#module include: line 138-0: bench/lib/common as common +#module include: line 128-0: bench/lib/common as common includeas;bench/lib/common,common -#module include: line 139-0: bench/lib/ui as ui +#module include: line 129-0: bench/lib/ui as ui includeas;bench/lib/ui,ui -#module include: line 140-0: plrle_noalpha as pl +#module include: line 130-0: plrle_noalpha as pl includeas;plrle_noalpha,pl -#module include: line 141-0: bench/lib/sndkern_lib as sklib +#module include: line 131-0: bench/lib/sndkern_lib as sklib includeas;bench/lib/sndkern_lib,sklib +#module include: line 132-0: bench/lib/bench_lib as b_lib +includeas;bench/lib/bench_lib,b_lib #___RAW ASSEMBLY CODE___ -#_______NOTE: this corresponds to SSTNPL source line #142-0 -include;bench/media/info.tas0;ICON_info#SSTNPL Source Line: '142-0' +#_______NOTE: this corresponds to SSTNPL source line #133-0 +include;bench/media/info.tas0;ICON_info#SSTNPL Source Line: '133-0' #___RAW ASSEMBLY CODE___ -#_______NOTE: this corresponds to SSTNPL source line #143-0 -include;bench/media/dos.tas0;ICON_dos#SSTNPL Source Line: '143-0' +#_______NOTE: this corresponds to SSTNPL source line #134-0 +include;bench/media/dos.tas0;ICON_dos#SSTNPL Source Line: '134-0' #___RAW ASSEMBLY CODE___ -#_______NOTE: this corresponds to SSTNPL source line #144-0 -include;bench/media/credits_icn.tas0;ICON_credits#SSTNPL Source Line: '144-0' +#_______NOTE: this corresponds to SSTNPL source line #135-0 +include;bench/media/credits_icn.tas0;ICON_credits#SSTNPL Source Line: '135-0' #END OF FILE diff --git a/apps/bench/bench/info.stnp b/apps/bench/bench/info.stnp index a84f51f..c21b92a 100644 --- a/apps/bench/bench/info.stnp +++ b/apps/bench/bench/info.stnp @@ -30,6 +30,7 @@ label info asm setreg1;>IMAGE_credits set pl.offset gsub pl.decode + !sklib.sk_notify() gsub common.mouse_wait @@ -41,5 +42,7 @@ stop include plrle_noalpha as pl include bench/lib/common as common include bench/lib/ui as ui +include bench/lib/sndkern_lib as sklib + asm include;bench/media/credits1.tas0;IMAGE_credits asm include;bench/media/image_info.tas0;IMAGE_info \ No newline at end of file diff --git a/apps/bench/bench/info.trom b/apps/bench/bench/info.trom index f8a99dd..9e8e8df 100644 --- a/apps/bench/bench/info.trom +++ b/apps/bench/bench/info.trom @@ -5,6 +5,7 @@ 0,1 0,0 0,13 +0,2 -9500,-9835 -9492,526 -9459,701 @@ -14,35 +15,37 @@ -9460,-80 -9460,1 -9459,1 --9841,-9822 +-9841,-9821 -9100,2 --9600,-9490 +-9600,-9487 -9841,1 --9496,-9711 +-9496,-9708 -9841,2 --9496,-9710 +-9496,-9707 -9841,-90 --9496,-9708 +-9496,-9705 -9841,-121 +-9496,-9706 +-9841,-6767 -9496,-9709 --9841,-6772 --9496,-9712 --9841,-9809 +-9841,-9808 -9100,2 --9600,-9697 +-9600,-9694 -9841,1 --9496,-9711 --9496,-9710 --9841,72 -9496,-9708 --9841,-7572 --9496,-9712 --9841,-9799 +-9496,-9707 +-9841,72 +-9496,-9705 +-9841,-7567 +-9496,-9709 +-9841,-9798 -9100,2 --9600,-9697 --9841,-9796 +-9600,-9694 +-9500,-9834 +-9492,1100 +-9841,-9793 -9100,2 --9600,-9518 +-9600,-9515 -9460,-76 -9460,-102 -9460,-121 @@ -142,84 +145,84 @@ 0,0 0,0 0,1 --9500,-9709 --9496,-9701 --9500,-9708 --9496,-9700 --9500,-9708 +-9500,-9706 +-9496,-9698 +-9500,-9705 +-9496,-9697 +-9500,-9705 -9492,502 --9500,-9709 +-9500,-9706 -9492,501 --9500,-9711 --9496,-9637 --9500,-9710 --9496,-9626 --9500,-9711 --9499,-9698 +-9500,-9708 +-9496,-9634 +-9500,-9707 +-9496,-9623 +-9500,-9708 +-9499,-9695 -9800,0 --9496,-9703 --9500,-9710 --9499,-9698 +-9496,-9700 +-9500,-9707 +-9499,-9695 -9800,0 --9496,-9702 --9500,-9703 +-9496,-9699 +-9500,-9700 -9492,509 --9500,-9702 +-9500,-9699 -9492,510 -9841,0 --9496,-9705 --9500,-9712 --9496,-9707 --9500,-9707 --9496,-9667 +-9496,-9702 +-9500,-9709 +-9496,-9704 +-9500,-9704 +-9496,-9664 -9500,0 --9496,-9706 --9500,-9706 --9499,-9698 +-9496,-9703 +-9500,-9703 +-9499,-9695 -9796,0 --9496,-9706 --9500,-9707 --9499,-9698 +-9496,-9703 +-9500,-9704 +-9499,-9695 -9800,0 --9496,-9707 --9500,-9707 --9496,-9699 --9600,-9646 --9500,-9699 +-9496,-9704 +-9500,-9704 +-9496,-9696 +-9600,-9643 +-9500,-9696 -9798,1 --9496,-9699 --9499,-9706 --9598,-9655 --9599,-9655 +-9496,-9696 +-9499,-9703 +-9598,-9652 +-9599,-9652 -9100,0 -9596,0 --9500,-9699 --9496,-9643 --9496,-9641 +-9500,-9696 +-9496,-9640 +-9496,-9638 -9500,0 -9492,505 -9498,0 -9840,-1 --9599,-9627 +-9599,-9624 -9798,1 -9790,0 -9798,1 -9492,509 -9794,1 -9492,508 --9499,-9701 +-9499,-9698 -9799,0 --9495,-9701 +-9495,-9698 -9491,501 --9600,-9654 --9500,-9700 +-9600,-9651 +-9500,-9697 -9798,0 --9496,-9700 +-9496,-9697 -9492,502 --9500,-9709 --9496,-9701 +-9500,-9706 +-9496,-9698 -9492,501 --9600,-9654 +-9600,-9651 -9459,1 -9457,5 0,-100 @@ -241,36 +244,36 @@ 0,0 0,0 0,1 --9500,-9617 +-9500,-9614 -9492,1 --9500,-9616 +-9500,-9613 -9492,1 --9500,-9615 +-9500,-9612 -9492,1 --9500,-9614 +-9500,-9611 -9492,1 --9500,-9615 +-9500,-9612 -9492,1 --9500,-9613 +-9500,-9610 -9492,1 -9100,0 -9596,0 --9500,-9605 +-9500,-9602 -9492,527 --9500,-9604 +-9500,-9601 -9492,526 --9500,-9612 +-9500,-9609 -9492,505 -9490,303 -9492,501 -9492,503 -9840,2 -9799,0 --9495,-9607 +-9495,-9604 -9840,6 -9799,0 -9491,522 --9495,-9610 +-9495,-9607 -9490,304 -9492,502 -9840,8 @@ -279,63 +282,63 @@ -9840,6 -9799,0 -9491,523 --9495,-9609 -9495,-9606 +-9495,-9603 -9492,524 --9500,-9611 +-9500,-9608 -9492,505 -9492,506 --9500,-9610 +-9500,-9607 -9492,503 --9500,-9609 +-9500,-9606 -9492,504 -9492,506 --9500,-9612 +-9500,-9609 -9492,505 --9500,-9607 +-9500,-9604 -9492,501 --9500,-9606 --9492,502 -9500,-9603 +-9492,502 +-9500,-9600 -9492,509 --9500,-9602 +-9500,-9599 -9492,510 -9492,508 --9500,-9601 +-9500,-9598 -9492,525 --9500,-9601 +-9500,-9598 -9492,527 --9841,-9531 +-9841,-9528 -9100,2 --9600,-9529 +-9600,-9526 -9100,0 -9596,0 -9492,520 -9490,521 --9496,-9608 --9500,-9608 --9499,-9601 --9597,-9521 --9600,-9522 --9600,-9520 --9600,-9528 +-9496,-9605 +-9500,-9605 +-9499,-9598 +-9597,-9518 +-9600,-9519 +-9600,-9517 +-9600,-9525 -9100,0 -9596,0 --9500,-9601 +-9500,-9598 -9492,527 --9500,-9604 +-9500,-9601 -9492,525 --9841,-9511 +-9841,-9508 -9100,2 --9600,-9584 +-9600,-9581 -9490,300 --9496,-9600 --9500,-9600 --9499,-9599 --9599,-9505 --9600,-9504 --9600,-9503 --9600,-9514 +-9496,-9597 +-9500,-9597 +-9499,-9596 +-9599,-9502 +-9600,-9501 +-9600,-9500 +-9600,-9511 -9100,0 -9596,0 -9459,1 @@ -349,52 +352,52 @@ 0,-99 0,3 0,1 --9500,-9498 +-9500,-9495 -9492,501 --9500,-9497 +-9500,-9494 -9492,509 --9500,-9496 +-9500,-9493 -9492,505 --9500,-9498 --9492,502 -9500,-9495 +-9492,502 +-9500,-9492 -9492,510 -9492,508 --9500,-9494 +-9500,-9491 -9492,505 --9500,-9493 +-9500,-9490 -9492,502 --9500,-9492 +-9500,-9489 -9492,510 -9492,508 -9841,3 --9496,-7706 --9496,-7705 +-9496,-7703 +-9496,-7702 -9841,-120 +-9496,-7701 +-9496,-7700 +-9841,-7611 -9496,-7704 --9496,-7703 --9841,-7614 --9496,-7707 --9841,-9461 +-9841,-9458 -9100,2 --9600,-7692 --9500,-9499 --9499,-9491 --9599,-9456 --9600,-9457 --9600,-9444 +-9600,-7689 +-9500,-9496 +-9499,-9488 +-9599,-9453 +-9600,-9454 +-9600,-9441 -9841,-9841 --9496,-9434 +-9496,-9431 -9841,-90 --9496,-9440 +-9496,-9437 -9841,-118 --9496,-9439 --9841,-9447 --9100,2 --9600,-9352 +-9496,-9436 -9841,-9444 -9100,2 --9600,-9348 +-9600,-9349 +-9841,-9441 +-9100,2 +-9600,-9345 -9100,0 -9596,0 -9459,1 @@ -487,229 +490,229 @@ 0,13 0,14 0,15 --9500,-9440 --9496,-9432 +-9500,-9437 +-9496,-9429 -9100,0 -9596,0 --9500,-9437 +-9500,-9434 -9790,2 --9496,-9422 --9500,-9438 +-9496,-9419 +-9500,-9435 -9790,2 --9496,-9421 +-9496,-9418 -9490,702 --9496,-9423 +-9496,-9420 -9841,0 --9496,-9431 --9500,-9423 --9499,-9420 --9599,-9334 --9600,-9332 +-9496,-9428 +-9500,-9420 +-9499,-9417 +-9599,-9331 +-9600,-9329 -9100,0 -9596,0 --9500,-9423 --9499,-9419 --9599,-9328 --9600,-9325 --9841,-9325 +-9500,-9420 +-9499,-9416 +-9599,-9325 +-9600,-9322 +-9841,-9322 -9100,2 --9600,-8137 --9500,-9423 --9499,-9419 --9599,-9321 --9600,-9320 --9600,-9342 --9500,-9423 --9499,-9418 --9599,-9316 --9600,-9314 --9841,-9314 --9600,-9134 --9500,-9423 --9499,-9417 --9597,-9310 --9600,-9308 --9841,-9308 --9600,-9281 --9500,-9423 +-9600,-8134 +-9500,-9420 -9499,-9416 --9597,-9304 --9600,-9302 --9841,-9302 --9600,-9286 --9500,-9423 --9499,-9418 --9597,-9298 --9600,-9296 --9841,-9296 --9600,-9291 +-9599,-9318 +-9600,-9317 +-9600,-9339 +-9500,-9420 +-9499,-9415 +-9599,-9313 +-9600,-9311 +-9841,-9311 +-9600,-9131 +-9500,-9420 +-9499,-9414 +-9597,-9307 +-9600,-9305 +-9841,-9305 +-9600,-9278 +-9500,-9420 +-9499,-9413 +-9597,-9301 +-9600,-9299 +-9841,-9299 +-9600,-9283 +-9500,-9420 +-9499,-9415 +-9597,-9295 +-9600,-9293 +-9841,-9293 +-9600,-9288 -9841,123 --9499,-9423 +-9499,-9420 -9800,0 --9496,-9431 --9600,-9137 +-9496,-9428 +-9600,-9134 -9841,96 --9499,-9423 +-9499,-9420 -9800,0 --9496,-9431 --9600,-9137 +-9496,-9428 +-9600,-9134 -9841,95 --9499,-9423 +-9499,-9420 -9800,0 --9496,-9431 --9600,-9137 --9500,-9423 --9499,-9415 --9599,-9277 --9600,-9275 --9500,-9414 --9496,-9431 --9500,-9423 --9499,-9413 --9599,-9271 --9600,-9269 --9500,-9412 --9496,-9431 --9500,-9423 --9499,-9411 --9599,-9265 --9600,-9263 --9500,-9410 --9496,-9431 --9500,-9423 --9499,-9409 --9599,-9259 --9600,-9257 --9500,-9408 --9496,-9431 --9500,-9423 --9499,-9407 --9599,-9253 --9600,-9251 --9500,-9406 --9496,-9431 --9500,-9423 --9499,-9405 --9599,-9247 --9600,-9245 --9500,-9404 --9496,-9431 --9500,-9423 --9499,-9403 --9599,-9241 --9600,-9239 --9500,-9402 --9496,-9431 --9500,-9423 --9499,-9401 --9599,-9235 --9600,-9233 --9500,-9400 --9496,-9431 --9500,-9423 --9499,-9399 --9599,-9229 --9600,-9227 --9500,-9398 --9496,-9431 --9500,-9423 --9499,-9397 --9599,-9223 --9600,-9221 --9500,-9396 --9496,-9431 --9500,-9423 --9499,-9395 --9599,-9217 --9600,-9215 --9500,-9394 --9496,-9431 --9500,-9423 --9499,-9393 --9599,-9211 --9600,-9209 --9500,-9392 --9496,-9431 --9500,-9423 --9499,-9391 --9599,-9205 --9600,-9203 --9500,-9390 --9496,-9431 --9500,-9423 --9499,-9389 --9599,-9199 --9600,-9197 --9500,-9388 --9496,-9431 --9500,-9423 --9499,-9387 --9599,-9193 --9600,-9191 --9500,-9386 --9496,-9431 --9500,-9423 --9499,-9385 --9599,-9187 --9600,-9185 --9500,-9384 --9496,-9431 --9500,-9423 --9499,-9383 --9599,-9181 --9600,-9179 --9500,-9382 --9496,-9431 --9500,-9423 --9499,-9381 --9599,-9175 --9600,-9173 --9500,-9380 --9496,-9431 --9500,-9423 --9499,-9379 --9599,-9169 --9600,-9167 --9500,-9378 --9496,-9431 --9500,-9423 --9499,-9377 --9599,-9163 --9600,-9161 --9500,-9376 --9496,-9431 --9500,-9423 --9499,-9375 --9599,-9157 --9600,-9155 --9500,-9374 --9496,-9431 --9500,-9423 --9499,-9373 --9599,-9151 --9600,-9149 --9500,-9372 --9496,-9431 --9500,-9423 --9499,-9371 --9599,-9145 --9600,-9143 --9500,-9370 --9496,-9431 --9500,-9423 --9499,-9369 --9599,-9139 --9600,-9137 --9500,-9368 --9496,-9431 --9841,-9134 +-9496,-9428 +-9600,-9134 +-9500,-9420 +-9499,-9412 +-9599,-9274 +-9600,-9272 +-9500,-9411 +-9496,-9428 +-9500,-9420 +-9499,-9410 +-9599,-9268 +-9600,-9266 +-9500,-9409 +-9496,-9428 +-9500,-9420 +-9499,-9408 +-9599,-9262 +-9600,-9260 +-9500,-9407 +-9496,-9428 +-9500,-9420 +-9499,-9406 +-9599,-9256 +-9600,-9254 +-9500,-9405 +-9496,-9428 +-9500,-9420 +-9499,-9404 +-9599,-9250 +-9600,-9248 +-9500,-9403 +-9496,-9428 +-9500,-9420 +-9499,-9402 +-9599,-9244 +-9600,-9242 +-9500,-9401 +-9496,-9428 +-9500,-9420 +-9499,-9400 +-9599,-9238 +-9600,-9236 +-9500,-9399 +-9496,-9428 +-9500,-9420 +-9499,-9398 +-9599,-9232 +-9600,-9230 +-9500,-9397 +-9496,-9428 +-9500,-9420 +-9499,-9396 +-9599,-9226 +-9600,-9224 +-9500,-9395 +-9496,-9428 +-9500,-9420 +-9499,-9394 +-9599,-9220 +-9600,-9218 +-9500,-9393 +-9496,-9428 +-9500,-9420 +-9499,-9392 +-9599,-9214 +-9600,-9212 +-9500,-9391 +-9496,-9428 +-9500,-9420 +-9499,-9390 +-9599,-9208 +-9600,-9206 +-9500,-9389 +-9496,-9428 +-9500,-9420 +-9499,-9388 +-9599,-9202 +-9600,-9200 +-9500,-9387 +-9496,-9428 +-9500,-9420 +-9499,-9386 +-9599,-9196 +-9600,-9194 +-9500,-9385 +-9496,-9428 +-9500,-9420 +-9499,-9384 +-9599,-9190 +-9600,-9188 +-9500,-9383 +-9496,-9428 +-9500,-9420 +-9499,-9382 +-9599,-9184 +-9600,-9182 +-9500,-9381 +-9496,-9428 +-9500,-9420 +-9499,-9380 +-9599,-9178 +-9600,-9176 +-9500,-9379 +-9496,-9428 +-9500,-9420 +-9499,-9378 +-9599,-9172 +-9600,-9170 +-9500,-9377 +-9496,-9428 +-9500,-9420 +-9499,-9376 +-9599,-9166 +-9600,-9164 +-9500,-9375 +-9496,-9428 +-9500,-9420 +-9499,-9374 +-9599,-9160 +-9600,-9158 +-9500,-9373 +-9496,-9428 +-9500,-9420 +-9499,-9372 +-9599,-9154 +-9600,-9152 +-9500,-9371 +-9496,-9428 +-9500,-9420 +-9499,-9370 +-9599,-9148 +-9600,-9146 +-9500,-9369 +-9496,-9428 +-9500,-9420 +-9499,-9368 +-9599,-9142 +-9600,-9140 +-9500,-9367 +-9496,-9428 +-9500,-9420 +-9499,-9366 +-9599,-9136 +-9600,-9134 +-9500,-9365 +-9496,-9428 +-9841,-9131 -9100,2 --9600,-8129 --9500,-9432 --9499,-9435 +-9600,-8126 +-9500,-9429 +-9499,-9432 -9800,0 --9496,-9432 --9600,-9342 +-9496,-9429 +-9600,-9339 0,1 0,1 0,1 @@ -1702,428 +1705,428 @@ 0,0 0,0 0,1 --9500,-9440 --9496,-9432 --9500,-9439 --9499,-9436 +-9500,-9437 +-9496,-9429 +-9500,-9436 +-9499,-9433 -9800,0 --9496,-9439 +-9496,-9436 -9100,0 -9596,0 --9500,-9434 --9492,505 -9500,-9431 +-9492,505 +-9500,-9428 -9790,16 --9499,-9420 +-9499,-9417 -9800,0 --9798,-9129 --9496,-8121 +-9798,-9126 +-9496,-8118 -9500,0 --9496,-9430 --9500,-9430 --9499,-9367 --9599,-8114 --9600,-8115 --9600,-8102 --9500,-9432 +-9496,-9427 +-9500,-9427 +-9499,-9364 +-9599,-8111 +-9600,-8112 +-9600,-8099 +-9500,-9429 -9492,501 -9492,503 --9500,-9439 --9499,-9421 +-9500,-9436 +-9499,-9418 -9800,0 -9492,504 --9500,-9439 --9499,-9438 +-9500,-9436 +-9499,-9435 -9800,0 -9492,502 -9492,506 --9500,-9431 +-9500,-9428 -9790,16 --9499,-9419 +-9499,-9416 -9800,0 --9798,-9129 --9496,-8096 +-9798,-9126 +-9496,-8093 -9500,0 --9496,-9430 --9500,-9430 --9499,-9367 --9599,-8089 --9600,-8090 --9600,-8079 --9500,-9432 +-9496,-9427 +-9500,-9427 +-9499,-9364 +-9599,-8086 +-9600,-8087 +-9600,-8076 +-9500,-9429 -9492,501 -9492,503 --9500,-9439 +-9500,-9436 -9492,502 --9500,-9439 --9499,-9438 +-9500,-9436 +-9499,-9435 -9800,0 -9492,504 -9492,506 --9500,-9431 +-9500,-9428 -9790,16 --9499,-9366 +-9499,-9363 -9800,0 --9798,-9129 --9496,-8073 +-9798,-9126 +-9496,-8070 -9500,0 --9496,-9430 --9500,-9430 --9499,-9367 --9599,-8066 --9600,-8067 --9600,-8056 --9500,-9432 +-9496,-9427 +-9500,-9427 +-9499,-9364 +-9599,-8063 +-9600,-8064 +-9600,-8053 +-9500,-9429 -9492,501 --9500,-9439 +-9500,-9436 -9492,502 -9492,504 --9500,-9432 --9499,-9437 +-9500,-9429 +-9499,-9434 -9800,0 -9492,503 -9492,506 --9500,-9431 +-9500,-9428 -9790,16 --9499,-9365 +-9499,-9362 -9800,0 --9798,-9129 --9496,-8050 +-9798,-9126 +-9496,-8047 -9500,0 --9496,-9430 --9500,-9430 --9499,-9367 --9599,-8043 --9600,-8044 --9600,-8031 --9500,-9432 --9499,-9437 +-9496,-9427 +-9500,-9427 +-9499,-9364 +-9599,-8040 +-9600,-8041 +-9600,-8028 +-9500,-9429 +-9499,-9434 -9800,0 -9492,501 --9500,-9439 +-9500,-9436 -9492,502 -9492,504 --9500,-9432 --9499,-9422 +-9500,-9429 +-9499,-9419 -9800,0 -9492,503 -9492,506 --9500,-9431 +-9500,-9428 -9790,16 --9499,-9364 +-9499,-9361 -9800,0 --9798,-9129 --9496,-8025 +-9798,-9126 +-9496,-8022 -9500,0 --9496,-9430 --9500,-9430 --9499,-9367 --9599,-8018 --9600,-8019 --9600,-8006 --9500,-9432 --9499,-9422 +-9496,-9427 +-9500,-9427 +-9499,-9364 +-9599,-8015 +-9600,-8016 +-9600,-8003 +-9500,-9429 +-9499,-9419 -9800,0 -9492,501 -9492,503 --9500,-9439 +-9500,-9436 -9492,502 --9500,-9439 --9499,-9438 +-9500,-9436 +-9499,-9435 -9800,0 -9492,504 -9492,506 --9500,-9431 +-9500,-9428 -9790,16 --9499,-9363 +-9499,-9360 -9800,0 --9798,-9129 --9496,-8000 +-9798,-9126 +-9496,-7997 -9500,0 --9496,-9430 --9500,-9430 --9499,-9367 --9599,-7993 --9600,-7994 --9600,-7979 --9500,-9432 --9499,-9422 +-9496,-9427 +-9500,-9427 +-9499,-9364 +-9599,-7990 +-9600,-7991 +-9600,-7976 +-9500,-9429 +-9499,-9419 -9800,0 -9492,501 -9492,503 --9500,-9439 --9499,-9421 +-9500,-9436 +-9499,-9418 -9800,0 -9492,504 --9500,-9439 --9499,-9438 +-9500,-9436 +-9499,-9435 -9800,0 -9492,502 -9492,506 --9500,-9431 +-9500,-9428 -9790,16 --9499,-9362 +-9499,-9359 -9800,0 --9798,-9129 --9496,-7973 +-9798,-9126 +-9496,-7970 -9500,0 --9496,-9430 --9500,-9430 --9499,-9367 --9599,-7966 --9600,-7967 --9600,-7952 --9500,-9432 --9499,-9422 +-9496,-9427 +-9500,-9427 +-9499,-9364 +-9599,-7963 +-9600,-7964 +-9600,-7949 +-9500,-9429 +-9499,-9419 -9800,0 -9492,501 --9500,-9439 --9499,-9421 +-9500,-9436 +-9499,-9418 -9800,0 -9492,502 -9492,504 --9500,-9432 --9499,-9437 +-9500,-9429 +-9499,-9434 -9800,0 -9492,503 -9492,506 --9500,-9431 +-9500,-9428 -9790,16 --9499,-9361 +-9499,-9358 -9800,0 --9798,-9129 --9496,-7946 +-9798,-9126 +-9496,-7943 -9500,0 --9496,-9430 --9500,-9430 --9499,-9367 --9599,-7939 --9600,-7940 --9600,-7927 --9500,-9432 --9499,-9437 +-9496,-9427 +-9500,-9427 +-9499,-9364 +-9599,-7936 +-9600,-7937 +-9600,-7924 +-9500,-9429 +-9499,-9434 -9800,0 -9492,501 --9500,-9439 --9499,-9421 +-9500,-9436 +-9499,-9418 -9800,0 -9492,502 -9492,504 --9500,-9432 +-9500,-9429 -9492,503 -9492,506 --9500,-9431 +-9500,-9428 -9790,16 --9499,-9360 +-9499,-9357 -9800,0 --9798,-9129 --9496,-7921 +-9798,-9126 +-9496,-7918 -9500,0 --9496,-9430 --9500,-9430 --9499,-9367 --9599,-7914 --9600,-7915 --9600,-7901 --9500,-9432 +-9496,-9427 +-9500,-9427 +-9499,-9364 +-9599,-7911 +-9600,-7912 +-9600,-7898 +-9500,-9429 -9492,501 --9500,-9439 +-9500,-9436 -9492,502 --9500,-9432 --9499,-9437 +-9500,-9429 +-9499,-9434 -9800,0 -9492,503 --9500,-9439 --9499,-9438 +-9500,-9436 +-9499,-9435 -9800,0 -9492,504 -9492,506 --9500,-9431 +-9500,-9428 -9790,16 --9499,-9359 +-9499,-9356 -9800,0 --9798,-9129 --9496,-7895 +-9798,-9126 +-9496,-7892 -9500,0 --9496,-9430 --9500,-9430 --9499,-9367 --9599,-7888 --9600,-7889 --9600,-7876 --9500,-9439 +-9496,-9427 +-9500,-9427 +-9499,-9364 +-9599,-7885 +-9600,-7886 +-9600,-7873 +-9500,-9436 -9492,502 --9500,-9432 --9499,-9437 +-9500,-9429 +-9499,-9434 -9800,0 -9492,501 -9492,503 --9500,-9439 --9499,-9438 +-9500,-9436 +-9499,-9435 -9800,0 -9492,504 -9492,506 --9500,-9431 +-9500,-9428 -9790,16 --9499,-9358 +-9499,-9355 -9800,0 --9798,-9129 --9496,-7870 +-9798,-9126 +-9496,-7867 -9500,0 --9496,-9430 --9500,-9430 --9499,-9367 --9599,-7863 --9600,-7864 --9600,-7848 --9500,-9432 --9499,-9422 +-9496,-9427 +-9500,-9427 +-9499,-9364 +-9599,-7860 +-9600,-7861 +-9600,-7845 +-9500,-9429 +-9499,-9419 -9800,0 -9492,501 --9500,-9439 +-9500,-9436 -9492,502 --9500,-9432 --9499,-9437 +-9500,-9429 +-9499,-9434 -9800,0 -9492,503 --9500,-9439 --9499,-9438 +-9500,-9436 +-9499,-9435 -9800,0 -9492,504 -9492,506 --9500,-9431 +-9500,-9428 -9790,16 --9499,-9357 +-9499,-9354 -9800,0 --9798,-9129 --9496,-7842 +-9798,-9126 +-9496,-7839 -9500,0 --9496,-9430 --9500,-9430 --9499,-9367 --9599,-7835 --9600,-7836 --9600,-7821 --9500,-9432 --9499,-9422 +-9496,-9427 +-9500,-9427 +-9499,-9364 +-9599,-7832 +-9600,-7833 +-9600,-7818 +-9500,-9429 +-9499,-9419 -9800,0 -9492,501 --9500,-9439 --9499,-9438 +-9500,-9436 +-9499,-9435 -9800,0 -9492,502 -9492,504 --9500,-9432 --9499,-9437 +-9500,-9429 +-9499,-9434 -9800,0 -9492,503 -9492,506 --9500,-9431 +-9500,-9428 -9790,16 --9499,-9356 +-9499,-9353 -9800,0 --9798,-9129 --9496,-7815 +-9798,-9126 +-9496,-7812 -9500,0 --9496,-9430 --9500,-9430 --9499,-9367 --9599,-7808 --9600,-7809 --9600,-7791 --9500,-9432 --9499,-9422 +-9496,-9427 +-9500,-9427 +-9499,-9364 +-9599,-7805 +-9600,-7806 +-9600,-7788 +-9500,-9429 +-9499,-9419 -9800,0 -9492,501 --9500,-9439 --9499,-9421 +-9500,-9436 +-9499,-9418 -9800,0 -9492,502 --9500,-9432 --9499,-9437 +-9500,-9429 +-9499,-9434 -9800,0 -9492,503 --9500,-9439 --9499,-9438 +-9500,-9436 +-9499,-9435 -9800,0 -9492,504 -9492,506 --9500,-9431 +-9500,-9428 -9790,16 --9499,-9355 +-9499,-9352 -9800,0 --9798,-9129 --9496,-7785 +-9798,-9126 +-9496,-7782 -9500,0 --9496,-9430 --9500,-9430 --9499,-9367 --9599,-7778 --9600,-7779 --9600,-7764 --9500,-9439 --9499,-9421 +-9496,-9427 +-9500,-9427 +-9499,-9364 +-9599,-7775 +-9600,-7776 +-9600,-7761 +-9500,-9436 +-9499,-9418 -9800,0 -9492,502 --9500,-9432 --9499,-9437 +-9500,-9429 +-9499,-9434 -9800,0 -9492,501 -9492,503 --9500,-9439 --9499,-9438 +-9500,-9436 +-9499,-9435 -9800,0 -9492,504 -9492,506 --9500,-9431 +-9500,-9428 -9790,16 --9499,-9354 +-9499,-9351 -9800,0 --9798,-9129 --9496,-7758 +-9798,-9126 +-9496,-7755 -9500,0 --9496,-9430 --9500,-9430 --9499,-9367 --9599,-7751 --9600,-7752 --9600,-7736 --9500,-9432 +-9496,-9427 +-9500,-9427 +-9499,-9364 +-9599,-7748 +-9600,-7749 +-9600,-7733 +-9500,-9429 -9492,501 --9500,-9439 --9499,-9421 +-9500,-9436 +-9499,-9418 -9800,0 -9492,502 --9500,-9432 --9499,-9437 +-9500,-9429 +-9499,-9434 -9800,0 -9492,503 --9500,-9439 --9499,-9438 +-9500,-9436 +-9499,-9435 -9800,0 -9492,504 -9492,506 --9500,-9431 +-9500,-9428 -9790,16 --9499,-9353 +-9499,-9350 -9800,0 --9798,-9129 --9496,-7730 +-9798,-9126 +-9496,-7727 -9500,0 --9496,-9430 --9500,-9430 --9499,-9367 --9599,-7723 --9600,-7724 --9600,-7711 --9500,-9432 +-9496,-9427 +-9500,-9427 +-9499,-9364 +-9599,-7720 +-9600,-7721 +-9600,-7708 +-9500,-9429 -9492,501 --9500,-9432 --9499,-9437 +-9500,-9429 +-9499,-9434 -9800,0 -9492,503 --9500,-9439 --9499,-9438 +-9500,-9436 +-9499,-9435 -9800,0 -9492,502 -9492,504 @@ -2147,85 +2150,85 @@ 0,0 0,0 0,1 --9500,-7704 --9496,-7696 --9500,-7703 --9496,-7695 --9500,-7703 +-9500,-7701 +-9496,-7693 +-9500,-7700 +-9496,-7692 +-9500,-7700 -9492,502 --9500,-7704 +-9500,-7701 -9492,501 --9500,-7706 --9496,-7632 --9500,-7705 --9496,-7621 --9500,-7706 --9499,-7693 +-9500,-7703 +-9496,-7629 +-9500,-7702 +-9496,-7618 +-9500,-7703 +-9499,-7690 -9800,0 --9496,-7698 --9500,-7705 --9499,-7693 +-9496,-7695 +-9500,-7702 +-9499,-7690 -9800,0 --9496,-7697 --9500,-7698 +-9496,-7694 +-9500,-7695 -9492,509 --9500,-7697 +-9500,-7694 -9492,510 -9841,0 --9496,-7700 --9500,-7707 --9496,-7702 --9500,-7702 --9496,-7662 +-9496,-7697 +-9500,-7704 +-9496,-7699 +-9500,-7699 +-9496,-7659 -9500,0 --9496,-7701 --9500,-7701 --9499,-7693 +-9496,-7698 +-9500,-7698 +-9499,-7690 -9796,0 --9496,-7701 --9500,-7702 --9499,-7693 +-9496,-7698 +-9500,-7699 +-9499,-7690 -9800,0 --9496,-7702 --9500,-7702 --9496,-7694 --9600,-7641 --9500,-7694 +-9496,-7699 +-9500,-7699 +-9496,-7691 +-9600,-7638 +-9500,-7691 -9798,1 --9496,-7694 --9499,-7701 --9598,-7650 --9599,-7650 +-9496,-7691 +-9499,-7698 +-9598,-7647 +-9599,-7647 -9100,0 -9596,0 --9500,-7694 --9496,-7638 --9496,-7636 +-9500,-7691 +-9496,-7635 +-9496,-7633 -9500,0 -9492,505 -9498,0 -9840,-1 --9599,-7622 +-9599,-7619 -9798,1 -9790,0 -9798,1 -9492,509 -9794,1 -9492,508 --9499,-7696 +-9499,-7693 -9799,0 --9495,-7696 +-9495,-7693 -9491,501 --9600,-7649 --9500,-7695 +-9600,-7646 +-9500,-7692 -9798,0 --9496,-7695 +-9496,-7692 -9492,502 --9500,-7704 --9496,-7696 +-9500,-7701 +-9496,-7693 -9492,501 --9600,-7649 -0,-7573 +-9600,-7646 +0,-7570 0,9841 0,-1502 6,9841 @@ -2267,7 +2270,9 @@ 1,-5356 -1,0 0,0 -0,-6773 +-9459,1 +-9457,5 +0,-6768 7,5883 1,365 25,5883 @@ -3067,7 +3072,7 @@ 239,4397 -1,0 0,0 -0,-4859 +0,-4854 49,5911 192,-9841 -1,0 diff --git a/apps/bench/bench/info__stnp.tasm b/apps/bench/bench/info__stnp.tasm index 0814228..6f2bdf4 100644 --- a/apps/bench/bench/info__stnp.tasm +++ b/apps/bench/bench/info__stnp.tasm @@ -10,6 +10,7 @@ null;0;ybuff null;10x1;actflg null;0;btnbuff null;10x13;@13 +null;10x2;$sklib.snd_notify #label zerosize;;info--label #plotter buffer blit @@ -74,11 +75,16 @@ setreg1;>goto--jumper-32-0 s1push1 goto;>pl.decode--label zerosize;;goto--jumper-32-0 +#get(1) (may be used with set, or asm code) +dataread1;>$sklib.snd_notify +#___RAW ASSEMBLY CODE___ +#_______NOTE: this corresponds to SSTNPL source line #33-2 +iowrite1;>cross.io.1#SSTNPL Source Line: '33-2' #goto (extra code stores away return address.) -setreg1;>goto--jumper-33-0 +setreg1;>goto--jumper-34-0 s1push1 goto;>common.mouse_wait--label -zerosize;;goto--jumper-33-0 +zerosize;;goto--jumper-34-0 #prline fopwri1;:S fopwri1;:t @@ -165,16 +171,18 @@ fopwri1;:! fopwri1;:\n #stop (shutdown vm) stop -#module include: line 41-0: plrle_noalpha as pl +#module include: line 42-0: plrle_noalpha as pl includeas;plrle_noalpha,pl -#module include: line 42-0: bench/lib/common as common +#module include: line 43-0: bench/lib/common as common includeas;bench/lib/common,common -#module include: line 43-0: bench/lib/ui as ui +#module include: line 44-0: bench/lib/ui as ui includeas;bench/lib/ui,ui +#module include: line 45-0: bench/lib/sndkern_lib as sklib +includeas;bench/lib/sndkern_lib,sklib #___RAW ASSEMBLY CODE___ -#_______NOTE: this corresponds to SSTNPL source line #44-0 -include;bench/media/credits1.tas0;IMAGE_credits#SSTNPL Source Line: '44-0' +#_______NOTE: this corresponds to SSTNPL source line #47-0 +include;bench/media/credits1.tas0;IMAGE_credits#SSTNPL Source Line: '47-0' #___RAW ASSEMBLY CODE___ -#_______NOTE: this corresponds to SSTNPL source line #45-0 -include;bench/media/image_info.tas0;IMAGE_info#SSTNPL Source Line: '45-0' +#_______NOTE: this corresponds to SSTNPL source line #48-0 +include;bench/media/image_info.tas0;IMAGE_info#SSTNPL Source Line: '48-0' #END OF FILE diff --git a/apps/bench/lib/bench_lib.stnp b/apps/bench/lib/bench_lib.stnp new file mode 100644 index 0000000..b693275 --- /dev/null +++ b/apps/bench/lib/bench_lib.stnp @@ -0,0 +1,16 @@ + + + +def app_run {prline starting %0%... / vdi rstld -1 %0% / prline ERROR: can't run %0%} +def app_exit {gsub %mod%_appexit_intenral} + +label _appexit_intenral +prline reload desktop.app... +gsub _load_desktop_internal +prline ERROR: RAM state not found. +stop + + +label _load_desktop_internal +vdi rstld 2 desktop.back.tri +return diff --git a/apps/bench/lib/bench_lib.stnpmfs b/apps/bench/lib/bench_lib.stnpmfs new file mode 100644 index 0000000..0f2c393 --- /dev/null +++ b/apps/bench/lib/bench_lib.stnpmfs @@ -0,0 +1,4 @@ +label;_appexit_intenral +label;_load_desktop_internal +macro;app_exit;{gsub %mod%_appexit_intenral} +macro;app_run;{prline starting %0%... / vdi rstld -1 %0% / prline ERROR: can't run %0%} diff --git a/apps/bench/lib/bench_lib.tas0 b/apps/bench/lib/bench_lib.tas0 new file mode 100644 index 0000000..b6bb601 --- /dev/null +++ b/apps/bench/lib/bench_lib.tas0 @@ -0,0 +1,102 @@ +#SSTNPL COMPILER v0.4.0 +#header +head-rname=bench_lib +head-nspin=stdnsp +fopset1;>io.ttywr +fopset2;>io.packart +#stnp source file: (autogenerated from) "apps/bench/lib/bench_lib.stnp +#label +zerosize;;_appexit_intenral--label +#prline +fopwri1;:r +fopwri1;:e +fopwri1;:l +fopwri1;:o +fopwri1;:a +fopwri1;:d +fopwri1;:\s +fopwri1;:d +fopwri1;:e +fopwri1;:s +fopwri1;:k +fopwri1;:t +fopwri1;:o +fopwri1;:p +fopwri1;:. +fopwri1;:a +fopwri1;:p +fopwri1;:p +fopwri1;:. +fopwri1;:. +fopwri1;:. +fopwri1;:\n +#goto (extra code stores away return address.) +setreg1;>goto--jumper-9-0 +s1push1 +goto;>_load_desktop_internal--label +zerosize;;goto--jumper-9-0 +#prline +fopwri1;:E +fopwri1;:R +fopwri1;:R +fopwri1;:O +fopwri1;:R +fopwri1;:: +fopwri1;:\s +fopwri1;:R +fopwri1;:A +fopwri1;:M +fopwri1;:\s +fopwri1;:s +fopwri1;:t +fopwri1;:a +fopwri1;:t +fopwri1;:e +fopwri1;:\s +fopwri1;:n +fopwri1;:o +fopwri1;:t +fopwri1;:\s +fopwri1;:f +fopwri1;:o +fopwri1;:u +fopwri1;:n +fopwri1;:d +fopwri1;:. +fopwri1;:\n +#stop (shutdown vm) +stop +#label +zerosize;;_load_desktop_internal--label +#vdi +fopset1;>vdi.cli.in +fopwri1;:r +fopwri1;:s +fopwri1;:t +fopwri1;:l +fopwri1;:d +fopwri1;:\s +fopwri1;:2 +fopwri1;:\s +fopwri1;:d +fopwri1;:e +fopwri1;:s +fopwri1;:k +fopwri1;:t +fopwri1;:o +fopwri1;:p +fopwri1;:. +fopwri1;:b +fopwri1;:a +fopwri1;:c +fopwri1;:k +fopwri1;:. +fopwri1;:t +fopwri1;:r +fopwri1;:i +fopwri1;:\n +fopset1;>io.ttywr +#return from subroutine. +s1pop1 +gotoreg1 +#END OF FILE