|
DataMuseum.dkPresents historical artifacts from the history of: Christian Rovsing CR7, CR8 & CR16 CP/M |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Christian Rovsing CR7, CR8 & CR16 CP/M Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 896 (0x380)
Names: »OSTA.BAS«
└─⟦69a509965⟧ Bits:30005211 CR8 BASIC Games
└─ ⟦this⟧ »OSTA.BAS«
0x000…020 ff e2 61 01 00 20 8f 20 50 52 4f 47 52 41 4d 20 4f 53 54 41 2e 42 41 53 00 f4 61 0a 00 86 20 53 ┆ a PROGRAM OSTA.BAS a S┆ 0x020…040 28 0f 32 29 2c 54 28 0f 32 29 00 26 62 14 00 91 20 22 56 49 53 43 4f 53 49 54 59 20 45 58 50 45 ┆( 2),T( 2) &b "VISCOSITY EXPE┆ 0x040…060 52 49 4d 45 4e 54 53 3a 20 4f 53 54 57 41 4c 54 20 56 49 53 43 4f 4d 45 54 45 52 22 00 2d 62 1e ┆RIMENTS: OSTWALT VISCOMETER" -b ┆ 0x060…080 00 91 20 00 6f 62 28 00 91 20 22 41 20 47 52 41 50 48 20 4f 46 20 54 48 45 20 52 41 54 49 4f 20 ┆ ob( "A GRAPH OF THE RATIO ┆ 0x080…0a0 54 49 4d 45 20 41 54 20 54 45 4d 50 20 54 48 45 54 41 2f 54 49 4d 45 20 41 54 20 52 4f 4f 4d 20 ┆TIME AT TEMP THETA/TIME AT ROOM ┆ 0x0a0…0c0 54 45 4d 50 22 00 97 62 32 00 91 20 22 54 4f 20 54 45 4d 50 20 54 48 45 54 41 20 49 53 20 54 4f ┆TEMP" b2 "TO TEMP THETA IS TO┆ 0x0c0…0e0 20 42 45 20 50 4c 4f 54 54 45 44 2e 22 00 9e 62 3c 00 91 20 00 c6 62 46 00 91 20 22 45 4e 54 45 ┆ BE PLOTTED." b< bF "ENTE┆ 0x0e0…100 52 20 54 49 4d 45 20 41 54 20 52 4f 4f 4d 20 54 45 4d 50 45 52 41 54 55 52 45 22 3b 00 ce 62 50 ┆R TIME AT ROOM TEMPERATURE"; bP┆ 0x100…120 00 85 20 52 00 f4 62 5a 00 91 20 22 45 4e 54 45 52 20 4e 55 4d 42 45 52 20 4f 46 20 4f 42 53 45 ┆ R bZ "ENTER NUMBER OF OBSE┆ 0x120…140 52 56 41 54 49 4f 4e 53 22 3b 00 fc 62 64 00 85 20 4e 00 35 63 6e 00 91 20 22 45 4e 54 45 52 20 ┆RVATIONS"; bd N 5cn "ENTER ┆ 0x140…160 4f 42 53 45 52 56 41 54 49 4f 4e 53 3a 20 54 45 4d 50 45 52 41 54 55 52 45 20 54 48 45 54 41 20 ┆OBSERVATIONS: TEMPERATURE THETA ┆ 0x160…180 54 48 45 4e 20 54 49 4d 45 2e 22 00 3c 63 78 00 91 20 00 4a 63 82 00 82 20 49 f0 12 20 ce 20 4e ┆THEN TIME." <cx Jc I N┆ 0x180…1a0 00 5a 63 8c 00 85 20 54 28 49 29 2c 53 28 49 29 00 62 63 96 00 83 20 49 00 6c 63 a0 00 8d 20 0e ┆ Zc T(I),S(I) bc I lc ┆ 0x1a0…1c0 ae 01 00 7a 63 aa 00 82 20 49 f0 13 20 ce 20 4e 00 8e 63 b4 00 88 20 47 f0 54 28 49 29 f3 54 28 ┆ zc I N c G T(I) T(┆ 0x1c0…1e0 49 f3 12 29 00 9c 63 be 00 82 20 4a f0 12 20 ce 20 47 00 af 63 c8 00 88 20 58 f0 54 28 49 f3 12 ┆I ) c J G c X T(I ┆ 0x1e0…200 29 f2 4a f3 12 00 b9 63 d2 00 8d 20 0e 4a 01 00 c4 63 dc 00 91 20 22 21 22 3b 00 d2 63 e6 00 82 ┆) J c J c "!"; c ┆ 0x200…220 20 4b f0 12 20 ce 20 59 00 dd 63 f0 00 91 20 22 20 22 3b 00 e5 63 fa 00 83 20 4b 00 f5 63 04 01 ┆ K Y c " "; c K c ┆ 0x220…240 8b 20 4a f0 12 20 cf 20 0e 22 01 00 ff 63 0e 01 91 20 22 2a 22 00 09 64 18 01 89 20 0e 2c 01 00 ┆ J " c "*" d , ┆ 0x240…260 13 64 22 01 91 20 22 58 22 00 1b 64 2c 01 83 20 4a 00 23 64 36 01 83 20 49 00 29 64 40 01 90 00 ┆ d" "X" d, J #d6 I )d@ ┆ 0x260…280 33 64 4a 01 88 20 59 f0 11 00 41 64 54 01 82 20 51 f0 12 20 ce 20 4e 00 4b 64 5e 01 88 20 50 f0 ┆3dJ Y AdT Q N Kd^ P ┆ 0x280…2a0 12 00 59 64 68 01 82 20 57 f0 12 20 ce 20 4e 00 69 64 72 01 8b 20 57 f0 51 20 cf 20 0e 86 01 00 ┆ Ydh W N idr W Q ┆ 0x2a0…2c0 88 64 7c 01 88 20 50 f0 50 f4 28 58 f3 54 28 57 29 29 f5 28 54 28 51 29 f3 54 28 57 29 29 00 90 ┆ dø P P (X T(W)) (T(Q) T(W)) ┆ 0x2c0…2e0 64 86 01 83 20 57 00 a1 64 90 01 88 20 59 f0 59 f2 50 f4 53 28 51 29 00 a9 64 9a 01 83 20 51 00 ┆d W d Y Y P S(Q) d Q ┆ 0x2e0…300 af 64 a4 01 8e 00 cb 64 ae 01 91 20 22 20 09 09 09 09 52 41 54 49 4f 20 4f 46 20 54 49 4d 45 53 ┆ d d " RATIO OF TIMES┆ 0x300…320 22 00 d8 64 b8 01 91 20 22 30 2e 30 22 3b 00 e7 64 c2 01 82 20 4a f0 12 20 ce 20 0f 1f 00 f2 64 ┆" d "0.0"; d J d┆ 0x320…340 cc 01 91 20 22 2d 22 3b 00 fa 64 d6 01 83 20 4a 00 07 65 e0 01 91 20 22 30 2e 35 22 3b 00 16 65 ┆ "-"; d J e "0.5"; e┆ 0x340…360 ea 01 82 20 4a f0 12 20 ce 20 0f 1e 00 21 65 f4 01 91 20 22 2d 22 3b 00 29 65 fe 01 83 20 4a 00 ┆ J !e "-"; )e J ┆ 0x360…380 35 65 08 02 91 20 22 31 2e 30 22 00 3b 65 12 02 8e 00 46 65 1c 02 8a 22 4d 45 4e 55 00 00 00 1a ┆5e "1.0" ;e Fe "MENU ┆