67—ß ô CHOICÅWHITÅMODÅAPEØSPACÅBLACËHOLÄÍÁÓÂË dk +'0@@@A0@@@S-@ @k(*** THE PYRAMID ***p(Adjust TV contrast andq!(brightness to minimum.!(r (Adjust TV color and tints$!(to suit individual taste.$(uii(aTo 'freeze' display for observation, press . To restart display, press again.x(( Your choice:‚( ¨°© Random ParametersŒ((( ¨±© User Controlled Parameters–'€€"+@$' A €@APª-(-("Draw background of vertical lines?´( ¨°© Even Lines¾( ¨±© Odd LinesÈ( ¨²© No backgroundÒ"@A0Ü!!*@Aæ((Draw pyramid in modeð%%( ¨°© From the center outwardú ( ¨±© From left to right‚!!‚*‚@A`"("(For apex of pyramid use"( ¨°© One Point,( ¨±© Two Points6ƒ@!!ƒ*ƒ@AJ%(%(Spacing of rays from apex?T&&(( usually an integer: ² to ¶ )^„„ @APh%(%(Draw black vertical lines?r( ¨°© Even Lines|( ¨±© Odd Lines†( ¨²© No Lines……"@A š!!…*…@A¤((When finished:®$$( ¨°© Goto random parameters¸( ¨±© Hold the pattern†Ì!!†*†@APÖ#€"@+@$# Aò**RANDOM PARAMETERS**›ô6-P:H:,$@,þ6‚-P:H:,$@,6ƒ-P:H:,$@,%%6„-@%P:H:,$@,‚"‡*ƒ"ˆ*„"‰A6…-P:H:,$@,&*@w*RESET ATTRACT MODE›V**PROGRAM EXECUTION**›X70@70@@l!@A@v @6Š- A€‚" A Š‚"@ A0”**DRAWTO SIDES**›ž‹-A‘@6„¨= @,AYƒ%/A‹1,AYƒ=/‹²] ,AY3/A‹&@E,AYY/‹&@] ‹¼…!@A Æ 6Š-… AІ"@A Ú"H:, ? "+@$ä 6‡-‚6ˆ-ƒ6‰-„î Aç%%**SUBROUTINE FOR VERTICAL LINES›è‹-ŠA@ò,‹/‹A‘ ‹ü$Ï**SUB STARTS FROM CENTER›Ð‹-AX„ÚY @,AY3/AY%‹A‘E,AYY/AY&‹A‘äM ,AYƒ-/A`%‹A‘9,AYƒM/AX&‹A‘î  ‹ $· !!**SUB DRAWS LEFT TO RIGHT**›¸ ‹-A„ % @,AYƒ%/‹A‘Ì : ,AY3/‹%@A‘7 ‹:$€ D:PYRAMID.BAS¤%@Ü',£