|
DataMuseum.dkPresents historical artifacts from the history of: RC4000/8000/9000 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RC4000/8000/9000 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 768 (0x300) Names: »trmove4tx «
└─⟦01e83a425⟧ Bits:30008166 Bånd med SW8010 og SW8500 source code └─⟦75ff9bef3⟧ └─⟦this⟧ »trmove4tx «
0x000…020 (1, 4094) 6d 6f 64 65 20 6c 69 73 74 2e 79 65 73 0a 0a 28 6d 6f 76 65 3d 73 6c 61 6e 67 20 6d 6f 76 65 34 ┆mode list.yes (move=slang move4┆ 0x020…040 74 78 0a 20 6d 6f 76 65 29 0a 0a 73 63 6f 70 65 20 75 73 65 72 2c 0a 20 6d 6f 76 65 0a 0a 65 6e ┆tx move) scope user, move en┆ 0x040…060 64 0a 0f 0f 0f 0f 0f 0f 19 00 00 66 65 72 72 65 64 20 69 6e 70 75 74 20 31 0a 20 20 20 20 20 65 ┆d ferred input 1 e┆ 0x060…080 33 34 3d 65 32 32 2b 32 32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 74 6f 70 20 ┆34=e22+22 ;top ┆ 0x080…0a0 74 72 61 6e 73 66 65 72 72 65 64 20 69 6e 70 75 74 20 32 0a 20 20 20 20 20 65 33 35 3d 65 32 33 ┆transferred input 2 e35=e23┆ 0x0a0…0c0 2b 32 32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 74 6f 70 20 74 72 61 6e 73 66 ┆+22 ;top transf┆ 0x0c0…0e0 65 72 72 65 64 20 6f 75 74 70 75 74 20 31 0a 20 20 20 20 20 65 33 36 3d 65 32 34 2b 32 32 20 20 ┆erred output 1 e36=e24+22 ┆ 0x0e0…100 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 74 6f 70 20 74 72 61 6e 73 66 65 72 72 65 64 ┆ ;top transferred┆ 0x100…120 20 6f 75 74 70 75 74 20 32 0a 20 20 20 20 20 65 32 30 3d 65 32 34 2b 68 36 2d 31 20 20 20 20 20 ┆ output 2 e20=e24+h6-1 ┆ 0x120…140 20 20 20 20 20 20 20 20 20 20 20 3b 62 61 73 65 20 6f 66 20 62 75 66 66 65 72 73 0a 20 20 20 20 ┆ ;base of buffers ┆ 0x140…160 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0a 20 20 20 20 20 65 33 38 3d 65 32 31 ┆ e38=e21┆ 0x160…180 2b 34 0a 20 20 20 20 20 65 33 39 3d 65 32 32 2b 34 0a 20 20 20 20 20 65 34 30 3d 65 32 33 2b 34 ┆+4 e39=e22+4 e40=e23+4┆ 0x180…1a0 0a 20 20 20 20 20 65 34 31 3d 65 32 34 2b 34 0a 20 20 20 20 20 65 34 32 3d 65 32 31 2b 31 30 0a ┆ e41=e24+4 e42=e21+10 ┆ 0x1a0…1c0 20 20 20 20 20 65 34 33 3d 65 32 32 2b 31 30 0a 20 20 20 20 20 65 34 34 3d 65 32 33 2b 31 30 0a ┆ e43=e22+10 e44=e23+10 ┆ 0x1c0…1e0 20 20 20 20 20 65 34 35 3d 65 32 34 2b 31 30 0a 0a 20 20 20 20 20 69 2e 0a 20 20 20 20 20 6d 2e ┆ e45=e24+10 i. m.┆ 0x1e0…200 20 72 63 20 31 39 38 38 2e 30 39 2e 30 38 20 66 70 20 75 74 69 6c 69 74 79 20 6d 6f 76 65 0a 20 ┆ rc 1988.09.08 fp utility move ┆ 0x200…220 20 20 20 20 66 31 3d 6b 2d 68 35 35 2d 68 35 2d 68 35 20 3b 6c 65 6e 67 74 68 0a 20 20 20 20 20 ┆ f1=k-h55-h5-h5 ;length ┆ 0x220…240 66 32 3d 34 20 20 20 20 20 20 20 20 20 20 20 3b 65 6e 74 72 79 0a 20 20 20 20 20 67 30 3a 67 31 ┆f2=4 ;entry g0:g1┆ 0x240…260 3a 28 3a 66 31 2b 35 31 31 3a 29 3e 39 20 20 3b 73 65 67 6d 2e 0a 20 20 20 20 20 20 20 20 20 20 ┆:(:f1+511:)>9 ;segm. ┆ 0x260…280 20 30 2c 72 2e 34 20 20 20 20 20 20 20 20 20 3b 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 ┆ 0,r.4 ;name ┆ 0x280…2a0 73 32 20 20 20 20 20 20 20 20 20 20 20 20 3b 64 61 74 65 0a 20 20 20 20 20 20 20 20 20 20 20 30 ┆s2 ;date 0┆ 0x2a0…2c0 2c 30 20 20 20 20 20 20 20 20 20 20 20 3b 66 69 6c 65 2c 62 6c 6f 63 6b 0a 20 20 20 20 20 20 20 ┆,0 ;file,block ┆ 0x2c0…2e0 20 20 20 20 32 3c 31 32 2b 66 32 20 20 20 20 20 20 20 3b 63 6f 6e 74 65 6e 74 73 2c 00 20 0a 74 ┆ 2<12+f2 ;contents, t┆ 0x2e0…300 68 69 00 20 0a 74 68 69 73 20 70 72 6f 67 34 8d 0e 00 20 0a 74 68 69 73 20 70 72 6f 67 72 61 6d ┆hi this prog4 this program┆