ALTO Smalltalk-72
X

Menu
Step
Run
Lively-Web NOVA Emulator
Stop
20400: 651 JMP .-127; 020251 20401: 6160 p JSR @160; 010242 20402: 40751A STA 0,.-27; 020353 20403: 22056$. LDA 0,@56; 0124145 20404: 111000 MOV 0,2 20405: 20746! LDA 0,.-32; 020353 20406: 64451i) JSRII .+51; 021133 20407: 666 JMP .-112; 020275 20410: 4755 JSR .-23; 020365 20411: 105004 MOV 0,1,SZR 20412: 64446i& JSRII .+46; 020645 20413: 660 JMP .-120; 020273 20414: 64445i% JSRII .+45; 021600 20415: 6144 d JSR @144; 05453 20416: 655 JMP .-123; 020273 20417: 4741 JSR .-37; 020360 20420: 100513 K NEGLN 0,0,SNC 20421: 652 JMP .-126; 020273 20422: 64427i JSRII .+27; 020747 20423: 42731E STA 0,@.-47; 0400 20424: 10730 ISZ .-50; 020354 20425: 14726 DSZ .-52; 020353 20426: 774 JMP .-4; 020422 20427: 644 JMP .-134; 020273 20430: 4730 JSR .-50; 020360 20431: 100513 K NEGLN 0,0,SNC 20432: 641 JMP .-137; 020273 20433: 22721% LDA 0,@.-57; 0400 20434: 64416i JSRII .+16; 021064 20435: 10717 ISZ .-61; 020354 20436: 14715 DSZ .-63; 020353 20437: 774 JMP .-4; 020433 20440: 633 JMP .-145; 020273 20441: 20300 LDA 0,300; 0300 20442: 7234 JSR @-144,2 20443: 7233 JSR @-145,2 20444: 7237 JSR @-141,2 20445: 7226 JSR @-152,2 20446: 7227 JSR @-151,2 20447: 7236 JSR @-142,2 20450: 7235 JSR @-143,2 20451: 7217 JSR @-161,2 20452: 7221 JSR @-157,2 20453: 7232 JSR @-146,2 20454: 7223 JSR @-155,2 20455: 7230 JSR @-150,2 20456: 7220 JSR @-160,2 20457: 7222 JSR @-156,2 20460: 7215 JSR @-163,2 20461: 7224 JSR @-154,2 20462: 7213 JSR @-165,2 20463: 7214 JSR @-164,2 20464: 7214 JSR @-164,2 20465: 452 * JMP .+52; 020537 INOUT: 20466: 6201 JSR @201; 024141 20467: 21 JMP 21; 021 20470: 105000 MOV 0,1 20471: 6201 JSR @201; 024141 20472: 11 JMP 11; 011 20473: 64771i JSRII .-7; 027523 =OUTLD 20474: 101000 MOV 0,0 20475: 126460 0 SUBC 1,1 20476: 46767M STA 1,@.-11; 0452 20477: 61001b EIR 20500: 101015 MOVN 0,0,SNR 20501: 2170 x JMP @170; 01443 =RFALSE 20502: 2156 n JMP @156; 07667 =EVAL 20503: 1 JMP 1; 01 20504: 404 JMP .+4; 020510 20505: 1 JMP 1; 01 20506: 0 JMP 0; 00 20507: 20250 LDA 0,250; 0250 20510: 0 JMP 0; 00 20511: 0 JMP 0; 00 20512: 0 JMP 0; 00 20513: 0 JMP 0; 00 20514: 0 JMP 0; 00 20515: 0 JMP 0; 00 20516: 0 JMP 0; 00 20517: 0 JMP 0; 00 20520: 0 JMP 0; 00 20521: 0 JMP 0; 00 20522: 0 JMP 0; 00 20523: 0 JMP 0; 00 20524: 0 JMP 0; 00 20525: 0 JMP 0; 00 20526: 0 JMP 0; 00 20527: 0 JMP 0; 00 20530: 0 JMP 0; 00 20531: 0 JMP 0; 00 20532: 0 JMP 0; 00 20533: 0 JMP 0; 00 20534: 177777 ANDCSN 3,3,SBN 20535: 6731 JSR @.-47; 06201 20536: 374 JMP 374; 0374 20537: 54521YQ STA 3,.+121; 020660 20540: 22775% LDA 0,@.-3; 06731 20541: 24775) LDA 1,.-3; 020536 20542: 123000 ADD 1,0 20543: 4401 JSR .+1; 020544 20544: 162400 SUB 3,0 20545: 40403A STA 0,.+3; 020550 20546: 4422 JSR .+22; 020570 20547: 377 JMP 377; 0377 20550: 0 JMP 0; 00 20551: 177400 AND 3,3 20552: 22763% LDA 0,@.-15; 06731 20553: 2505 E JMP @.+105; 022732 20554: 54504YD STA 3,.+104; 020660 20555: 22760% LDA 0,@.-20; 06731 20556: 24760) LDA 1,.-20; 020536 20557: 123000 ADD 1,0 20560: 4401 JSR .+1; 020561 20561: 162400 SUB 3,0 20562: 40403A STA 0,.+3; 020565 20563: 4441 ! JSR .+41; 020624 20564: 377 JMP 377; 0377 20565: 165472 : INCCN 3,1,SZC 20566: 177400 AND 3,3 20567: 2471 9 JMP @.+71; 022732 20570: 54451Y) STA 3,.+51; 020641 20571: 4417 JSR .+17; 020610 20572: 6065 5 JSR @65; 023623 =LOAD 20573: 42445E% STA 0,@.+45; 022625 20574: 434 JMP .+34; 020630 20575: 54444Y$ STA 3,.+44; 020641 20576: 4412 JSR .+12; 020610 20577: 6065 5 JSR @65; 023623 =LOAD 20600: 6163 s JSR @163; 05522 20601: 42437E STA 0,@.+37; 022625 20602: 426 JMP .+26; 020630 20603: 54436Y STA 3,.+36; 020641 20604: 4404 JSR .+4; 020610 20605: 22433% LDA 0,@.+33; 022625 20606: 4457 / JSR .+57; 020665 20607: 421 JMP .+21; 020630 20610: 50451Q) STA 2,.+51; 020661 20611: 54431Y STA 3,.+31; 020642 20612: 344279 LDA 3,.+27; 020641 20613: 25400+ LDA 1,0,3 20614: 147000 ADD 2,1 20615: 44427I STA 1,.+27; 020644 20616: 21401# LDA 0,1,3 20617: 163000 ADD 3,0 20620: 40420A STA 0,.+20; 020640 20621: 21402# LDA 0,2,3 20622: 40421A STA 0,.+21; 020643 20623: 2417 JMP @.+17; 020605 20624: 54415Y STA 3,.+15; 020641 20625: 4763 JSR .-15; 020610 20626: 22412% LDA 0,@.+12; 022625 20627: 6067 7 JSR @67; 023630 20630: 14410 DSZ .+10; 020640 20631: 14413 DSZ .+13; 020644 20632: 24412) LDA 1,.+12; 020644 20633: 10410 ISZ .+10; 020643 20634: 2406 JMP @.+6; 020605 20635: 304241 LDA 2,.+24; 020661 20636: 344039 LDA 3,.+3; 020641 20637: 1403 JMP 3,3 20640: 22625% LDA 0,@.-153; 0452 20641: 23023& LDA 0,@23,2 20642: 20605! LDA 0,.-173; 020447 20643: 0 JMP 0; 00 20644: 40177@ STA 0,177; 0177 20645: 54413Y STA 3,.+13; 020660 20646: 40774A STA 0,.-4; 020642 20647: 44774I STA 1,.-4; 020643 20650: 6203 JSR @203; 024072 20651: 7 JMP 7; 07 20652: 24771) LDA 1,.-7; 020643 20653: 123000 ADD 1,0 20654: 6176 ~ JSR @176; 024111 20655: 7 JMP 7; 07 20656: 20764! LDA 0,.-14; 020642 20657: 2401 JMP @.+1; 022732 20660: 22732% LDA 0,@.-46; 034427 20661: 40172@z STA 0,172; 0172 20662: 20607! LDA 0,.-171; 020471 20663: 11674 ISZ -104,3 20664: 5026 JSR 26,2 20665: 44776I STA 1,.-2; 020663 20666: 54774Y STA 3,.-4; 020662 20667: 6171 y JSR @171; 05565 20670: 40774A STA 0,.-4; 020664 20671: 24772) LDA 1,.-6; 020663 20672: 6065 5 JSR @65; 023623 =LOAD 20673: 40770A STA 0,.-10; 020663 20674: 20770! LDA 0,.-10; 020664 20675: 6067 7 JSR @67; 023630 20676: 20765! LDA 0,.-13; 020663 20677: 6165 u JSR @165; 011352 20700: 307611 LDA 2,.-17; 020661 20701: 2761 JMP @.-17; 020607 20702: 54756Y STA 3,.-22; 020660 20703: 40737A STA 0,.-41; 020642 20704: 6203 JSR @203; 024072 20705: 7 JMP 7; 07 20706: 101213 MOVRN 0,0,SNC 20707: 747 JMP .-31; 020656 20710: 101400 INC 0,0 20711: 743 JMP .-35; 020654 20712: 54546Yf STA 3,.+146; 021060 20713: 24131(Y LDA 1,131; 0131 20714: 147000 ADD 2,1 20715: 6065 5 JSR @65; 023623 =LOAD 20716: 40427A STA 0,.+27; 020745 20717: 6203 JSR @203; 024072 20720: 7 JMP 7; 07 20721: 101112 J MOVLN 0,0,SZC 20722: 412 JMP .+12; 020734 20723: 40421A STA 0,.+21; 020744 20724: 101001 MOV 0,0,SKP 20725: 54533Y[ STA 3,.+133; 021060 20726: 6203 JSR @203; 024072 20727: 15 JMP 15; 015 20730: 24414) LDA 1,.+14; 020744 20731: 122133 [ ADCZLN 1,0,SNC 20732: 406 JMP .+6; 020740 20733: 121000 MOV 1,0 20734: 126000 ADC 1,1 20735: 64445i% JSRII .+45; 022463 20736: 2522 R JMP @.+122; 020755 20737: 44405I STA 1,.+5; 020744 20740: 121400 INC 1,0 20741: 6176 ~ JSR @176; 024111 20742: 7 JMP 7; 07 20743: 6204 JSR @204; 04622 20744: 660 JMP .-120; 020624 20745: 37570?x LDA 3,@170,3 20746: 2512 J JMP @.+112; 020755 20747: 54512YJ STA 3,.+112; 021061 20750: 4732 JSR .-46; 020702 20751: 4741 JSR .-37; 020712 20752: 101300 MOVS 0,0 20753: 40510AH STA 0,.+110; 021063 20754: 4751 JSR .-27; 020725 20755: 24506)F LDA 1,.+106; 021063 20756: 123000 ADD 1,0 20757: 2502 B JMP @.+102; 022120 20760: 54501YA STA 3,.+101; 021061 20761: 40415A STA 0,.+15; 020776 20762: 105400 INC 0,1 20763: 6065 5 JSR @65; 023623 =LOAD 20764: 100513 K NEGLN 0,0,SNC 20765: 2474 < JMP @.+74; 022120 20766: 40475A= STA 0,.+75; 021063 20767: 102460 0 SUBC 0,0 20770: 40405A STA 0,.+5; 020775 20771: 4721 JSR .-57; 020712 20772: 101001 MOV 0,0,SKP 20773: 4732 JSR .-46; 020725 20774: 6205 JSR @205; 04643 20775: 6242 JSR @242; 00 20776: 41220B STA 0,-160,2 20777: 14464 4 DSZ .+64; 021063
this.AC0 = 1; this.AC1 = 0; this.AC2 = 034344; this.AC3 = 020474; this.PC = 020474; this.CRY = 0; // instruction# = 0
Restart
Show Nova
About Smalltalk-72
About this Emulation
About Lively Web
Open the ST-72 Manual
ALLDEFS
Keyboard Help