AREA / OMKRETS
FILE INFORMATION
FILENAME(S): AREA / OMKRETS
FILE TYPE(S): PRG
FILE SIZE: 3.6K
FIRST SEEN: 2025-12-01 02:21:53
APPEARS ON: 1 disk(s)
FILE HASH
4da5d8c0a273c1709b18f2b73a7baf89f9f486d4891e887453303a7ae987b594
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 68 M MATTE | AREA / OMKRETS | PRG | hedning, scooby | 15 | 7 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 23 08 0A 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |..#....*********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 00 45 08 14 00 8F 2A 2A 20 20 20 20 20 |***.E....** |
00000030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000040: 20 20 20 2A 2A 00 67 08 28 00 8F 2A 2A 20 20 20 | **.g.(..** |
00000050: 20 41 52 45 41 20 4F 43 48 20 4F 4D 4B 52 45 54 | AREA OCH OMKRET|
00000060: 53 20 20 20 20 2A 2A 00 89 08 32 00 8F 2A 2A 20 |S **...2..** |
00000070: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000080: 20 20 20 20 20 20 20 2A 2A 00 AB 08 37 00 8F 2A | **...7..*|
00000090: 2A 20 20 20 42 45 4E 47 54 20 47 2E 20 4A 4F 48 |* BENGT G. JOH|
000000A0: 41 4E 53 53 4F 4E 20 20 20 2A 2A 00 CD 08 3C 00 |ANSSON **...<.|
000000B0: 8F 2A 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 |.** |
000000C0: 20 20 20 20 20 20 20 20 20 20 20 2A 2A 00 EF 08 | **...|
000000D0: 41 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |A..*************|
000000E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
000000F0: F6 08 42 00 8F CC 00 11 09 44 00 99 22 93 22 3A |..B......D..".":|
00000100: 97 35 33 32 38 30 2C 37 3A 97 35 33 32 38 31 2C |.53280,7:.53281,|
00000110: 30 00 33 09 46 00 99 22 1E 20 20 20 20 20 20 20 |0.3.F..". |
00000120: 20 20 20 20 20 20 41 52 45 41 2C 4F 4D 4B 52 45 | AREA,OMKRE|
00000130: 54 53 22 00 54 09 48 00 99 22 11 11 11 11 20 20 |TS".T.H..".... |
00000140: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000150: 41 56 20 22 00 7D 09 4A 00 99 22 11 11 11 11 20 |AV ".}.J..".... |
00000160: 20 20 20 20 20 20 20 20 20 42 45 4E 47 54 20 47 | BENGT G|
00000170: 2E 20 4A 4F 48 41 4E 53 53 4F 4E 9F 22 00 93 09 |. JOHANSSON."...|
00000180: 4B 00 81 59 B2 31 A4 31 35 30 30 3A 82 59 3A 99 |K..Y.1.1500:.Y:.|
00000190: 22 93 22 00 A9 09 4D 00 8F 2A 2A 2A 49 4E 53 54 |"."...M..***INST|
000001A0: 52 55 4B 54 49 4F 4E 45 52 00 CE 09 50 00 99 22 |RUKTIONER...P.."|
000001B0: 11 11 41 4E 56 5B 4E 44 20 44 45 54 54 41 20 50 |..ANV[ND DETTA P|
000001C0: 52 4F 47 52 41 4D 20 4E 5B 52 20 44 55 22 00 EB |ROGRAM N[R DU"..|
000001D0: 09 52 00 99 22 52 5B 4B 4E 41 52 20 55 54 20 20 |.R.."R[KNAR UT |
000001E0: 20 20 20 12 41 52 45 41 4E 92 22 00 12 0A 54 00 | .AREAN."...T.|
000001F0: 99 22 48 4F 53 20 45 4E 20 4B 56 41 44 52 41 54 |."HOS EN KVADRAT|
00000200: 2C 20 52 45 4B 54 41 4E 47 45 4C 20 45 4C 4C 45 |, REKTANGEL ELLE|
00000210: 52 22 00 20 0A 55 00 99 22 43 49 52 4B 45 4C 22 |R". .U.."CIRKEL"|
00000220: 00 40 0A 58 00 99 22 11 11 44 55 20 4B 41 4E 20 |.@.X.."..DU KAN |
00000230: 4F 43 4B 53 5D 20 52 5B 4B 4E 41 20 55 54 20 22 |OCKS] R[KNA UT "|
00000240: 00 69 0A 5A 00 99 22 12 4F 4D 4B 52 45 54 53 45 |.i.Z..".OMKRETSE|
00000250: 4E 92 20 48 4F 53 20 4B 56 41 44 52 41 54 45 4E |N. HOS KVADRATEN|
00000260: 2C 20 52 45 4B 2D 20 20 22 00 88 0A 5C 00 99 22 |, REK- "...\.."|
00000270: 54 41 4E 47 45 4C 4E 20 4F 43 48 20 48 4F 53 20 |TANGELN OCH HOS |
00000280: 43 49 52 4B 45 4C 4E 22 00 AB 0A 5E 00 99 22 11 |CIRKELN"...^..".|
00000290: 11 44 45 54 20 44 55 20 53 4B 41 4C 4C 20 47 5C |.DET DU SKALL G\|
000002A0: 52 41 20 5B 52 20 41 54 54 20 22 00 CA 0A 60 00 |RA [R ATT "...`.|
000002B0: 99 22 41 4E 47 45 20 4E 5D 47 52 41 20 4F 4C 49 |."ANGE N]GRA OLI|
000002C0: 4B 41 20 4D 5D 54 54 21 21 22 00 F3 0A 62 00 99 |KA M]TT!!"...b..|
000002D0: 22 50 52 4F 47 52 41 4D 4D 45 54 20 47 5C 52 20 |"PROGRAMMET G\R |
000002E0: 41 4C 4C 41 20 55 54 52 5B 4B 4E 49 4E 47 41 52 |ALLA UTR[KNINGAR|
000002F0: 21 21 22 00 1B 0B 8C 00 99 22 11 11 54 52 59 43 |!!"......"..TRYC|
00000300: 4B 20 50 5D 20 12 2A 92 20 46 5C 52 20 50 52 4F |K P] .*. F\R PRO|
00000310: 47 52 41 4D 2D 4D 45 4E 59 4E 22 00 31 0B 91 00 |GRAM-MENYN".1...|
00000320: A1 20 5A 24 3A 8B 5A 24 B3 B1 22 2A 22 A7 31 34 |. Z$:.Z$.."*".14|
00000330: 35 00 3A 0B 96 00 99 22 93 22 00 65 0B 99 00 99 |5.:....".".e....|
00000340: 22 9E 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |".**************|
00000350: 4D 45 4E 59 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |MENY************|
00000360: 2A 2A 11 11 22 00 7F 0B 9B 00 8F 2A 2A 4D 45 4E |**.."......**MEN|
00000370: 59 20 4D 45 44 20 4F 4C 49 4B 41 20 56 41 4C 00 |Y MED OLIKA VAL.|
00000380: 88 0B 9E 00 99 22 9F 22 00 A8 0B A0 00 99 20 22 |....."."...... "|
00000390: 23 20 31 20 46 5C 52 20 4B 56 41 44 52 41 54 45 |# 1 F\R KVADRATE|
000003A0: 4E 53 20 41 52 45 41 22 00 C9 0B AA 00 99 20 22 |NS AREA"...... "|
000003B0: 23 20 32 20 46 5C 52 20 52 45 4B 54 41 4E 47 45 |# 2 F\R REKTANGE|
000003C0: 4C 4E 53 20 41 52 45 41 22 00 E7 0B B4 00 99 20 |LNS AREA"...... |
000003D0: 22 23 20 33 20 46 5C 52 20 43 49 52 4B 45 4C 4E |"# 3 F\R CIRKELN|
000003E0: 53 20 41 52 45 41 22 00 1A 0C B9 00 99 22 11 9E |S AREA"......"..|
000003F0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 |################|
00000400: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 |################|
00000410: 23 23 23 23 23 23 23 23 1E 22 00 3D 0C BE 00 99 |########.".=....|
00000420: 20 22 23 20 34 20 46 5C 52 20 4B 56 41 44 52 41 | "# 4 F\R KVADRA|
00000430: 54 45 4E 53 20 4F 4D 4B 52 45 54 53 22 00 61 0C |TENS OMKRETS".a.|
00000440: C8 00 99 20 22 23 20 35 20 46 5C 52 20 52 45 4B |... "# 5 F\R REK|
00000450: 54 41 4E 47 45 4C 4E 53 20 4F 4D 4B 52 45 54 53 |TANGELNS OMKRETS|
00000460: 22 00 82 0C D2 00 99 20 22 23 20 36 20 46 5C 52 |"...... "# 6 F\R|
00000470: 20 43 49 52 4B 45 4C 4E 53 20 4F 4D 4B 52 45 54 | CIRKELNS OMKRET|
00000480: 53 22 00 9F 0C D7 00 99 20 22 23 20 37 20 46 5C |S"...... "# 7 F\|
00000490: 52 20 41 54 54 20 41 56 42 52 59 54 41 11 22 00 |R ATT AVBRYTA.".|
000004A0: B9 0C DC 00 99 22 12 56 5B 4C 4A 20 54 41 4E 47 |.....".V[LJ TANG|
000004B0: 45 4E 54 20 31 2D 37 92 22 00 C5 0C E6 00 99 22 |ENT 1-7."......"|
000004C0: 11 11 11 9F 22 00 D8 0C EB 00 A1 50 24 3A 8B 50 |...."......P$:.P|
000004D0: 24 B2 22 22 A7 32 33 35 00 F1 0C ED 00 50 B2 C5 |$."".235.....P..|
000004E0: 28 50 24 29 3A 8B 50 B3 31 B0 50 B1 37 A7 32 33 |(P$):.P.1.P.7.23|
000004F0: 35 00 19 0D F0 00 91 20 50 20 89 20 33 30 30 2C |5...... P . 300,|
00000500: 34 30 30 2C 35 30 30 2C 36 30 30 2C 37 30 30 2C |400,500,600,700,|
00000510: 38 30 30 2C 31 30 30 30 30 00 38 0D 22 01 8F 2A |800,10000.8."..*|
00000520: 2A 42 45 52 5B 4B 4E 41 20 4B 56 41 44 52 41 54 |*BER[KNA KVADRAT|
00000530: 45 4E 53 20 41 52 45 41 00 5D 0D 2C 01 99 22 93 |ENS AREA.].,..".|
00000540: 22 3A 99 22 41 52 45 41 20 3D 20 53 49 44 41 4E |":."AREA = SIDAN|
00000550: 20 49 20 4B 56 41 44 52 41 54 22 3A 99 00 78 0D | I KVADRAT":..x.|
00000560: 36 01 85 22 41 4E 47 45 20 53 49 44 41 4E 53 20 |6.."ANGE SIDANS |
00000570: 4C 5B 4E 47 44 22 3B 53 00 A6 0D 3B 01 99 22 56 |L[NGD";S...;.."V|
00000580: 49 4C 4B 45 4E 20 4C 5B 4E 47 44 45 4E 48 45 54 |ILKEN L[NGDENHET|
00000590: 2D 2D 20 43 45 4E 54 49 4D 45 54 45 52 2C 20 45 |-- CENTIMETER, E|
000005A0: 4C 4C 45 52 3F 22 00 AF 0D 3E 01 85 20 4D 24 00 |LLER?"...>.. M$.|
000005B0: D4 0D 40 01 53 41 B2 53 AC 53 3A 53 41 B2 28 B5 |..@.SA.S.S:SA.(.|
000005C0: 28 31 30 30 AC 28 53 41 AA 2E 30 30 35 29 29 29 |(100.(SA..005)))|
000005D0: AD 31 30 30 00 E0 0D 45 01 99 22 93 11 11 11 22 |.100...E.."...."|
000005E0: 00 08 0E 4A 01 99 22 41 52 45 41 4E 20 48 4F 53 |...J.."AREAN HOS|
000005F0: 20 44 49 4E 20 4B 56 41 44 52 41 54 20 4D 45 44 | DIN KVADRAT MED|
00000600: 20 53 49 44 41 4E 20 22 00 1C 0E 54 01 99 22 22 | SIDAN "...T..""|
00000610: 3B 53 3B 4D 24 3B 22 20 5B 52 1E 22 00 36 0E 59 |;S;M$;" [R.".6.Y|
00000620: 01 99 53 41 3B 22 4B 56 41 44 52 41 54 22 3B 4D |..SA;"KVADRAT";M|
00000630: 24 3A 99 22 9F 22 00 41 0E 5E 01 89 20 31 30 30 |$:.".".A.^.. 100|
00000640: 30 00 61 0E 86 01 8F 2A 2A 42 45 52 5B 4B 4E 41 |0.a....**BER[KNA|
00000650: 20 52 45 4B 54 41 4E 47 45 4C 4E 53 20 41 52 45 | REKTANGELNS ARE|
00000660: 41 00 81 0E 90 01 99 22 93 22 3A 99 22 41 52 45 |A......".":."ARE|
00000670: 41 3D 42 41 53 45 4E 20 2A 20 48 5C 4A 44 45 4E |A=BASEN * H\JDEN|
00000680: 22 00 87 0E 95 01 99 00 AA 0E 9A 01 85 22 41 4E |"............"AN|
00000690: 47 45 20 48 5C 4A 44 45 4E 20 28 4B 4F 52 54 41 |GE H\JDEN (KORTA|
000006A0: 20 53 49 44 41 4E 29 22 3B 48 00 CC 0E A4 01 85 | SIDAN)";H......|
000006B0: 22 41 4E 47 45 20 42 41 53 45 4E 20 28 4C 5D 4E |"ANGE BASEN (L]N|
000006C0: 47 41 20 53 49 44 41 4E 29 22 3B 42 00 F3 0E A9 |GA SIDAN)";B....|
000006D0: 01 99 22 41 4E 47 45 20 4C 5B 4E 47 44 45 4E 48 |.."ANGE L[NGDENH|
000006E0: 45 54 2D 2D 20 4D 45 54 45 52 2C 20 45 4C 4C 45 |ET-- METER, ELLE|
000006F0: 52 3F 22 00 FC 0E AB 01 85 20 4D 24 00 21 0F AE |R?"...... M$.!..|
00000700: 01 52 41 B2 42 AC 48 3A 52 41 B2 28 B5 28 31 30 |.RA.B.H:RA.(.(10|
00000710: 30 AC 28 52 41 AA 2E 30 30 35 29 29 29 AD 31 30 |0.(RA..005))).10|
00000720: 30 00 2D 0F B8 01 99 22 93 11 11 11 22 00 50 0F |0.-...."....".P.|
00000730: C2 01 99 22 41 52 45 41 4E 20 48 4F 53 20 44 49 |..."AREAN HOS DI|
00000740: 4E 20 52 45 4B 54 41 4E 47 45 4C 20 4D 45 44 22 |N REKTANGEL MED"|
00000750: 00 64 0F CC 01 99 22 48 5C 4A 44 45 4E 20 22 3B |.d...."H\JDEN ";|
00000760: 48 3B 4D 24 00 7B 0F CE 01 99 22 4F 43 48 20 42 |H;M$.{...."OCH B|
00000770: 41 53 45 4E 20 22 3B 42 3B 4D 24 00 9C 0F D0 01 |ASEN ";B;M$.....|
00000780: 99 22 1E 5B 52 20 22 3B 52 41 3B 22 4B 56 41 44 |.".[R ";RA;"KVAD|
00000790: 52 41 54 22 3B 4D 24 3A 99 22 9F 22 00 A6 0F D6 |RAT";M$:."."....|
000007A0: 01 89 31 30 30 30 00 C3 0F EA 01 8F 2A 2A 42 45 |..1000......**BE|
000007B0: 52 5B 4B 4E 41 20 43 49 52 4B 45 4C 4E 53 20 41 |R[KNA CIRKELNS A|
000007C0: 52 45 41 00 EE 0F F4 01 99 22 93 22 3A 99 22 41 |REA......".":."A|
000007D0: 52 45 41 20 3D 20 50 49 20 2A 20 52 41 44 49 45 |REA = PI * RADIE|
000007E0: 4E 20 49 20 4B 56 41 44 52 41 54 22 3A 99 00 1B |N I KVADRAT":...|
000007F0: 10 F9 01 99 22 4B 4F 4D 20 49 48 5D 47 20 41 54 |...."KOM IH]G AT|
00000800: 54 20 52 41 44 49 45 4E 20 5B 52 20 4C 49 4B 41 |T RADIEN [R LIKA|
00000810: 20 4D 45 44 20 48 41 4C 56 41 22 00 2C 10 FA 01 | MED HALVA".,...|
00000820: 99 22 44 49 41 4D 45 54 45 52 4E 22 00 5B 10 FB |."DIAMETERN".[..|
00000830: 01 99 22 44 49 41 4D 45 54 45 52 4E 20 5B 52 20 |.."DIAMETERN [R |
00000840: 53 5D 4C 45 44 45 53 20 4C 49 4B 41 20 4D 45 44 |S]LEDES LIKA MED|
00000850: 20 52 41 44 49 45 4E 2A 32 11 22 00 7D 10 FE 01 | RADIEN*2.".}...|
00000860: 85 22 41 4E 47 45 20 52 41 44 49 45 4E 20 49 20 |."ANGE RADIEN I |
00000870: 44 49 4E 20 43 49 52 4B 45 4C 22 3B 52 00 A8 10 |DIN CIRKEL";R...|
00000880: 03 02 99 22 41 4E 47 45 20 4C 5B 4E 47 44 45 4E |..."ANGE L[NGDEN|
00000890: 48 45 54 2D 2D 4D 49 4C 4C 49 4D 45 54 45 52 2C |HET--MILLIMETER,|
000008A0: 20 45 4C 4C 45 52 3F 22 00 B1 10 05 02 85 20 4D | ELLER?"...... M|
000008B0: 24 00 DF 10 08 02 43 41 B2 28 52 AE 32 29 AC 33 |$.....CA.(R.2).3|
000008C0: 2E 31 34 31 36 3A 43 41 B2 28 B5 28 31 30 30 AC |.1416:CA.(.(100.|
000008D0: 28 43 41 AA 2E 30 30 35 29 29 29 AD 31 30 30 00 |(CA..005))).100.|
000008E0: EB 10 12 02 99 22 93 11 11 11 22 00 0B 11 1C 02 |....."....".....|
000008F0: 99 22 41 52 45 41 4E 20 48 4F 53 20 44 49 4E 20 |."AREAN HOS DIN |
00000900: 43 49 52 4B 45 4C 20 4D 45 44 22 00 1F 11 26 02 |CIRKEL MED"...&.|
00000910: 99 22 52 41 44 49 45 4E 20 22 3B 52 3B 4D 24 00 |."RADIEN ";R;M$.|
00000920: 40 11 28 02 99 22 1E 5B 52 20 22 3B 43 41 3B 22 |@.(..".[R ";CA;"|
00000930: 4B 56 41 44 52 41 54 22 3B 4D 24 3A 99 22 9F 22 |KVADRAT";M$:."."|
00000940: 00 4A 11 30 02 89 31 30 30 30 00 6C 11 4E 02 8F |.J.0..1000.l.N..|
00000950: 2A 2A 42 45 52 5B 4B 4E 41 20 4B 56 41 44 52 41 |**BER[KNA KVADRA|
00000960: 54 45 4E 53 20 4F 4D 4B 52 45 54 53 00 94 11 58 |TENS OMKRETS...X|
00000970: 02 99 22 93 22 3A 99 22 4F 4D 4B 52 45 54 53 45 |..".":."OMKRETSE|
00000980: 4E 20 3D 53 49 44 4C 5B 4E 47 44 45 4E 20 2A 20 |N =SIDL[NGDEN * |
00000990: 34 22 3A 99 00 BA 11 62 02 85 22 41 4E 47 45 20 |4":....b.."ANGE |
000009A0: 4C 5B 4E 47 44 45 4E 20 50 5D 20 56 41 4C 46 52 |L[NGDEN P] VALFR|
000009B0: 49 20 53 49 44 41 22 3B 53 53 00 E4 11 67 02 99 |I SIDA";SS...g..|
000009C0: 22 41 4E 47 45 20 4C 5B 4E 47 44 45 4E 48 45 54 |"ANGE L[NGDENHET|
000009D0: 2C 20 4B 49 4C 4F 4D 45 54 45 52 2C 20 45 4C 4C |, KILOMETER, ELL|
000009E0: 45 52 3F 22 00 ED 11 69 02 85 20 4D 24 00 13 12 |ER?"...i.. M$...|
000009F0: 6C 02 53 50 B2 53 53 AC 34 3A 53 50 B2 28 B5 28 |l.SP.SS.4:SP.(.(|
00000A00: 31 30 30 AC 28 53 50 AA 2E 30 30 35 29 29 29 AD |100.(SP..005))).|
00000A10: 31 30 30 00 1F 12 71 02 99 22 93 11 11 11 22 00 |100...q.."....".|
00000A20: 41 12 76 02 99 22 4F 4D 4B 52 45 54 53 45 4E 20 |A.v.."OMKRETSEN |
00000A30: 48 4F 53 20 44 49 4E 20 4B 56 41 44 52 41 54 20 |HOS DIN KVADRAT |
00000A40: 22 00 5A 12 80 02 99 22 4D 45 44 20 53 49 44 4F |".Z...."MED SIDO|
00000A50: 52 4E 41 22 3B 53 53 3B 4D 24 00 71 12 85 02 99 |RNA";SS;M$.q....|
00000A60: 22 9E 5B 52 20 22 3B 53 50 3B 4D 24 3A 99 22 9F |".[R ";SP;M$:.".|
00000A70: 22 00 7B 12 8A 02 89 31 30 30 30 00 9E 12 B2 02 |".{....1000.....|
00000A80: 8F 2A 2A 42 45 52 5B 4B 4E 41 20 52 45 4B 54 41 |.**BER[KNA REKTA|
00000A90: 4E 47 45 4C 4E 53 20 4F 4D 4B 52 45 54 53 00 C2 |NGELNS OMKRETS..|
00000AA0: 12 BC 02 99 22 93 22 3A 99 22 52 45 4B 54 41 4E |....".":."REKTAN|
00000AB0: 47 45 4C 4E 53 20 4F 4D 4B 52 45 54 53 20 5B 52 |GELNS OMKRETS [R|
00000AC0: 3A 22 00 E1 12 C1 02 99 22 12 42 41 53 45 4E 20 |:"......".BASEN |
00000AD0: 2A 20 32 20 2B 20 48 5C 4A 44 45 4E 20 2A 20 32 |* 2 + H\JDEN * 2|
00000AE0: 22 00 04 13 C6 02 85 22 41 4E 47 45 20 42 41 53 |"......"ANGE BAS|
00000AF0: 45 4E 20 28 4C 5D 4E 47 41 20 53 49 44 41 4E 29 |EN (L]NGA SIDAN)|
00000B00: 22 3B 42 42 00 28 13 D0 02 85 22 41 4E 47 45 20 |";BB.(...."ANGE |
00000B10: 48 5C 4A 44 45 4E 20 28 4B 4F 52 54 41 20 53 49 |H\JDEN (KORTA SI|
00000B20: 44 41 4E 29 22 3B 48 48 00 53 13 D5 02 99 22 41 |DAN)";HH.S...."A|
00000B30: 4E 47 45 20 4C 5B 4E 47 44 45 4E 48 45 54 2C 20 |NGE L[NGDENHET, |
00000B40: 4D 49 4C 4C 49 4D 45 54 45 52 2C 20 45 4C 4C 45 |MILLIMETER, ELLE|
00000B50: 52 3F 22 00 5C 13 D7 02 85 20 4D 24 00 8B 13 DA |R?".\.... M$....|
00000B60: 02 52 50 B2 28 48 48 AC 32 29 AA 28 42 42 AC 32 |.RP.(HH.2).(BB.2|
00000B70: 29 3A 52 50 B2 28 B5 28 31 30 30 AC 28 52 50 AA |):RP.(.(100.(RP.|
00000B80: 2E 30 30 35 29 29 29 AD 31 30 30 00 97 13 DF 02 |.005))).100.....|
00000B90: 99 22 93 11 11 11 22 00 BE 13 E4 02 99 22 4F 4D |."...."......"OM|
00000BA0: 4B 52 45 54 53 45 4E 20 48 4F 53 20 44 49 4E 20 |KRETSEN HOS DIN |
00000BB0: 52 45 4B 54 41 4E 47 45 4C 20 4D 45 44 22 00 D3 |REKTANGEL MED"..|
00000BC0: 13 EE 02 99 22 48 5C 4A 44 45 4E 20 22 3B 48 48 |...."H\JDEN ";HH|
00000BD0: 3B 4D 24 00 EB 13 F0 02 99 22 4F 43 48 20 42 41 |;M$......"OCH BA|
00000BE0: 53 45 4E 20 22 3B 42 42 3B 4D 24 00 02 14 F3 02 |SEN ";BB;M$.....|
00000BF0: 99 22 9E 5B 52 20 22 3B 52 50 3B 4D 24 3A 99 22 |.".[R ";RP;M$:."|
00000C00: 9F 22 00 0C 14 F8 02 89 31 30 30 30 00 2C 14 16 |."......1000.,..|
00000C10: 03 8F 2A 2A 42 45 52 5B 4B 4E 41 20 43 49 52 4B |..**BER[KNA CIRK|
00000C20: 45 4C 4E 53 20 4F 4D 4B 52 45 54 53 00 49 14 20 |ELNS OMKRETS.I. |
00000C30: 03 99 22 93 22 3A 99 22 4F 3D 50 49 2A 44 49 41 |..".":."O=PI*DIA|
00000C40: 4D 45 54 45 52 4E 22 3A 99 00 67 14 2A 03 99 22 |METERN":..g.*.."|
00000C50: 44 49 41 4D 45 54 45 52 4E 20 3D 20 52 41 44 49 |DIAMETERN = RADI|
00000C60: 45 4E 20 2A 20 32 22 00 6D 14 34 03 99 00 92 14 |EN * 2".m.4.....|
00000C70: 3E 03 85 22 41 4E 47 45 20 44 49 41 4D 45 54 45 |>.."ANGE DIAMETE|
00000C80: 52 4E 20 48 4F 53 20 43 49 52 4B 45 4C 4E 20 22 |RN HOS CIRKELN "|
00000C90: 3B 44 00 BC 14 43 03 99 22 41 4E 47 45 20 4C 5B |;D...C.."ANGE L[|
00000CA0: 4E 47 44 45 4E 48 45 54 2C 20 44 45 43 49 4D 45 |NGDENHET, DECIME|
00000CB0: 54 45 52 2C 20 45 4C 4C 45 52 3F 22 00 C5 14 45 |TER, ELLER?"...E|
00000CC0: 03 85 20 4D 24 00 EF 14 48 03 43 43 B2 44 AC 33 |.. M$...H.CC.D.3|
00000CD0: 2E 31 34 31 36 3A 43 43 B2 28 B5 28 31 30 30 AC |.1416:CC.(.(100.|
00000CE0: 28 43 43 AA 2E 30 30 35 29 29 29 AD 31 30 30 00 |(CC..005))).100.|
00000CF0: FB 14 52 03 99 22 93 11 11 11 22 00 1F 15 5C 03 |..R.."...."...\.|
00000D00: 99 22 4F 4D 4B 52 45 54 53 45 4E 20 48 4F 53 20 |."OMKRETSEN HOS |
00000D10: 44 49 4E 20 43 49 52 4B 45 4C 20 4D 45 44 22 00 |DIN CIRKEL MED".|
00000D20: 35 15 66 03 99 22 44 49 41 4D 45 54 45 52 4E 22 |5.f.."DIAMETERN"|
00000D30: 3B 44 3B 4D 24 00 4C 15 6B 03 99 22 9E 5B 52 20 |;D;M$.L.k..".[R |
00000D40: 22 3B 43 43 3B 4D 24 3A 99 22 9F 22 00 57 15 70 |";CC;M$:.".".W.p|
00000D50: 03 89 20 31 30 30 30 00 7E 15 E8 03 99 22 11 11 |.. 1000.~...."..|
00000D60: 11 4E 5B 52 20 44 55 20 5B 52 20 4B 4C 41 52 20 |.N[R DU [R KLAR |
00000D70: 41 54 54 20 5D 54 45 52 56 5B 4E 44 41 22 00 9E |ATT ]TERV[NDA"..|
00000D80: 15 F2 03 99 22 54 49 4C 4C 20 4D 45 4E 59 4E 2C |...."TILL MENYN,|
00000D90: 20 54 52 59 43 4B 20 50 5D 20 12 2A 92 22 00 B4 | TRYCK P] .*."..|
00000DA0: 15 FC 03 A1 54 24 3A 8B 54 24 B3 B1 22 2A 22 A7 |....T$:.T$.."*".|
00000DB0: 31 30 32 30 00 BD 15 06 04 89 31 35 30 00 EC 15 |1020......150...|
00000DC0: 10 27 99 22 93 22 3A 99 22 5B 52 20 44 45 54 20 |.'.".":."[R DET |
00000DD0: 53 5B 4B 45 52 54 20 41 54 54 20 44 55 20 56 49 |S[KERT ATT DU VI|
00000DE0: 4C 4C 20 41 56 42 52 59 54 41 3F 22 00 05 16 1A |LL AVBRYTA?"....|
00000DF0: 27 99 22 1E 4F 4D 20 44 55 20 53 56 41 52 41 52 |'.".OM DU SVARAR|
00000E00: 20 27 4A 27 22 00 1F 16 24 27 99 22 53 54 4F 50 | 'J'"...$'."STOP|
00000E10: 50 41 53 20 50 52 4F 47 52 41 4D 4D 45 54 22 00 |PAS PROGRAMMET".|
00000E20: 3B 16 2E 27 99 22 9E 53 56 41 52 41 20 27 4A 27 |;..'.".SVARA 'J'|
00000E30: 20 45 4C 4C 45 52 20 27 4E 27 22 00 44 16 38 27 | ELLER 'N'".D.8'|
00000E40: 85 20 51 24 00 56 16 42 27 8B 20 51 24 B2 22 4E |. Q$.V.B'. Q$."N|
00000E50: 22 A7 20 31 35 30 00 6B 16 4C 27 8B 20 51 24 B2 |". 150.k.L'. Q$.|
00000E60: 22 4A 22 20 A7 20 36 33 30 30 30 00 76 16 56 27 |"J" . 63000.v.V'|
00000E70: 89 31 30 30 30 30 00 7C 16 18 F6 80 00 82 16 1A |.10000.|........|
00000E80: F6 2E 00 00 00 |..... |
..#....****************************.E...
.** **.G.(..**
AREA OCH OMKRETS **...2..**
**...7..** BENGT G. JOH
ANSSON **.M.<..**
**...A..****************************.
..B..L...D..".":.53280,7:.53281,0.3.F.."
. AREA,OMKRETS".T.H.."....
AV ".}.J.."....
BENGT G. JOHANSSON."...K..Y.1.1500:.Y:.
"."...M..***INSTRUKTIONER.N.P.."..ANV[ND
DETTA PROGRAM N[R DU"...R.."R[KNAR UT
.AREAN."...T.."HOS EN KVADRAT, REKTAN
GEL ELLER". .U.."CIRKEL".@.X.."..DU KAN
OCKS] R[KNA UT ".I.Z..".OMKRETSEN. HOS K
VADRATEN, REK- "...\.."TANGELN OCH HOS
CIRKELN"...^.."..DET DU SKALL G\RA [R AT
T ".J.`.."ANGE N]GRA OLIKA M]TT!!"...B..
"PROGRAMMET G\R ALLA UTR[KNINGAR!!".....
."..TRYCK P] .*. F\R PROGRAM-MENYN".1...
. Z$:.Z$.."*".145.:....".".E....".******
********MENY**************..".....**MEN
Y MED OLIKA VAL......"."... .. "# 1 F\R
KVADRATENS AREA".I.... "# 2 F\R REKTANGE
LNS AREA"...... "# 3 F\R CIRKELNS AREA".
....."..################################
########.".=.... "# 4 F\R KVADRATENS OMK
RETS".A.H.. "# 5 F\R REKTANGELNS OMKRETS
"...R.. "# 6 F\R CIRKELNS OMKRETS"...W..
"# 7 F\R ATT AVBRYTA."......".V[LJ TANG
ENT 1-7.".E...."....".X....P$:.P$."".235
.....P.E(P$):.P.1.P.7.235...... P . 300,
400,500,600,700,800,10000.8."..**BER[KNA
KVADRATENS AREA.].,..".":."AREA = SIDAN
I KVADRAT":..X.6.."ANGE SIDANS L[NGD";S
...;.."VILKEN L[NGDENHET-- CENTIMETER, E
LLER?"...>.. M$.T.@.SA.S.S:SA.(.(100.(SA
..005))).100...E.."...."...J.."AREAN HOS
DIN KVADRAT MED SIDAN "...T.."";S;M$;"
[R.".6.Y..SA;"KVADRAT";M$:.".".A.^.. 100
0.A....**BER[KNA REKTANGELNS AREA......"
.":."AREA=BASEN * H\JDEN"............"AN
GE H\JDEN (KORTA SIDAN)";H.L...."ANGE BA
SEN (L]NGA SIDAN)";B......"ANGE L[NGDENH
ET-- METER, ELLER?"...... M$.!...RA.B.H:
RA.(.(100.(RA..005))).100.-...."....".P.
B.."AREAN HOS DIN REKTANGEL MED".D.L.."H
\JDEN ";H;M$.{.N.."OCH BASEN ";B;M$...P.
.".[R ";RA;"KVADRAT";M$:."."...V..1000.C
....**BER[KNA CIRKELNS AREA......".":."A
REA = PI * RADIEN I KVADRAT":......."KOM
IH]G ATT RADIEN [R LIKA MED HALVA".,...
."DIAMETERN".[...."DIAMETERN [R S]LEDES
LIKA MED RADIEN*2.".}...."ANGE RADIEN I
DIN CIRKEL";R......"ANGE L[NGDENHET--MIL
LIMETER, ELLER?"...... M$.....CA.(R.2).3
.1416:CA.(.(100.(CA..005))).100......"..
.."......"AREAN HOS DIN CIRKEL MED"...&.
."RADIEN ";R;M$.@.(..".[R ";CA;"KVADRAT"
;M$:.".".J.0..1000.L.N..**BER[KNA KVADRA
TENS OMKRETS...X..".":."OMKRETSEN =SIDL[
NGDEN * 4":....B.."ANGE L[NGDEN P] VALFR
I SIDA";SS...G.."ANGE L[NGDENHET, KILOME
TER, ELLER?"...I.. M$...L.SP.SS.4:SP.(.(
100.(SP..005))).100...Q.."....".A.V.."OM
KRETSEN HOS DIN KVADRAT ".Z...."MED SIDO
RNA";SS;M$.Q....".[R ";SP;M$:.".".{....1
000......**BER[KNA REKTANGELNS OMKRETS.B
....".":."REKTANGELNS OMKRETS [R:"...A..
".BASEN * 2 + H\JDEN * 2"...F.."ANGE BAS
EN (L]NGA SIDAN)";BB.(.P.."ANGE H\JDEN (
KORTA SIDAN)";HH.S.U.."ANGE L[NGDENHET,
MILLIMETER, ELLER?".\.W.. M$...Z.RP.(HH.
2).(BB.2):RP.(.(100.(RP..005))).100.....
."...."......"OMKRETSEN HOS DIN REKTANGE
L MED".S...."H\JDEN ";HH;M$......"OCH BA
SEN ";BB;M$......".[R ";RP;M$:."."......
1000.,....**BER[KNA CIRKELNS OMKRETS.I.
..".":."O=PI*DIAMETERN":..G.*.."DIAMETER
N = RADIEN * 2".M.4.....>.."ANGE DIAMETE
RN HOS CIRKELN ";D...C.."ANGE L[NGDENHET
, DECIMETER, ELLER?".E.E.. M$...H.CC.D.3
.1416:CC.(.(100.(CC..005))).100...R.."..
.."...\.."OMKRETSEN HOS DIN CIRKEL MED".
5.F.."DIAMETERN";D;M$.L.K..".[R ";CC;M$:
.".".W.P.. 1000.~...."...N[R DU [R KLAR
ATT ]TERV[NDA"......"TILL MENYN, TRYCK P
] .*."......T$:.T$.."*".1020......150...
.'.".":."[R DET S[KERT ATT DU VILL AVBRY
TA?"....'.".OM DU SVARAR 'J'"...$'."STOP
PAS PROGRAMMET".;..'.".SVARA 'J' ELLER '
N'".D.8'. Q$.V.B'. Q$."N". 150.K.L'. Q$.
"J" . 63000.V.V'.10000.|.............
> CLICK IMAGE PREVIEW FOR FULL MODAL