00000000: 20 20 20 20 20 20 20 20 CD D5 CC D4 C9 C3 CF CC | ........|
00000010: CF D2 20 D0 C9 C5 20 C7 D2 C1 D0 C8 D3 0D 20 20 |.. ... ....... |
00000020: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 | B|
00000030: 59 0D 20 20 20 20 C3 59 4E 44 49 45 20 CD 45 52 |Y. .YNDIE .ER|
00000040: 54 45 4E 2C 20 C1 4D 59 20 CD 4F 55 4E 54 43 41 |TEN, .MY .OUNTCA|
00000050: 53 54 4C 45 2C 0D 20 20 20 20 20 20 20 20 20 20 |STLE,. |
00000060: 41 4E 44 20 D3 41 52 41 48 20 CD 45 59 45 52 0D |AND .ARAH .EYER.|
00000070: 0D C3 CF CD CD CF C4 CF D2 C5 20 CD C9 C3 D2 CF |.......... .....|
00000080: C3 CF CD D0 D5 D4 C5 D2 D3 20 CD C1 C7 C1 DA C9 |......... ......|
00000090: CE C5 0D CD 41 52 43 48 2F C1 50 52 49 4C 20 31 |....ARCH/.PRIL 1|
000000A0: 39 38 36 0D 50 2E 31 31 35 0D E0 0D 2A 2A 2A 2A |986.P.115...****|
000000B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000D0: 0D CE CF D4 C5 3A 20 D4 48 49 53 20 50 52 4F 47 |.....: .HIS PROG|
000000E0: 52 41 4D 20 49 53 20 57 52 49 54 54 45 4E 20 46 |RAM IS WRITTEN F|
000000F0: 4F 52 20 54 48 45 0D C3 4F 4D 4D 4F 44 4F 52 45 |OR THE..OMMODORE|
00000100: 20 31 32 38 2E 20 20 C2 45 43 41 55 53 45 20 4F | 128. .ECAUSE O|
00000110: 46 20 54 48 49 53 2C 20 59 4F 55 0D 43 41 4E 4E |F THIS, YOU.CANN|
00000120: 4F 54 20 52 55 4E 20 49 54 20 44 49 52 45 43 54 |OT RUN IT DIRECT|
00000130: 4C 59 20 46 52 4F 4D 20 CC CF C1 C4 D3 D4 C1 D2 |LY FROM ........|
00000140: 2E 0D D4 4F 20 52 55 4E 20 54 48 49 53 20 50 52 |...O RUN THIS PR|
00000150: 4F 47 52 41 4D 2C 20 53 49 4D 50 4C 59 20 54 55 |OGRAM, SIMPLY TU|
00000160: 52 4E 20 59 4F 55 52 0D 31 32 38 20 4F 46 46 2C |RN YOUR.128 OFF,|
00000170: 20 54 48 45 4E 20 42 41 43 4B 20 4F 4E 2E 20 20 | THEN BACK ON. |
00000180: D4 48 49 53 20 53 48 4F 55 4C 44 0D 50 55 54 20 |.HIS SHOULD.PUT |
00000190: 59 4F 55 20 49 4E 20 31 32 38 20 4D 4F 44 45 2E |YOU IN 128 MODE.|
000001A0: 20 20 C1 46 54 45 52 20 54 48 49 53 2C 20 41 4C | .FTER THIS, AL|
000001B0: 4C 0D 59 4F 55 20 4E 45 45 44 20 54 4F 20 44 4F |L.YOU NEED TO DO|
000001C0: 20 49 53 20 54 59 50 45 0D C4 CC CF C1 C4 22 D0 | IS TYPE......".|
000001D0: C9 C5 20 C7 D2 C1 D0 C8 D3 2E 31 32 38 22 2E 20 |.. .......128". |
000001E0: 20 D7 48 45 4E 20 54 48 45 0D D2 C5 C1 C4 D9 20 | .HEN THE...... |
000001F0: 50 52 4F 4D 50 54 20 41 50 50 45 41 52 53 2C 20 |PROMPT APPEARS, |
00000200: 53 49 4D 50 4C 59 20 54 59 50 45 0D 22 D2 D5 CE |SIMPLY TYPE."...|
00000210: 22 20 41 4E 44 20 50 52 45 53 53 20 D2 C5 D4 D5 |" AND PRESS ....|
00000220: D2 CE 3E 0D 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..>.************|
00000230: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000240: 2A 2A 2A 2A 2A 2A 2A 2A 0D 0D 0D 20 20 C3 4F 4E |********... .ON|
00000250: 46 52 4F 4E 54 45 44 20 57 49 54 48 20 41 20 4C |FRONTED WITH A L|
00000260: 41 52 47 45 20 41 52 52 41 59 20 4F 46 0D 0D 4E |ARGE ARRAY OF..N|
00000270: 55 4D 42 45 52 53 2C 20 57 48 45 54 48 45 52 20 |UMBERS, WHETHER |
00000280: 54 48 45 59 20 4D 41 4B 45 20 55 50 20 4F 55 52 |THEY MAKE UP OUR|
00000290: 0D 0D 4D 4F 4E 54 48 4C 59 20 42 55 44 47 45 54 |..MONTHLY BUDGET|
000002A0: 20 4F 52 20 4F 55 52 20 53 55 50 45 52 4D 41 52 | OR OUR SUPERMAR|
000002B0: 4B 45 54 0D 0D 52 45 43 45 49 50 54 2C 20 4D 4F |KET..RECEIPT, MO|
000002C0: 53 54 20 4F 46 20 55 53 20 43 41 4E 4E 4F 54 20 |ST OF US CANNOT |
000002D0: 45 41 53 49 4C 59 0D 0D 44 45 41 4C 20 57 49 54 |EASILY..DEAL WIT|
000002E0: 48 20 54 48 45 20 49 4E 46 4F 52 4D 41 54 49 4F |H THE INFORMATIO|
000002F0: 4E 20 54 48 45 53 45 0D 0D 4E 55 4D 42 45 52 53 |N THESE..NUMBERS|
00000300: 20 52 45 50 52 45 53 45 4E 54 2E 0D 0D 20 20 D4 | REPRESENT... .|
00000310: 48 49 53 20 49 53 20 4E 4F 54 20 4A 55 53 54 20 |HIS IS NOT JUST |
00000320: 42 45 43 41 55 53 45 20 57 45 20 41 52 45 0D 0D |BECAUSE WE ARE..|
00000330: 41 42 4F 55 54 20 54 4F 20 46 41 4C 4C 20 42 45 |ABOUT TO FALL BE|
00000340: 48 49 4E 44 20 4F 4E 20 4F 55 52 20 52 45 4E 54 |HIND ON OUR RENT|
00000350: 20 4F 52 20 E0 0D 0D 57 45 52 45 20 4F 56 45 52 | OR ...WERE OVER|
00000360: 43 48 41 52 47 45 44 20 46 4F 52 20 4F 55 52 20 |CHARGED FOR OUR |
00000370: 42 4C 41 43 4B 2D 45 59 45 44 0D 0D 50 45 41 53 |BLACK-EYED..PEAS|
00000380: 2C 20 45 49 54 48 45 52 2E 20 20 D7 45 20 41 52 |, EITHER. .E AR|
00000390: 45 20 49 4E 45 56 49 54 41 42 4C 59 0D 0D 56 49 |E INEVITABLY..VI|
000003A0: 53 55 41 4C 4C 59 20 4F 52 49 45 4E 54 45 44 2D |SUALLY ORIENTED-|
000003B0: 2D 20 41 20 50 49 43 54 55 52 45 20 49 53 0D 0D |- A PICTURE IS..|
000003C0: 57 4F 52 54 48 20 41 20 54 48 4F 55 53 41 4E 44 |WORTH A THOUSAND|
000003D0: 20 57 4F 52 44 53 2E 0D 0D 20 20 C1 4E 44 20 43 | WORDS... .ND C|
000003E0: 4F 4E 53 54 52 55 43 54 49 4E 47 20 50 49 45 20 |ONSTRUCTING PIE |
000003F0: 43 48 41 52 54 53 20 49 53 20 4F 4E 45 0D 0D 4F |CHARTS IS ONE..O|
00000400: 46 20 54 48 45 20 42 45 53 54 20 57 41 59 53 20 |F THE BEST WAYS |
00000410: 54 4F 20 43 4F 4E 56 45 59 20 4C 41 52 47 45 0D |TO CONVEY LARGE.|
00000420: 0D 41 4D 4F 55 4E 54 53 20 4F 46 20 49 4E 46 4F |.AMOUNTS OF INFO|
00000430: 52 4D 41 54 49 4F 4E 20 41 54 20 41 20 47 4C 41 |RMATION AT A GLA|
00000440: 4E 43 45 2E 0D 0D 20 20 CD D5 CC D4 C9 C3 CF CC |NCE... ........|
00000450: CF D2 20 D0 C9 C5 20 C3 C8 C1 D2 D4 D3 20 4C 45 |.. ... ...... LE|
00000460: 54 53 20 59 4F 55 20 44 4F 0D 0D 4A 55 53 54 20 |TS YOU DO..JUST |
00000470: 54 48 41 54 2C 20 51 55 49 43 4B 4C 59 20 41 4E |THAT, QUICKLY AN|
00000480: 44 20 53 49 4D 50 4C 59 2C 20 57 49 54 48 0D 0D |D SIMPLY, WITH..|
00000490: 59 4F 55 52 20 C3 2D 31 32 38 2E 0D 0D 20 20 D4 |YOUR .-128... .|
000004A0: 48 45 20 50 52 4F 47 52 41 4D 20 42 45 47 49 4E |HE PROGRAM BEGIN|
000004B0: 53 20 42 59 20 50 52 4F 4D 50 54 49 4E 47 20 59 |S BY PROMPTING Y|
000004C0: 4F 55 0D 0D 46 4F 52 20 54 48 45 20 54 49 54 4C |OU..FOR THE TITL|
000004D0: 45 20 4F 46 20 59 4F 55 52 20 43 48 41 52 54 2C |E OF YOUR CHART,|
000004E0: 20 54 48 45 4E 20 46 4F 52 0D 0D 54 48 45 20 4E | THEN FOR..THE N|
000004F0: 55 4D 42 45 52 20 4F 46 20 44 49 56 49 53 49 4F |UMBER OF DIVISIO|
00000500: 4E 53 20 4E 45 45 44 45 44 20 49 4E 20 54 48 45 |NS NEEDED IN THE|
00000510: 0D 0D 43 48 41 52 54 2E 20 20 C6 4F 52 20 45 58 |..CHART. .OR EX|
00000520: 41 4D 50 4C 45 2C 20 49 46 20 59 4F 55 20 57 45 |AMPLE, IF YOU WE|
00000530: 52 45 0D 0D 43 4F 4E 53 54 52 55 43 54 49 4E 47 |RE..CONSTRUCTING|
00000540: 20 41 20 48 4F 4D 45 20 46 49 4E 41 4E 43 45 20 | A HOME FINANCE |
00000550: 43 48 41 52 54 2C 20 59 4F 55 0D 0D 4D 49 47 48 |CHART, YOU..MIGH|
00000560: 54 20 4E 41 4D 45 20 49 54 20 C5 D8 D0 C5 CE D3 |T NAME IT ......|
00000570: C5 D3 20 41 4E 44 20 48 41 56 45 20 54 48 52 45 |.. AND HAVE THRE|
00000580: 45 0D 0D 44 49 56 49 53 49 4F 4E 53 2D 2D 20 52 |E..DIVISIONS-- R|
00000590: 45 4E 54 2C 20 46 4F 4F 44 2C 20 41 4E 44 20 43 |ENT, FOOD, AND C|
000005A0: 41 52 2E 0D 0D 20 20 D9 4F 55 20 57 4F 55 4C 44 |AR... .OU WOULD|
000005B0: 20 54 48 45 4E 20 42 45 20 50 52 4F 4D 50 54 45 | THEN BE PROMPTE|
000005C0: 44 20 49 4E 20 54 55 52 4E 0D 0D 54 4F 20 45 4E |D IN TURN..TO EN|
000005D0: 54 45 52 20 54 48 45 20 41 4D 4F 55 4E 54 20 41 |TER THE AMOUNT A|
000005E0: 4E 44 20 54 49 54 4C 45 20 46 4F 52 0D 0D 45 41 |ND TITLE FOR..EA|
000005F0: 43 48 20 44 49 56 49 53 49 4F 4E 2E 0D 0D 20 20 |CH DIVISION... |
00000600: C6 52 4F 4D 20 54 48 49 53 20 49 4E 46 4F 52 4D |.ROM THIS INFORM|
00000610: 41 54 49 4F 4E 2C 20 54 48 45 20 50 52 4F 47 52 |ATION, THE PROGR|
00000620: 41 4D 0D 0D 43 4F 4E 53 54 52 55 43 54 53 20 54 |AM..CONSTRUCTS T|
00000630: 48 45 20 47 52 41 50 48 2E 20 20 C2 45 4C 4F 57 |HE GRAPH. .ELOW|
00000640: 20 54 48 45 0D 0D 47 52 41 50 48 20 49 54 53 45 | THE..GRAPH ITSE|
00000650: 4C 46 20 41 52 45 20 54 48 45 20 54 49 54 4C 45 |LF ARE THE TITLE|
00000660: 53 20 4F 46 20 45 41 43 48 0D 0D 44 49 56 49 53 |S OF EACH..DIVIS|
00000670: 49 4F 4E 2C 20 43 4F 4C 4F 52 20 43 4F 44 45 44 |ION, COLOR CODED|
00000680: 20 54 4F 20 4D 41 54 43 48 20 54 48 41 54 0D 0D | TO MATCH THAT..|
00000690: 53 4C 49 43 45 2E 20 20 D4 48 45 20 4E 55 4D 45 |SLICE. .HE NUME|
000006A0: 52 49 43 41 4C 20 50 45 52 43 45 4E 54 41 47 45 |RICAL PERCENTAGE|
000006B0: 20 4F 46 0D 0D 45 41 43 48 20 44 49 56 49 53 49 | OF..EACH DIVISI|
000006C0: 4F 4E 20 49 53 20 41 4C 53 4F 20 44 49 53 50 4C |ON IS ALSO DISPL|
000006D0: 41 59 45 44 2E 0D 0D C6 C9 CC C5 D3 20 D2 C5 D1 |AYED........ ...|
000006E0: D5 C9 D2 C5 C4 3A 0D D0 C9 C5 20 C7 D2 C1 D0 C8 |.....:.... .....|
000006F0: D3 2E 31 32 38 0D 0D 2D 2D 2D 2D 2D 2D 2D 2D 2D |..128..---------|
00000700: 2D 3C 45 4E 44 20 4F 46 20 41 52 54 49 43 4C 45 |-<END OF ARTICLE|
00000710: 3E 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 0D |>----------.. |
MULTICOLOR PIE GRAPHS.
BY. CYNDIE MERTEN, AMY MOUNTCA
STLE,. AND SARAH MEYER..COMMODO
RE MICROCOMPUTERS MAGAZINE.MARCH/APRIL 1
986.P.115...****************************
********.NOTE: THIS PROGRAM IS WRITTEN F
OR THE.COMMODORE 128. BECAUSE OF THIS,
YOU.CANNOT RUN IT DIRECTLY FROM LOADSTAR
..TO RUN THIS PROGRAM, SIMPLY TURN YOUR.
128 OFF, THEN BACK ON. THIS SHOULD.PUT
YOU IN 128 MODE. AFTER THIS, ALL.YOU NE
ED TO DO IS TYPE.DLOAD"PIE GRAPHS.128".
WHEN THE.READY PROMPT APPEARS, SIMPLY T
YPE."RUN" AND PRESS RETURN>.************
************************... CONFRONTED
WITH A LARGE ARRAY OF..NUMBERS, WHETHER
THEY MAKE UP OUR..MONTHLY BUDGET OR OUR
SUPERMARKET..RECEIPT, MOST OF US CANNOT
EASILY..DEAL WITH THE INFORMATION THESE.
.NUMBERS REPRESENT... THIS IS NOT JUST
BECAUSE WE ARE..ABOUT TO FALL BEHIND ON
OUR RENT OR ...WERE OVERCHARGED FOR OUR
BLACK-EYED..PEAS, EITHER. WE ARE INEVIT
ABLY..VISUALLY ORIENTED-- A PICTURE IS..
WORTH A THOUSAND WORDS... AND CONSTRUCT
ING PIE CHARTS IS ONE..OF THE BEST WAYS
TO CONVEY LARGE..AMOUNTS OF INFORMATION
AT A GLANCE... MULTICOLOR PIE CHARTS LE
TS YOU DO..JUST THAT, QUICKLY AND SIMPLY
, WITH..YOUR C-128... THE PROGRAM BEGIN
S BY PROMPTING YOU..FOR THE TITLE OF YOU
R CHART, THEN FOR..THE NUMBER OF DIVISIO
NS NEEDED IN THE..CHART. FOR EXAMPLE, I
F YOU WERE..CONSTRUCTING A HOME FINANCE
CHART, YOU..MIGHT NAME IT EXPENSES AND H
AVE THREE..DIVISIONS-- RENT, FOOD, AND C
AR... YOU WOULD THEN BE PROMPTED IN TUR
N..TO ENTER THE AMOUNT AND TITLE FOR..EA
CH DIVISION... FROM THIS INFORMATION, T
HE PROGRAM..CONSTRUCTS THE GRAPH. BELOW
THE..GRAPH ITSELF ARE THE TITLES OF EAC
H..DIVISION, COLOR CODED TO MATCH THAT..
SLICE. THE NUMERICAL PERCENTAGE OF..EAC
H DIVISION IS ALSO DISPLAYED...FILES REQ
UIRED:.PIE GRAPHS.128..----------<END OF
ARTICLE>----------..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL