CP/M

home *** CD-ROM | disk | FTP | other *** search

/ CP/M / CPM_CDROM.iso / mbug / mbug026.arc / 1987JAN.CAT < prev next >

Wrap

Text File | 1979-12-31 | 58KB | 1,107 lines

.pl70 .po0 .OP .HE# JAN - T H E C A T C H E R -1987 # Thσ followinτ i≤ ß lis⌠ oµ thσ 1986/8╖ committee«á Iµ therσ i≤ anythinτ yo⌡ ì requirσ o≥ an∙ hel≡ yo⌡ caε givσ us¼á pleasσ d∩ no⌠ hesitatσ t∩ contac⌠ an∙ ì onσ oµ us. EXECUTIVE PRESIDENT ANDREW BARFOOT 758-4822 VICE-PRESIDENT STEVEN JEPSON 45-4226 SECRETARY MALCOLM OSBORNE 404-1282 TREASURER KEVIN CARR 233-4629 PUBLI├ OFFICE╥ JOHN BUTTON 578-8145 COMMITTEE AND ASSISTANTS Chris Anderson 438-3762 Peter Broughton 347-8114 Russell Crosser 383-5307 Bob Denton 233-1483 Simon Gerraty 557-2501 Mike Holzinger 354-6742 Jim Lobley 758-9169 Mike Thompson 82-5002 SERVICES PROVIDED BY MBUG AUSTRALIA DISK FORMAT COPYING JOHN BUXTON 758-5744 RBBS SYSTEM OPERATOR. MIKE THOMPSON 82-5002 BAZAAR MICK HOLZINGER P.O. BOX 253 COBURG 3058 EDITOR A. BARFOOT. P.O. BOX 157 NUNAWADING 3131 TAPE LIBRARY C. ANDERSON. P.O. BOX 147 DIAMOND CREEK 3089 MODEM HIRE C. ANDERSON. P.O. BOX. 147 DIAMOND CREEK 3089 MEMBERSHIP SECRETARY J. LOBLEY. P.O. BOX 157 NUNAWADING 3131 PUBLIC DOMAIN (SIG/M) DISKS S. JEPSON. P.O. BOX 8 ROSANNA 3084 ELECTRONIC PARTS DISCOUNT Rod ERVINE 425 HIGH ST. NORTHCOTE ADVERTISEMENTS P.O. BOX 157 NUNAWADING 3131 $50.00 Full Page $25.00 Half Page $15.00 Quarter Page $3.00 For service and recurrent items (Less than 5 lines) No charge for non recurring private sales items GENERAL POLICY T∩á expeditσ you≥ requests¼á genera∞ correspondencσá t∩ Contribution≤ fo≥ thσ CATCHE╥ ma∙ bσ madσ direc⌠ t∩ thσ ì MBU╟á AUS╘á IN├ shoulΣ bσ sen⌠ t∩ ou≥ officia∞á addres≤ editor¼ sen⌠ t∩ thσ RBB╙ o≥ b∙ mail« Contribution≤ wil∞ ì anΣ eacΦ enquir∙ shoulΣ bσ oε seperate forms« bσ accepteΣ viß modem¼ disk≤ (│ 1/2ó o≥ ╡ 1/4")¼ tape, writteε o≥ typed« Contributions will not be considereΣ Thσ editor≤ reservσ thσ righ⌠ t∩ edi⌠ al∞ contribution≤ withou⌠ ß namσ anΣ addres≤ and/o≥ membe≥ number« Pleasσ ì fo≥á thσá sakσá oµ brevity¼á clarit∙á and/o≥á accuracy« includσ ß S.A.┼ fo≥ returε oµ you≥ tape/disk. ì Letter≤á mus⌠á includσá namσ anΣ addres≤á bu⌠á wσá wil∞ ì withholΣ sucΦ detail≤ iµ s∩ requested« AlthougΦá al∞á carσ wil∞ bσ takeεá witΦá contributions¼ ì MBU╟á AUS╘á caεá takσ n∩ responsibilit∙á fo≥á thσá safσì MBU╟áá AUSTRALI┴á INC«áá it≤á officers¼áá member≤áá anΣ returε oµ an∙ materia∞ supplied« Iµ returε i≤ critical¼ì contributor≤á accep⌠ n∩ responsibilit∙ fo≥ an∙á damage≤ (something irreplaceable), don't send it. ì causeΣá t∩á an∙ persoε o≥ propert∙á attributeΣá t∩á an∙ ì advicσ o≥ informatioε publisheΣ iε Thσ CATCHER. MBU╟á AUS╘ INC«á doe≤ no⌠ condonσ thσ non-authoriseΣ usσ oµáá copyrigh⌠á software/hardwarσá anΣá thereforσáá als∩ Microworld Basic listings may carry a number at the end condemn≤ unauthorised copying of such material. of each line. eg. [123]. These are checksum numbers and shoulΣá shoulΣá no⌠ bσ typeΣ iε a≤ par⌠ oµ thσ listing«á Contribution≤ no⌠ necessaril∙ endorseΣ b∙ MbuτáAus⌠ Inc. THE CATCHER is published by MBUG AUSTRALIA INCORPORATED All copyrights are reserved by MBUG AUSTRALIA INCORPORATED è FROM THE CHIEF MBUG FROM THE CHIEF MBUG FROM THE CHIEF MBUG Thσá firs⌠ thinτ ╔ woulΣ likσ t∩ le⌠ yo⌡ kno≈ thi≤ montΦ i≤ tha⌠á somσ ì oµá thσ BASI├ listing≤ havσ ß fe≈ line≤ witΦ thσ checksum≤ missing«á ╔ havσ ì altereΣ thσ listing≤ iε thesσ line≤ froφ doublσ backslashe≤ t∩ PRIN╘ state-ì ments« No room here to explain why. Thσ cluΓ ha≤ donσ ß disδ swa≡ witΦ thσ SoutΦ Australiaε Microbeσá Use≥ ì Group«á Thi≤á swa≡ involve≤ abou⌠ 2░ disk≤ tha⌠ wσ wil∞ bσ includinτ iε ou≥ ì disδá library«á Somσá oµá thσ program≤ arσ alread∙ oεá ou≥á disk≤á bu⌠á thσ ì majorit∙ arσ ne≈ t∩ us«á A≤ ╔ aφ thσ onσ wh∩ ha≤ t∩ collatσ them¼ ╔ decideΣ ì i⌠á wa≤ no⌠ wortΦ thσ timσ o≥ energ∙ t∩ sor⌠ ou⌠ wha⌠ wa≤ ß repea⌠ o≥á wha⌠ ì wa≤á not«á Thσ collectioε ha≤ beeε catalogueΣ a≤ supplieΣ b∙ SAMU╟ anΣá duσ ì recognitioεá giveεá t∩ theφ a≤ thσ suppliers«á Wσ havσ recentl∙ writteεá t∩ ì ove≥ 3░ use≥ group≤ anΣ a⌠ thi≤ timσ onl∙ SAMU╟ havσ replied« Wσ offereΣ t∩ ì nationall∙ co-ordenatσ ß Microbeσ CP/═ disδ distrubitioε systeφ bu⌠ wσá arσ ì stil∞á waitinτá froφá thσ othe≥ group≤ includinτ thσ majo≥ group≤á sucΦá a≤ ì SYDNEY¼á PERTH¼á BRISBANE¼á etc« Iµ thesσ group≤ d∩ no⌠ wan⌠ t∩ participatσ ì witΦá ou≥ idea¼á pleasσ le⌠ u≤ know«á Ou≥ member≤ woulΣ likσ t∩ swa≡á disk≤ ì witΦ yo⌡ iε an∙ case. Thσá seconΣá "clueó iε ou≥ programminτ competitioε i≤ listeΣ late≥á iε ì thi≤á issue«á ╔á hopσ wσ havσ no⌠ se⌠ to∩ harΣ ßá probleφá fo≥á you«á Don'⌠ ì forget¼ wσ arσ offerinτ tw∩ prize≤ oµ $25.0░ eacΦ fo≥ thσ winners« > HAPPY NEW YEAR.... ANDREW FROM THE CHIEF MBUG FROM THE CHIEF MBUG FROM THE CHIEF MBUG $ñ FO╥ SAL┼ $ñ FO╥ SAL┼ $ñ FO╥ SAL┼ $$ MicroBeσ StandarΣ Model«á Include≤ ▓ Drives«á │ 1/2ó anΣ ╡ 1/4ó sizes« Ver∙ ì GooΣ Qualit∙ MitsubishΘ Monitor«á AE═ Rela∙ Controlle≥ Board¼ allow≤ yo⌡ t∩ ì contro∞á ╕ items¼á anythinτ froφ ░ volt≤ u≡ t∩ 24░ volt≤ ma∙ bσ controlled« ì Ha≤á │ ° 24░ Vol⌠ Plug≤ alread∙ oε thσ bacδ oµ thσ case¼á read∙ t∩á contro∞ ì 240÷á Appliances«á Cassettσá Recorde≥ als∩ included«á A≤ wel∞ a≤á ton≤á oµ ì tapes« Al∞ cable≤ included¼ manuals¼ etc« Compute≥ Prin⌠ out≤ oµ programs« ì Magazines¼á lot≤á oµ article≤ abou⌠ thσ MicroBeσá included«á Askinτá arounΣ ì $110░ t∩ $1200¼ bu⌠ willinτ t∩ negotiate. Fo≥á $200.00¼á aεá almos⌠á ne≈á Nicσ Modeφ witΦá simplσá BB╙á softwarσá fo≥ ì answerinτá thσá phone«áá Ha≤á smal∞á bu⌠á effectivσá messagσá system¼á madσ ì specificall∙ fo≥ thi≤ MicroBee«á Thσ modeφ include≤ cable≤ Manuals¼ anΣ i⌠ ì support≤ thσ followinτ bauΣ rates║á CCITT.«á 300¼ 1200/75¼ 600/75¼ anΣ vicσ ì versß eg..75/1200« BELL..« 300¼ 1200/5¼ anΣ vicσ versa... Thσá modeφ ha≤ Aut∩ Answe≥ whicΦ ha≤ beeε specificall∙ createΣ fo≥ thσá Beσ ì mentioneΣá above«á FO╥ MOR┼ INFORMATIO╬ CONTAC╘ Chri≤ Bruntoε O╬ (03⌐á 723-ì 5124« O≥ leavσ ß messagσ t∩ Dirδ Bruntoε oε Bulletiε Board. $ñ FO╥ SAL┼ $ñ FO╥ SAL┼ $ñ FO╥ SAL┼ $$ From: MALCOLM MILES To: ALL Re: 3.5" drives on a 128k Bee ╔á neeΣ t∩ attacΦ ß 3.5ó drivσ t∩ ß 128δ standarΣ Beσ t∩ urgentl∙á transfe≥ ì somσá file≤á froφ ß CIA┬ system«á ╔ understanΣ thi≤ i≤ possiblσ bu⌠ ╔á wil∞ ì neeΣ ß ne≈ BIO╙ oε thσ 128k«á An∙ hel≡ woulΣ bσ appreciateΣ oε thσ bes⌠ anΣ ì quickes⌠á wa∙á t∩á d∩á thi≤á a≤ ╔ aφ ne≈á t∩á thi≤á Beσá world«á Thank≤á iε ì anticipation.è GRAPHIC WORDBEE and EPSON Printers John Slater Member No.485 Durinτá thσ timσ ╔ havσ beeε ß membe≥ oµ MBU╟ Australißá Inc«á ╔á havσ ì recieveΣá man∙ tip≤ anΣ usefu∞ informatioε t∩ d∩ witΦ Microbee≤ anΣ variou≤ ì softwarσá througΦ thσ page≤ oµ Thσ CATCHER«á No≈ it≤ m∙ turε t∩ returεá thσ ì favour. ╔ havσ discovereΣ tha⌠ EPSO╬ printer≤ arσ no⌠ compatablσ witΦ somσá oµ ì thσ softwarσ tha⌠ ha≤ beeε writteε witΦ "EPSO╬ compatablesó iε mind«á Eg« - ì man∙á graphiπá dum≡ program≤ causσ thσ printinτ t∩ ruε ofµ thσ edgσ oµá thσ ì page. WitΦá EPSO╬á "compatables",ES├ "Kó set≤ thσ printe≥ iεá singlσá desit∙ ì graphiπá modσ - 64░ dots/8ó page«á ES├ "Kó oε aε EPSO╬ set≤ thσ printe≥á iε ì singlσ desit∙ graphiπ modσ bu⌠ witΦ onl∙ 48░ dots/8ó page. Iε GRAPHI├ WORDBE┼ thσ .G╥ commanΣ send≤ ES├ "Kó t∩ thσ printe≥ t∩ se⌠ ì i⌠á u≡á iε thσ graphiπ mode«á Tryinτ t∩ prin⌠ ou⌠ onσ oµá thσá demostratioε ì file≤ oε thσ distributioε disk¼ CIRCUIT1¼ resulteΣ iε onl∙ 3/┤ oµ thσ widtΦ ì oµ thσ filσ beinτ printeΣ becausσ oµ thσ differancσ iε do⌠ density. Thσá .E╙ commanΣ ha≤ n∩ effec⌠ becausσ thσ .G╥ commanΣ ove≥ write≤ it« ì S∩ arise≤ thσ problem¼á ho≈ t∩ ge⌠ prope≥ graphic≤ froφ GRAPHI├ WORDBE┼á oε ì t∩ m∙ LX-80? Thσ solutioε haΣ t∩ bσ :- Replacσ ES├ "Kó witΦ thσ prope≥ codσ fo≥ aε EPSO╬ LX-8░ t∩ producσ 64░ ì dots/8"page« Thσ codσ needeΣ fo≥ thi≤ i≤ ES├ "*ó ┤ (1┬ 2┴ 0┤ hex). Froφá ßá ti≡ giveε b∙ D.JUD─ iε aε articlσ iε thσ Jul∙ '8╢á CATCHE╥á ╔ ì founΣá thσá locatioε fo≥ thσ graphic≤ setu≡ informatioε anΣ eventuall∙á thσ ì routinσ t∩ senΣ datß t∩ thσ printer«á Therσ arσ actuall∙ tw∩ graphiπá setu≡ ì routines¼á botΦ werσ changed«á Als∩ tw∩ othe≥ byte≤ werσ changeΣ whicΦá arσ ì useΣ fo≥ thσ .G─ anΣ .G╥ command≤ iε thσ W┬ file. ╔á useΣ CEBU╟ bu⌠ DD╘ o≥ SI─ ma∙ bσ useΣ anΣ thi≤ i≤ thσ proceedurσá ╔ ì followed:- A⌠ thσ promp⌠ A>CEBU╟ WBEE41.COM<cr> Usσ thσ 'Sº commanΣ t∩ changσ thσ datß a⌠ thσ followinτ locations:- 01F░ wa≤ 0░ changσ t∩ 3┼ \ 01F▒ ó 0░ ó 2┴ | 01F▓ ó 0░ ó C─ | 01F│ ó 0░ ó 8│ | 01F┤ ó 0░ ó 0▓ | 01F╡ ó 0░ ó 3┼ \ 01F╢ ó 0░ ó 0┤ Ne≈ graphiπ se⌠ u≡ 1. 01F╖ ó 0░ ó C─ / 01F╕ ó 0░ ó 8│ | 01F╣ ó 0░ ó 0▓ | 01F┴ ó 0░ ó C│ | 01F┬ ó 0░ ó C▒ | 01F├ ó 0░ ó 0▓ / è 02B├ wa≤ 3┼ changσ t∩ C│ \ 02B─ ó 4┬ ó F░ | 02B┼ ó C─ ó 0▒ ⁿ Jum≡ t∩ ne≈ setu≡ 1. 02B╞ ó 8│ ó 0░ | 02C░ ó 0▓ ó 0░ / 03C╡ wa≤ 0─ changσ t∩ 0┴ \ 03C╢ ó 0┴ ó 1┬ | 03C╖ ó 1┬ ó 3│ \ 03C╕ ó 3│ ó 1╕ Graphiπ setu≡ 2. 03C╣ ó 1╕ ó 1┬ / 03C┴ ó 1┬ ó 2┴ | 03C┬ ó 4┬ ó 0┤ / 06A╡ wa≤ 4├ changσ t∩ 0▒ Graphiπ modσ fo≥ .GD 06A╣ ó 4┬ ó 0┤ Graphiπ modσ fo≥ .GR 06A┼ ó BD ó F╢ ▄ Addr« oµ modσ bytσ for 06A╞ ó 02 ó 0▒ » setup. Thi≤ complete≤ thσ change≤ needeΣ fo≥ thσ correc⌠ graphic≤ printing. ╔á changeΣ thσ GRAPHI├ WORDBE┼ messagσ a⌠ thσ Interfacσ men⌡ s∩ a≤á t∩ ì indicatσ thσ modifieΣ Wordbeσ froφ thσ original«á Iµ yo⌡ d∩ no⌠ wisΦ t∩á d∩ ì this¼ g∩ t∩ thσ paragrapΦ whicΦ write≤ thσ modifieΣ filσ t∩ disk. Usinτ thσ 'sº commanΣ makσ thσ followinτ changes:- 0CBE║ 2░ 4╖ 5▓ 4▒ 5░ 4╕ 4╣ 4│ 2░ 5╖ 4╞ 5▓ 4┤ 4▓ 4╡ 45 0CCE: 20 66 6F 72 20 45 50 53 4F 4E 20 4C 58 2D 38 30 0CDE: 20 0A 20 Oncσ al∞ change≤ arσ made¼á savσ thσ modifieΣ filσ bacδ t∩ disδ usinτ thσ ╞ ì anΣ ╫ commands. -F WBEE42.COM give the file a new name -W this will write the file to disk -^C warm boot Tes⌠á thσ filσ b∙ runninτ WBEE4▓ theε tr∙ printinτ onσ oµ thσ file≤ oεá thσ ì distributioε disk« Eg« CIRCUIT1. Iµ al∞ work≤ well¼ makσ ß backu≡ anΣ happ∙ GRAPHI├ WORDBEEing. John Slater From: ANDREW SHAW To: ALL Re: HOUSE OF FRANKENSTEIN ╔á havσá go⌠á al∞ thσ item≤ needeΣ t∩ se≈ u≡ thσ monste≥á EXCEP╘á thσá damε ì electrodesí I≤ therσ somσ kinΣ sou∞ ou⌠ therσ wh∩ caε offe≥ mσ somσ hel≡ iε ì thi≤ desperatσ matte≥ ????┐ Andrew (I hate adv. games) Shaw !!!!! $$ FOR SALE $$ FOR SALE $$ FOR SALE $$ 2╡ datß tape≤ fo≥ sale«á Mostl∙ 30min¼á somσ 20min«á Somσ havσ olΣ file≤ eτ ì tapσ librar∙ oε them«á Migh⌠ bσ wortΦ ß looδ beforσ wipσ them« $1░ thσ lot« ì Leavσ ß messagσ iµ you'rσ interested. Contact WAYNE SIMES (Via RBBS Please) --ooOOoo-- D─á Serie≤á II¼á S─ Serie≤ II¼á RO═ Basσ Serie≤ III¼á WitΦá V.D.U.'s«á Als∩ ì Printer¼á AN─ Beemodeφ ¿ 330░ 1200/7╡ ⌐ For-Sale«á COME╙ WIT╚ SOFTWAR┼ AN─ ì MANUALS« PLEASE RING DEAN DAVIS (A.H) (03) 277-4690.è REVIEW OF `BEEKEEPER' BOOK KEEPING PROGRAM Iµá yo⌡ werσ a⌠ thσ Octobe≥ meetinτ yo⌡ ma∙ havσ seeε ßá demonstratioε ì oµá ßá booδ keepinτ prograφ froφ Anε Cour⌠ Softwarσá nameΣá BEEKEEPER«á Fo≥ ì thosσá oµá yo⌡á tha⌠á werσá no⌠ a⌠ thσ meetinτá o≥á ma∙á no⌠á havσá haΣá aε ì opportunit∙á t∩á seσ thσ demonstration¼á herσ i≤ ß genera∞ rundowε oµá tha⌠ ì program. T∩á usσá Beekeepe≥ yo⌡ wil∞ requirσ ß cop∙ oµá Microsof⌠á Mbasic«á Thσ ì collectioε oµ program≤ i≤ saveΣ usinτ Mbasic'≤ protec⌠ functioε anΣ a≤ sucΦ ì canno⌠ bσ listeΣ o≥ dumpeΣ bu⌠ wil∞ ruε a≤ an∙ othe≥ .BA╙ program. Thσá suitσá oµ program≤ come≤ oε ß singlσ 130cφ o≥ 90cφá disδá anΣá i≤ ì configureΣá prio≥ t∩ purchasσ fo≥ eithe≥ ß singlσ o≥ dua∞ drivσ system«á S∩ ì remembe≥ wheε orderinτ t∩ specif∙ thσ numbe≥ oµ drive≤ iε you≥ system«á Yo⌡ ì als∩á receivσ aε instructioε leafle⌠ describinτ ho≈ t∩ prin⌠ thσá operatinτ ì instructions«á I⌠ neeΣ no⌠ bσ saiΣ tha⌠ ß printe≥ i≤ mandator∙ fo≥ thi≤ anΣ ì an∙ othe≥ accountinτ package« Thσ firs⌠ requiremen⌠ i≤ t∩ prin⌠ ou⌠ thσ shor⌠ manua∞ oµ instruction≤ ì anΣ hints« Thi≤ i≤ containeΣ iε ß filσ calleΣ Manual.bas« Afte≥ digestinτ thσ informatioε yo⌡ caε proceeΣ t∩ ruε thσ prograφá b∙ ì typinτ MBASI├ KEEPE╥ froφ cp/φ o≥ ruε "KEEPERó froφ Mbasic. Wheεá greeteΣ b∙ thσ openinτ men⌡ ╔ answereΣ "yó t∩ thσ Y/╬ promp⌠ anΣ ì founΣá myselµá bacδá iεá MBASI├á (thσ keyboarΣá need≤á t∩á bσá lockeΣá int∩ ì uppercase)«á ╔ wa≤ bacδ iε actioε agaiε afte≥ typinτ ruε anΣ wa≤á presenteΣ ì witΦ thσ maiε menu« Thσ nex⌠ joΓ wa≤ t∩ rese⌠ anΣ initializσ thσ datß file≤ ì anΣá t∩á setu≡ you≥ compan∙ namσ anΣ address«á Thi≤ create≤ thσ datßá file≤ ì named╗ system¼ char⌠ anΣ journal« Nex⌠ ste≡ wa≤ t∩ se⌠ thσ datσ anΣ theε prin⌠ thσ systeφ datß file≤ anΣ ì char⌠á oµ accounts«á Thσ char⌠ oµ account≤ i≤ necessar∙ fo≥á referencσá anΣ ì shoulΣ bσ kep⌠ hand∙ a⌠ al∞ time≤ whilσ posting«á Beforσ postinτ account≤ ╔ ì woulΣá sugges⌠ writinτ thσ accoun⌠ number≤ oε chequσ butt≤ o≥ whateve≥á yo⌡ ì pos⌠ from. Thσ credi⌠ mus⌠ bσ entereΣ first« Fo≥ cheque≤ thi≤ i≤ thσ banδ anΣ fo≥ ì receipt≤ i⌠ i≤ thσ incomσ account«á Thi≤ al∞ work≤ finσ anΣ iµ ß mistakσ i≤ ì madσ i⌠ i≤ possiblσ t∩ red∩ aε entry« Onσá probleφá seem≤ t∩ arisσ wheε yo⌡ tr∙ t∩ debi⌠ onσ asset≤á accoun⌠ ì anΣ credi⌠ another«á Aε examplσ migh⌠ bσ wheε purchasinτ equipment¼ tha⌠ i≤ ì ß credi⌠ t∩ banδ anΣ ß debi⌠ t∩ fixeΣ assets«á Thσ prograφ beep≤ anΣá warn≤ ì yo⌡áá tha⌠á thi≤á i≤á incorrec⌠á anΣá t∩á re-ente≥á thσá transaction«áá Thσ ì instruction≤ statσ t∩ ignorσ thi≤ anΣ ente≥ thσ datß a≤ norma∞ anΣ al∞ wil∞ ì bσá OK«á Thi≤á warninτ i≤ jus⌠ tha⌠ anΣ serve≤ a≤ ß reminde≥ tha⌠á ßá wronτ ì postinτ o≥ ß misallocatioε caε thro≈ ou⌠ you≥ wholσ balancσ sheet. Afte≥ postinτ you≥ transaction≤ anΣ cheque≤ thσ timσ ha≤ comσ t∩ prin⌠ ì ßá transactioε journa∞ anΣ t∩ checδ fo≥ an∙ incorrec⌠ accoun⌠á allocations« ì Iµ thesσ arσ alrigh⌠ thσ Income/Balancσ repor⌠ caε theε bσ printed« BEEKEEPE╥ woulΣ sui⌠ ß smal∞ privatσ busines≤ tha⌠ doe≤ no⌠ neeΣ stocδ ì anΣá debtor≤á reporting«á A≤á sucΦá i⌠á shoulΣá makσá thσá accountant≤á joΓ ì considerabl∙ easie≥ a⌠ thσ enΣ oµ thσ financia∞ year. Thσ prograφ packagσ i≤ availablσ thougΦ thσ BAZAA╥ anΣ cost≤ $90.00è ALGEBRA.MWB By Paul Shannon Herσá i≤á somethinτá fo≥ parent≤ t∩ hel≡ thei≥ childreεá wheεá doinτá thei≥ ì maths. A printer is required. 0100 REM **** ALGEBRA **** █▒┤╡▌ 0110 REM BY PAUL SHANNON █▒┤╢▌ 0120 REM 10 MAY 1983 █▒┤╖▌ 0130 REM ***************** █▒┤╕▌ 0140 CLS : PRINT TAB(29)"ALGEBRA":PRINT:PRINT 0150 PRINT "This program will print random algebra problems for oral"\ "classroom use." █░▒╕▌ 0160 PRINT \"The problems and answers will be printed on a weekly basis." █░│╡▌ 0170 PRINT-PRINT:PRINT:PRINT"Please insure that the ";:UNDERLINE: PRINT " PRINTER";:NORMAL: PRINT " is connected." 0180 CURS 18,15: PRINT "Press SPACE BAR to continue." █▓▓┤▌ 0190 O0 = RND: A0$ = KEY$: IF A0$ = "" THEN 190 █▓╡▒▌ 0200 CLS : PRINT "Please type in an ";:UNDERLINE: PRINT "even";:NORMAL: PRINT " number of weeks. (Maximum 10).": CURS 1,3: PRINT "Then press RETURN." █░│╡▌ 0210 CURS 1,2:INPUT S █▒▓┤▌ 0220 IF S<>2 AND S<>4 AND S<>6 AND S<>8 AND S<>10 THEN 200 █▒░▓▌ 0230 PRINT:PRINT:PRINT"Integers or Whole numbers? (I/W)" 0240 A1$ = KEY$: IF A1$<>"I" AND A1$<>"i" AND A1$<>"W" AND A1$<>"w" THEN 240 █░▒│▌ 0250 PRINT "? ";A1$ █▒▓░▌ 0260 IF A1$ = "I" OR A1$ = "i":Z = 1 █▒│╕▌ 0270 PRINT:PRINT:PRINT"Do you want the problems to increase in difficulty as the "\"weeks progress? (Y/N)" 0280 A1$ = KEY$: IF A1$ = "N" OR A1$ = "n" OR A1$ = "Y" OR A1$ = "y" THEN 290 ELSE GOTO 280 █▒╡░▌ 0290 PRINT "? ";A1$ █▒▓┤▌ 0300 IF A1$ = "Y" OR A1$ = "y" THEN LET T = 1 ELSE LET T = 0: GOTO 350 █░╕│▌ 0310 PRINT:PRINT:PRINT"Do you want to start with easy problems? (Y/N)" 0320 A1$ = KEY$: IF A1$ = "N" OR A1$ = "n" OR A1$ = "Y" OR A1$ = "y" THEN 330 ELSE GOTO 320 █▒│╡▌ 0330 PRINT "? ";A1$ █▒▒╣▌ 0340 IF A1$ = "N" OR A1$ = "n" THEN LET T = 2 █▒░┤▌ 0350 PRINT "Here we go..." █░╖│▌ 0360 OUTL#1: LPRINT CHR (27)CHR(68)CHR(1)CHR(5)CHR(8)CHR(13)CHR(15)CHR(20) CHR(23)CHR(28)CHR(41)CHR(5)CHR(48)CHR(53)CHR(55)CHR(60)CHR(63)CHR(68) CHR(0) █░╣╣▌ 0370 FOR W = 1 TO S STEP 2 █▒╖░▌ 0380 IF Z = 0 THEN 400 █▒╕░▌ 0390 FOR N = 1 TO 2 █░▓░▌ 0400 LPRINT CHR (27)CHR(45)CHR(1)"ADDITION Week ";WCHR(27)CHR(45)CHR(0)TAB (40)CHR(27)CHR(45)CHR(1)"ADDITION Week ";W+1: LPRINT CHR (27)CHR(45)CHR(0); █▒▒│▌ 0410 FOR D = 1 TO 10 █░╡░▌ 0420 FOR P = 1 TO 2 █░▒╢▌ 0430 IF T=1 THEN GOSUB 1020 ELSE IF T=2 THEN GOSUB 1100 ELSE GOSUB 900 █▒│╢▌ 0440 GOSUB 1340 █▓▓┤▌ 0450 ON X GOTO 460,470,480 █▓┤░▌ 0460 LPRINT CHR (9)[I3 D]"."CHR(9)" "V1$CHR(9)"+"CHR(9)[I4 Q]CHR(9)"=" CHR(9)[I4 Q+R]CHR(9)"("V1$"="R")";: GOTO 490 █░╡╢▌ 0470 LPRINT CHR (9)[I3 D]"."CHR(9)[I4 Q]CHR(9)"+"CHR(9)" "V1$CHR(9)"=" CHR(9)[I4 Q+R]CHR(9)"("V1$"="R")";: GOTO 490 █░╡╖▌è0480 LPRINT CHR (9)[I3 D]"."CHR(9)[I4 Q]CHR(9)"+"CHR(9)[I4 R]CHR(9)"=" CHR(9)" "V1$CHR(9)"("V1$"="Q+R")"; █░┤▓▌ 0490 IF M = 1 THEN 870 █▒╕▒▌ 0500 NEXT P:LPRINT : NEXT D:LPRINT : IF Z = 1 THEN NEXT N: GOTO 620 █░╣╡▌ 0510 LPRINT CHR (27)CHR(45)CHR(1)"SUBTRACTION Week ";WCHR(27)CHR(45) CHR(0)TAB(40)CHR(27)CHR(45)CHR(1)"SUBTRACTION Week ";W+1: LPRINT CHR (27)CHR(45)CHR(0); █▒▒╣▌ 0520 FOR D = 1 TO 10 █░╡▓▌ 0530 FOR P = 1 TO 2 █░▒╕▌ 0540 IF T=1 THEN GOSUB 1020 ELSE IF T=2 THEN GOSUB 1100 ELSE GOSUB 900 █▒│╕▌ 0550 GOSUB 1340 █▓▓╢▌ 0560 ON X GOTO 570,580,590 █▓┤╕▌ 0570 LPRINT CHR (9)[I3 D]"."CHR(9)" "V1$CHR(9)"-"CHR(9)[I4 Q]CHR(9)"=" CHR(9)[I4 R]CHR(9)"("V1$"="Q+R")";: GOTO 600 █░╡│▌ 0580 LPRINT CHR (9)[I3 D]"."CHR(9)[I4 Q+R]CHR(9)"-"CHR(9)" "V1$CHR(9)"=" CHR(9)[I4 Q]CHR(9)"("V1$"="R")";: GOTO 600 █░╡┤▌ 0590 LPRINT CHR (9)[I3 D]"."CHR(9)[I4 Q+R]CHR(9)"-"CHR(9)[I4 R]CHR(9)"=" CHR(9)" "V1$CHR(9)"("V1$"="Q")"; █░┤╢▌ 0600 IF M = 1 THEN 870 █▒╖┤▌ 0610 NEXT P:LPRINT : NEXT D:LPRINT █░░╣▌ 0620 LPRINT CHR (27)CHR(45)CHR(1)"MULTIPLICATION Week "WCHR(27)CHR(45) CHR(0);TAB(40)CHR(27)CHR(45)CHR(1)"MULTIPLICATION Week ";W+1: LPRINT CHR (27)CHR(45)CHR(0); █░╡╖▌ 0630 FOR D = 1 TO 10 █░╡┤▌ 0640 FOR P = 1 TO 2 █░▓░▌ 0650 IF T=1 THEN GOSUB 1180 ELSE IF T=2 THEN GOSUB 1270 ELSE GOSUB 930 █▒╡╕▌ 0660 GOSUB 1340 █▓▓╕▌ 0670 ON X GOTO 680,690,700 █▓┤╖▌ 0680 LPRINT CHR (9)[I3 D]"."CHR(9)" "V1$CHR(9)"x"CHR(9)[I4 Q]CHR(9)"=" CHR(9)[I4 Q*R]CHR(9)"("V1$"="R")";: GOTO 710 █░╣╣▌ 0690 LPRINT CHR (9)[I3 D]"."CHR(9)[I4 Q]V1$CHR(9)CHR(9)"="CHR(9)[I4 Q*R] CHR(9)"("V1$"="R")";: GOTO 710 █░▓╣▌ 0700 LPRINT CHR (9)[I3 D]"."CHR(9)[I4 Q]CHR(9)"x"CHR(9)[I4 R]CHR(9)"=" CHR(9)" "V1$CHR(9)"("V1$"="Q*R")"; █░╕▒▌ 0710 IF M = 1 THEN 870 █▒╖╢▌ 0720 NEXT P:LPRINT : NEXT D:LPRINT █░▒▒▌ 0730 LPRINT CHR (27)CHR(45)CHR(1)"DIVISION Week "WCHR(27)CHR(45)CHR(0); TAB(40)CHR(27)CHR(45)CHR(1)"DIVISION Week ";W+1: LPRINT CHR (27) CHR(45)CHR(0); █▒╢╣▌ 0740 FOR D = 1 TO 10: FOR P = 1TO2 █▓│╢▌ 0750 IF T=1 THEN GOSUB 1180 ELSE IF T=2 THEN GOSUB 1270 ELSE GOSUB 930 █▒╡╣▌ 0760 GOSUB 1340 █▓▓╣▌ 0770 ON X GOTO 780,790,800 █▓╡▒▌ 0780 LPRINT CHR (9)[I3 D]"."CHR(9)" "V1$"/"Q" "CHR(9)"="CHR(9)[I4 R] CHR(9)"("V1$"="Q*R")";: GOTO 810 █▒▓╡▌ 0790 LPRINT CHR (9)[I3 D]"."CHR(9)[I5 R*Q]"/"V1$" "CHR(9)"="CHR(9)[I4 Q] CHR(9)"("V1$"="R")";: GOTO 810 █▒▒▓▌ 0800 LPRINT CHR (9)[I3 D]"."CHR(9)[I5 Q*R]"/"RCHR(9)"="CHR(9)" "V1$CHR (9)"("V1$"="Q")";: GOTO 810 █░╡▒▌ 0810 IF M = 1 THEN 870 █▒╖╖▌ 0820 NEXT P:LPRINT : NEXT D:LPRINT █░▒▓▌ 0830 LPRINT CHR (27)CHR(45)CHR(1)"MIXED Week "WCHR(27)CHR(45)CHR(0); TAB(40)CHR(27)CHR(45)CHR(1)"MIXED Week ";W+1: LPRINT CHR (27)CHR(45)CHR(0); █▓░╢▌ 0840 M = 1: FOR D = 1 TO 10: FOR P = 1 TO 2 █▓▓╢▌ 0850 IF Z = 0:K = INT(RND*4)+1: ON K GOTO 430,650,750,540 █▓▒│▌ 0860 K = INT(RND*3)+1: ON K GOTO 430,650,750 █▒▓╕▌ 0870 NEXT P:LPRINT : NEXT D:LPRINT :M = 0: NEXT W █▓▒│▌ 0880 END █▒▒╣▌è0890 REM SIMPLE + █▒╢▒▌ 0900 IF Z = 1: X = INT(RND*3)+1: Q = INT(RND*20)-10: R = INT(RND*20)-1p: RETURN █▒╕│▌ 0910 X = INT(RND*3)+1:Q = INT(RND*10)+1:R = INT(RND*10)+1: RETURN █▒╣│▌ 0920 REM SIMPLE X,/ █▒╡╡▌ 0930 X = INT(RND*3)+1 █░▒░▌ 0940 IF Z = 0 THEN 980 █▒╣╡▌ 0950 Q = INT(RND*24)-12: IF Q = 0 THEN 950 █▒╣▓▌ 0960 R = INT(RND*24)-12: IF R = 0 THEN 960 █▒╣╢▌ 0970 RETURN █▒▓╕▌ 0980 Q = INT(RND*12)+1 █░╡╢▌ 0990 R = INT(RND*12)+1 █░╡╕▌ 1000 RETURN █▒╢▒▌ 1010 REM SIMPLE INCREASING + █▒╣┤▌ 1020 X = INT(RND*3)+1: L = INT(RND*2): IF Z = 0 THEN 1060 █▓┤╢▌ 1030 IF L = 1 THEN LET Q = INT(RND*20)*W-W*10: LET R = INT(RND*20)-10 █▓▒▒▌ 1040 IF L = 0 THEN LET R = INT(RND*20)*W-W*10: LET Q = INT(RND*20)-10 █▓▒▒▌ 1050 RETURN █▒╢╢▌ 1060 IF L = 1 THEN LET Q = INT(RND*10)*W+1: LET R = INT(RND*10)+1 █▓│╣▌ 1070 IF L = 0 THEN LET R = INT(RND*10)*W+1: LET Q = INT(RND*10)+1 █▓│╣▌ 1080 RETURN █▒╢╣▌ 1090 REM HARD INCREASING + █▓░▓▌ 1100 X = INT(RND*3)+1: L = INT(RND*2): IF Z = 0 THEN 1140 █▓┤┤▌ 1110 IF L = 1 THEN LET Q = INT(RND*20)*W-W*10: LET R = INT(RND*180)-90 █░▒╖▌ 1120 IF L = 0 THEN LET R = INT(RND*20)*W-W*10: LET Q = INT(RND*180)-90 █░▒╖▌ 1130 RETURN █▒╢╡▌ 1140 IF L = 1 THEN LET Q = INT(RND*10)*W+1: LET R = INT(RND*90)+1 █▓┤╢▌ 1150 IF L = 0 THEN LET R = INT(RND*10)*W+1: LET Q = INT(RND*90)+1 █▓┤╢▌ 1160 RETURN █▒╢╕▌ 1170 REM SIMPLE INCREASING X,/ █▓░▒▌ 1180 X = INT(RND*3)+1:L = INT(RND*2): IF Z = 0 THEN 1230 █▓╡▓▌ 1190 IF L = 1 THEN LET Q = INT(RND*24)+W-(W/2+12):R = INT(RND*24)-12 █▒╕▒▌ 1200 IF L = 0 THEN LET R = INT(RND*24)+W-(W/2+12):Q = INT(RND*24)-12 █▒╖▓▌ 1210 IF R = 0 OR Q = 0 THEN 1190 █▒░╖▌ 1220 RETURN █▒╢╡▌ 1230 IF L=1 THEN LET Q=INT(RND*12)+INT(FLT(W/2))+1:R = INT(RND*12)+1 █▓▓╢▌ 1240 IF L=0 THEN LET R=INT(RND*1)+INT(FLT(W/2))+1:Q = INT(RND*12)+1 █▒╖╢▌ 1250 RETURN █▒╢╕▌ 1260 REM HARD INCREASING X,/ █▓░▒▌ 1270 X = INT(RND*3)+1: IF Z = 0 THEN 1310 █▒╕╕▌ 1280 Q = INT(RND*30)-15: R = INT(RND*30)-15 █▒╢▓▌ 1290 IF R = 0 OR Q = 0 THEN 1190 █▒▒╡▌ 1300 RETURN █▒╢┤▌ 1310 Q = INT(RND*15)+1: R = INT(RND*15)+1 █░╡▓▌ 1320 RETURN █▒╢╢▌ 1330 REM RANDOM VARIABLE LETTER █▒╣╣▌ 1340 U = INT(RND*26)+97 █▒╢╖▌ 1350 IF U = 108 OR U = 111 OR U = 120 THEN GOTO 1340 █░╢│▌ 1360 V1$ = CHR$(U) █░╕╣▌ 1370 RETURN █▒╖▒▌ From: CHRISTIAN SIM To: ALL Re: MODEM WANTED Hi«á ┴á ne≈ chuφ witΦ thi≤ modeφ anΣ bulletiε boarΣ stuff«á Iε fac⌠ ╔á aφ ì usinτá ßá friend≤á iεá orde≥á t∩ ge⌠ ont∩ you≥ boarΣ s∩ ╔á caεá asδá ßá fe≈ ì questions«á ╔ aφ gettinτ ß modeφ a⌠ Xma≤ timσ anΣ ╔ woulΣ likσ t∩ kno≈á iµ ì therσ arσ an∙ fo≥ salσ througΦ you≥ board« B∙ thσ wa∙ m∙ systeφ a⌠ homσ i≤ ì Microbee« Yo⌡ caε leavσ ß messagσ herσ anΣ ╔ wil∞ checδ nex⌠ timσ ╔ visi⌠ Leave message on BB please.è CATLIST2.BAS This program is designed to work with MAST.CAT¼á which is a catalog of CP/═ ì file≤á produceΣá b∙ CATM.COM«á It≤ purposσ i≤ t∩ onl∙ lis⌠ ß filσ oncσá anΣ ì notσ ho≈ man∙ othe≥ copie≤ exist« I⌠ print≤ tw∩ column≤ pe≥ page« CB80.CO═ ì o≥ CBASIC.CO═ i≤ requireΣ t∩ compliσ thi≤ listing. MAST.CA╘á must be on the SAM┼ DRIV┼ as CATLIST2.CO═ or you will get the ì erro≥á messagσá O┼á (Caε no⌠ opeε file)«á Iµ MAST.CA╘ i≤á empt∙á thσá erro≥ ì messagσ EF¼ wil∞ appea≥ oε thσ printer. REM PROGRAM TO REMOVE DUPLICATE FILES FROM MAST.CAT PRINTING PRINT " BY MIKE HOBBY (03) 435-2016 4DEC86 " PRINT PRINT "THIS PROGRAM IS DESIGNED TO WORK WITH MAST.CAT, WHICH IS A" PRINT "CATALOG OF CP/M FILES PRODUCED BY CATM.COM " PRINT "ITS PURPOSE IS TO ONLY LIST A FILE ONCE & NOTE HOW MANY " PRINT "OTHER COPIES EXIST, IT PRINTS TWO COLUMNS PER PAGE " ON ERROR GOTO BLUE LNS=0 BLANK$=" " LINE$ ="###############################################################" N%=4 DISCFLAG=0 PAGENO=1 BLANK$=" " TOPOF$=CHR$(12) INPUT "INPUT COMPUTOR LOCATION ";CPU$ INPUT "INPUT TO DAY`S DATE";DATE$ PRINT INPUT "ENTER 1 IF YOU WANT DISK NAMES LISTED,ELSE 0 ";DISCFLAG DEF HEADG PRINT "CATALOG OF FILES ON COMPUTER AT "; CPU$ + BLANK$ + DATE$ +\ BLANK$;"PAGE ";PAGENO PRINT LINE$ FEND DEF NEWPAGE PRINT TOPOF$ LNS=0 PAGENO=PAGENO+1 CALL HEADG FEND LPRINTER CALL HEADG OPEN "MAST.CAT" AS 7 PRNTFLAG=-1 COUNT=0 FIRSTREAD: READ #7; T$ : PRINT T$ :LNS=LNS+2 IF RIGHT$(T$,1) = ")" THEN GOTO SECONDREAD ELSE GOTO FIRSTREAD SECONDREAD: READ #7; T$,S$ IF LEFT$(T$,2) = "++" THEN IF DISCFLAG =1 THEN GOTO DISCFILE IF LEFT$(T$,2) = "++" THEN GOTO SECONDREAD PRINT :LNS=LNS+2 GETNEXT: READ #7; Z$,V$ : IF END #7 THEN THEEND IF Z$=T$ THEN LET COUNT = COUNT + 1 : GOTO GETNEXT EXTLOCATE: PACKT:è L = MATCH(".",T$,1) L=L-1 U$=LEFT$(T$,L) : W$=RIGHT$(T$,N%) FOR J=1 TO 8 - L : U$=U$+" " : NEXT J P$=U$ + W$ PACKS: L = MATCH(".",S$,1) L=L-1 U$=LEFT$(S$,L) : W$=RIGHT$(S$,N%) FOR J=1 TO 8 - L : U$=U$+" " : NEXT J Q$=U$ + W$:GOTO PRESS DISCFILE: U$=LEFT$(T$,10) :W$=RIGHT$(S$,4) L=MATCH(".",S$,1) L=L-1 M$=LEFT$(S$,L) FOR J=1 TO 8-L:M$=M$+" ":NEXT J P$=U$+"E"+BLANK$+M$+W$ PRINT P$ LNS=LNS+1 IF LNS GE 110 THEN CALL NEWPAGE GOTO SECONDREAD PRESS: IF COUNT GE 1 THEN LET P3$=" +" + STR$(COUNT) + " MORE" ELSE LET P3$="" IF PRNTFLAG = 1 THEN LET COLUMN = 40 ELSE LET COLUMN = 1 PRINT TAB(COLUMN);P$+" "+Q$+P3$; : IF PRNTFLAG = 1 THEN PRINT PRNTFLAG = PRNTFLAG * (-1) LNS=LNS+1 IF LNS GE 110 THEN CALL NEWPAGE COUNT = 0 : T$=Z$ : S$=V$ IF LAST THEN RETURN REM IF LEFT$(T$,2) = "++" THEN GOTO SECONDREAD GOTO GETNEXT THEEND: LAST = -1 GOSUB EXTLOCATE CLOSE 7 PRINT TOPOF$ CONSOLE PRINT " DONE , COMPLETE , ALL IS FINISHED " STOP BLUE: PRINT PRINT "ERROR :-" ;ERR : PRINT " ON LINE :-" ;ERRL END Iµá anyonσá woulΣ likσ ß versioε oµ thi≤ filσ modifieΣ iε an∙á way¼á pleasσ ì contac⌠á M«á Hobb∙ viß ou≥ RBB╙ o≥ seσ hiφ a⌠ MBU╟ meetings«á Thσá compileΣ ì versioεá oµ thi≤ filσ i≤ oε thσ curren⌠ MBU╟ publiπ domaiε disδá fo≥á thosσ ì wh∩á d∩á no⌠ havσ CB8░ t∩ compilσ thσ listinτ o≥ fo≥ thosσ wh∩ d∩ no⌠á havσ ì thσ timσ o≥ ??┐ t∩ conver⌠ i⌠ t∩ anothe≥ language« Ö ED. *************************************************************************** FOR SALE COMPUTE╥á I╬á ┴ BOO╦ VOL'╙ ▒ ª 2«á 64δ RAM«á 3.╡ incΦá DIS╦á DRIVES¼á AMBE╥ ì MONITO╥ ª STAN─ ,AL╠ TH┼ SOFTWAR┼ YO╒ NEE─ INCLUDIN╟ GAMES¼á WORDSTAR¼á AN─ ì DBAS┼ I╔ etc« $950.00 THE LOT TEL. JOE (051) 918205 AH. (051) 733215 BUS HRS. ***************************************************************************è CUSTOMISATION OF WORDSTAR 3.3 by Fred Scott (SMUG) Thi≤á i≤á ß reprin⌠ (b∙ BoΓ Denton⌐ oµ aε articlσ froφ thσ BeeLinσá oµ ì Novembe≥ 1985. Thσ followinτ tablσ i≤ ß combinatioε oµ tw∩ publiπ domaiε files«á WitΦ ì thi≤ tablσ i⌠ i≤ possiblσ t∩ usσ DD╘ o≥ CEBU╟ t∩ customisσ WORDSTA╥ t∩ sui⌠ ì you≥ owε taste. Setting≤ giveε arσ fo≥ UNinstalleΣ CP/M8░ WORSTA╥ 3.3 ## --> indicates the number of characters for this function, the maximum number available is shown by the number of 00's that follow. If non- zero in the uniinstalled WORDSTAR, the values are shown. 00 --> a patch point. Where a string of bytes is available, truncated to a single '0' to save space. rr --> reserved. LABEL LOCATION OPERATION DEFAULT USER1 - TERMINAL PATCH AREA: HITE 0232 screen height in lines (24) 18 WID 0233 screen width in columns (80) 50 CURSOR POSITIONING: CLEAD1 0234 lead in characters 02 1B 3D 0 0 0 0 0 0 CLEAD2 023D chars between column or line ## 00 00 00 00 CTRAIL 0242 trailing characters ## 00 00 00 00 CB4LFG 0247 =FF if column first 00 LINOFF 0248 ascii line offset 20 COLOFF 0249 ascii column offset 20 ASCUR 024A type: 0=binary, 2=2 digit ascii, 3=3 digit ascii 00 UCRPOS 024B jump to own cursor positon routine with column 00 00 C9 and line in H and L regs. call OUTCHR to output. TERMINAL CODES: ERAEOL 0250 erase to end of line 02 1B 54 0 0 0 0 LINDEL 0257 delete line 02 1B 52 0 0 0 0 LININS 025E line insert 02 1B 45 0 0 0 0 IVON 0267 turn on highlighting 02 1B 29 0 0 0 0 IVOFF 026E turn off highlighting 02 1B 28 0 0 0 0 TRMINI 0275 terminal initialisation string ## 00 00 ....... TRMUNI 027E terminal termination string ## 00 00 ....... INISUB 0287 special string for custom initialisation 00 00 C9 if not 0 then called before TRMINI is sent UNISUB 028A special string for custom termination 00 00 C9 if not 0 then called before TRMUNI is sent SYSTEM VARIABLES: USELST 028D =FF for last column/row display flag 00 DELCUS 028E delay after cursor set 01 DELMIS 028F delay after other functions 01 MEMORY MAPPED DISPLAY: MEMAPV 0290 =FF for memory mapped display terminal FF MEMADR 0291 ram address of first screen character 00 F0 HIBIV 0293 =FF if inverse video by hi order bit FF HIBCUR 0294 =FF if display cursor by hi order bit FF CRBLIV 0295 =FF to blink cursor if on inverse video FF FIX FOR BACSPACE ON <DEL>: ZAFCIN 0296 bios address of last character input 00 00 RUBFIX 0298 =FF to output refixer character on <DEL> 00 RFIXER 0299 character to output after each <DEL> 00è USER SUPPLIED CONSOLE I/O ROUTINES: UCNSTA 029A jump to status of console (char ready?) 00 00 C9 UCONI 029D jump to routine to input char from console 00 00 C9 UCONO 02A0 jump to routine to output char to console 00 00 C9 SWIN 02A3 optional routine before DMA to video board 00 00 C9 0 0 0 SWOUT 02A9 optional routine after DMA to video board 00 00 C9 0 0 0 DELAYS: DEL1 02AF short delay, cursor blink 03 DEL2 02B0 medium-short delay, cursor blink 09 DEL3 02B1 medium-long delay, time to prefix menus 19 DEL4 02B2 long delay, time for note displays 10 DEL5 02B3 delay until screen redisplay 03 HORIZONTAL SCROLL: SCRLSZ 02BA number of columns for horizontal scroll 14 USER2 - PARAMETERS USER MAY ALTER INITIALISATION ITEMS: ITHELP 034D initial help level 03 NITHLF 034E =0 for maximum help message FF ITITOG 034F insert mode off=0 on=FF FF ITDSDR 0350 no-file directory off=0 on=FF FF INITPF 0351 line height in 1/48's 08 0352 paper length in lines 42 0353 paper length in 1/48's 10 02 0355 line height again 08 0356 top margin in lines 03 0357 top margin in 1/48's 18 00 0359 line height again 08 035A heading margin in lines 02 035B heading margin in 1/48's 10 00 035D line height again 08 035E bottom margin in lines 08 035F bottom margin in 1/48's 40 00 0361 line height again 08 0362 footing margin in lines 02 0363 footing margin in 1/48's 10 00 0365 line height again 08 0366 =0 for standard character width 00 0367 standard character width in 1/120's 0C 0368 alternate character width in 1/120's 0A 0369 page offset in characters 08 INITLM 036A initial left margin less 1 00 INITRM 036B initial right margin less 1 up to WID-4 40 INITSR 036C initial sub/superscript roll in 1/48's 03 INITWF 036D word wrap flag, off=0 on=FF FF 036E justify flag, off=0 on=FF FF 036F variable tabs flag, off=0 on=FF FF 0370 soft hyphen flag, off=0 on=FF 00 0371 hyphen help flag, off=0 on=FF FF 0372 print control chars flag, off=0 on=FF FF 0373 ruler line display, off=0 on=FF FF 0374 page break determination, off=0 on=FF FF 0375 page break display, off=0 on=FF FF 0376 line spacing 01 0377 0=block mode, FF=column mode 00 NONDOC 0378 direct entry, 0=doc edit FF=non doc edit 00 DOTSON 0379 dot commands, 0=disable FF=enable FF DECCHR 037A decimal point character . 2E DOTCHR 037B character to begin dot commands . 2EèBLNCHR 0386 non break space character ^O 0F CMTCHR 0387 ; 3B ENDEXP 0388 G 47 RVELIM 0389 , 2C RVQUOT 038A " 22 00 TXBACK 038C / 2F 42 VARCH1 038E & 26 VARCH2 038F & 26 VAROPC 0390 / 2F COMPOP 0396 03 LOGICP 03B7 . 2E HZONE 03C9 hyphenation, increase for less stops 04 VOWTAB 03CE table of vowels Y[] 59 5B 5D 7B 7D NONCON 03D3 table of no consonant letters AEIOU 41 45 49 4F 55 00 00 00 00 BOFCHR 03DD beginning of file flag : 3A CONCHR 03DE file line continuation flag + 2B EOFCHR 03DF end of file flag . 2E FDTCHR 03E0 MailMerge dot command flag M 4D HARDCR 03E1 line ends in hard CR flag < 3C LFCHR 03E2 line ends in LF w/o CR flag J 4A OVPCHR 03E3 line ends in CR w/o LF flag - 2D PAGCHR 03E4 end of page flag P 50 SOFTCR 03E5 soft CR flag <sp> 20 SOFHYC 03E7 character used for soft hyphens -(+80) AD PAGFIL 03E8 character used for page breaks - 2D MARKS 03E9 character used for start of blocks B 42 03EA character used for end of blocks K 4B rr rr rr 03EE character used for user marks 01234 30 31 32 33 34 56789 35 36 37 38 39 PODBLK 03F8 disk file output default, 0=no FF=yes 00 03F9 use form feeds, 0=no FF=yes 00 03FA suppress page formatting, 0=no FF=yes 00 03FB pause between pages, 0=no FF=yes 00 NOUFF 03FC =FF for suppress form feed question 00 ITPOPN 03FD print page numbers, 0=on FF=off 00 ITMIJ 03FE microjustify switch, 0=off FF=on FF ITBIP 03FF bidirectional print, 0=off FF=on FF FILE NAMES: FNWSCM 0400 name of WORDSTAR program WS COM DSKTNA 040C name of message file WSMSGS OVR FNOVLY 0418 name of overlay file WSOVLY1 OVR FNMRGP 0424 name of merge-print overlay MAILMRGEOVR AUTOMATIC BACKSPACE TABLE: AUTOBS 0430 chars for auto backspace 0 0 0 0 0 0 0 0 0 0 BSCHR 043B auto backspace character ^H 08 USER4 - PRINTER PATCH AREA: ALL PRINTERS: POSMTH 0699 printer type 1=daisy,0=bs'ing,FF=tty FF BLDSTR 069A number of strikes for boldface 02 DBLSTR 069B number of strikes for double strike 02 PSCRLF 069C string to advance to next line 02 0D 0A 0 0 0 00 00 0 0 0 PSCR 06A7 string to CR w/o LF 02 0D 0 0 0 0 0 NON-DAISY PRINTER: PSHALF 06AE CR and half LF ## 00 0 0 0 0 0 PBACKS 06B5 print backspace ^H 01 08 0 0 0 0 PALT 06BB set alternate character width ^A ## 00 0 0 0 PSTD 06C0 set standard character width ^N ## 00 0 0 0èROLUP 06C5 roll carriage up partial line ^T ## 00 0 0 0 ROLDOW 06CA roll carriage down partial line ^V ## 00 0 0 0 ALL PRINTERS: USR1 06CF user function 1 ^Q ## 00 0 0 0 USR2 06D4 user function 2 ^W ## 00 0 0 0 USR3 06D9 user function 3 ^E ## 00 0 0 0 USR4 06DE user function 4 ^R ## 00 0 0 0 RIBBON 06E3 change to alternate color ribbon ^Y ## 00 0 0 0 RIBOFF 06E8 change to normal ribbon ^Y ## 00 0 0 0 PSINIT 06ED string to initialise printer ## 00 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 PSFINI 06FE string to terminate printing ## 00 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 SOCHR 070F character for strikeout - 2D ULCHR 0710 character for underlining _ 5F PRINIT 0711 jump to printer custom initialise routine 00 00 C9 PRFINI 0714 jump to printer custom terminate routine 00 00 C9 TRANSMISSION OF CHARACTERS TO PRINTER: CSWTCH 0717 where to send output 00 0=LST, 1=W* port driver, 2= user supplied driver 3=OEM daisy, 4= alternate console HAVBSY 0718 =FF if printer driver installed 00 IF CSWTCH=0 (OUTPUT TO LST:) LIBSY 0719 jump to printer busy test 00 B7 C9 LISEND 071C output character ... LISINP 0724 jump to input character from printer 00 37 C9 USER5 - FOR DAISY PRINTERS: DVMILE 077A vertical motion index leadin string 02 1B 1E 0 0 DVMITR 077F 02 1B 02 0 0 DVMMIN 0784 minimum DVMILE (no motion) 01 00 DVMRNG 0786 maximum DVMILE 1/48's 7E 00 DHMILE 0788 horizontal motion index leadin string 02 1B 1F 0 0 DHMIFG 078D 0 for 120ths FF for 60ths 00 DHMIN 078E minimum DHMILE 01 00 DHRNG 0790 maximum DHMILE in DHMIFG's 7E 00 DFWD 0792 set forward print 02 1B 35 0 0 DBAK 0797 set backward print 02 1B 36 0 0 DSP 079C forward space 01 20 00 0 0 DBS 07A1 backward space 01 08 00 0 0 DLF 07A6 line feed VMI 01 0A 00 0 0 DRLF 07AB reverse line feed 02 1B 0A 0 0 DPHSPC 07B0 print phantom space 02 1B 59 0 DPHRUB 07B4 print phantom rubout 02 1B 5A 0 DNPROS 07B8 suppress all proper spacing 0=on FF=off 00 DMJWB 07B9 alter microjustify algorithm 0=no FF=alternate 00 PROPORTIONAL SPACING TABLE - DEVELOPMENTAL: DIGIT 1 FOR NON-PROPORTIONAL TYPEWHEELS, VALUE IN 60THS, <SP>=5 DIGIT 2 FOR PROPORTIONAL TYPEWHEELS, (THEME PS 10), <SP>=3 (HIGH ORDER BIT OF BOTH HEX DIGITS UNASSIGNED) PSTAB 07BA space,phantom space 52 07BB ! mark 43 etc in ascii order to 0818 56 0819 phantom rubout 55 INFCB 081C internal file control block 00 20 20 .... è.. this page has graph on wordstar menus è A REVIEW OF "TOP OF THE CLASS" FROM GOODISON SOFTWARE P/L Wel∞á i⌠á seem≤ tha⌠ thσ Triviß crazσ ha≤ finall∙á hi⌠á thσá Microbee« ì Followinτá i≤ ß brieµ revie≈ oµ anothe≥ grea⌠ softwarσ produc⌠á distributeΣ ì b∙ Goodisoε Softwarσ Pt∙ Ltd« Thσ namσ oµ thσ prograφ i≤ "TO╨ O╞ TH┼ CLASSó ì anΣá wa≤á writteεá b∙ Johε Kennß froφ aε ideß b∙á Johεá Kerr«á Thσá prograφ ì follow≤á ver∙ closel∙ alonτ thσ line≤ oµ thσ T╓ qui· "Salσ Oµ Thσ Century"¼ ì eveε includinτ thσ selectinτ oµ onσ oµ ninσ boxe≤ fo≥ ß correc⌠ answe≥ t∩ ß ì famσ gamσ question«á Thesσ ma∙ hidσ ß prizσ (caε bσ entereΣ b∙ thσ user⌐ o≥ ì bonu≤ money. Hardwarσ requirement≤ arσ an∙ disδ Microbee«á Thσ progaφ wil∞á operatσ ì iεá ful∞ colou≥ oε Premiuφ disδ Microbees«á Use≥ hardwarσ supplieΣ witΦ thσ ì packagσá i≤á essentia∞ t∩ it≤ operation«á Thσ hardwarσá consist≤á oµá threσ ì buzze≥á boxe≤á fo≥á thσ contestant≤ anΣ ß contro∞ bo° fo≥ thσá usσá oµá thσ ì adjudicator« Thesσ fou≥ boxe≤ arσ connecteΣ t∩ thσ paralle∞ port« Thσá gamσ use≤ disδ file≤ fo≥ qui· anΣ famσ gamσ questions«á Therσ i≤ ì als∩á ßá Champioε filσ containinτ thσ threσ highes⌠á score≤á t∩á date«á Thσ ì prograφá i≤ supplieΣ witΦ severa∞ questioε files«á Yo⌡ caε oµ coursσá ente≥ ì anΣ edi⌠ you≥ owε famσ game≤ anΣ questions« Thi≤ i≤ probabl∙ thσ wors⌠ par⌠ ì oµ thσ packagσ a≤ i⌠ seem≤ t∩ bσ extremel∙ slo≈ iε acceptinτ inpu⌠ froφ thσ ì keyboarΣ anΣ ╔ kep⌠ missinτ numerou≤ characters« Thi≤ seemeΣ curiou≤ a≤ thσ ì instruction≤á mentioε tha⌠ versioε ▓ (tha⌠ beinτ reviewed)¼á i≤ reviseΣ fo≥ ì faste≥á typists«á ╔á woulΣ sugges⌠ tha⌠ iµ yo⌡ werσ enterinτá question≤á iε ì largσ number≤ t∩ follo≈ thσ methoΣ ╔ useΣ a≤ describeΣ below. Afte≥á selectinτ thσ disδ filσ containinτ thσ questioε anΣá famσá gamσ ì file≤á froφá ß windo≈ yo⌡ arσ theε giveε ß choicσ a≤ t∩ whethe≥á yo⌡á woulΣ ì likσá ß harΣ cop∙ oµ thσ question≤ anΣ answer≤ (fo≥ thσ adjudicator)«á Nex⌠ ì yo⌡á ente≥ thσ name≤ oµ thσ contestant≤ alonτ witΦ thei≥ se° (fo≥ thσá gamσ ì pane∞ graphics)«á Thσ timσ alloweΣ fo≥ aε answe≥ t∩ bσ giveε caε bσ se⌠á b∙ ì thσá contro∞á bo° a⌠ thσ beginninτ oµ ß game«á Yo⌡ arσ theε pu⌠ througΦá ß ì buzze≥ tes⌠ anΣ wheε completσ thσ gamσ begins. Al∞á contestant≤á arσ giveε $2░ t∩ star⌠ thσ game«á Thσá questioεá i≤ ì printeΣá t∩á thσá screeεá iε largσ letter≤ anΣ thσá compute≥á wait≤á fo≥á ß ì responsσá t∩á ß buzze≥ anΣ wheε receiveΣ beep≤ anΣ print≤á thσá contestant≤ ì name«á Aεá answe≥ mus⌠ theε bσ giveε withiε thσ se⌠ timσ limit«á Wheε thσ ì answe≥ i≤ receiveΣ thσ adjudicato≥ presse≤ thσ contro∞ buttoε anΣ dependinτ ì oεá thσá correctnes≤á oµ thσ answe≥ selects thσ righ⌠ o≥á wronτá buttoεá t∩ ì updatσ thσ scores« Iµ n∩ answe≥ i≤ giveε withiε thσ timσ limi⌠ thσ compute≥ ì move≤ oε t∩ thσ nex⌠ question. A≤á mentioneΣ abovσ ╔ founΣ i⌠ mucΦ faste≥ t∩ creatσ ß dbasσ filσá oµ ì fou≥ field≤ oµ 3▓ characters¼ thσ firs⌠ threσ fo≥ thσ questioε anΣ thσ las⌠ ì fo≥ thσ answer«á ╔ theε entereΣ al∞ thσ inpu⌠ viß dbase«á Wheε completeΣá ╔ ì useΣá thσá delimi⌠ commanΣ t∩ makσ ß tex⌠ filσ delimiteΣ witΦ "«á Thi≤á wa≤ ì theεá reformatteΣá unde≥ Wordsta≥ t∩ removσ thσá fielΣá seperators¼á namel∙ ì commas¼á anΣá replacinτá theφ witΦ carriagσ returns«á Thi≤ caε bσá donσá b∙ ì typinτ ^Q┴ (finΣ anΣ replace⌐ anΣ replacinτ al∞ ",ó witΦ "^N"«á Thσá numbe≥ ì of questions must be placed at the beginning of the file, maximum is 50. "TO╨á O╞á TH┼á CLASSó i≤ availablσ oε botΦ 130mφ o≥á 90mφá disk≤á froφ ì Goodisoε Softwarσ Pt∙ Ltd.¼ Monumen⌠ Road¼ Kilmorσ 3764¼ o≥ froφ Australbeσ ì iε Gleε Waverley«á Thσ cos⌠ oµ thσ packagσ i≤ $89.0░ whicΦ represent≤á gooΣ ì valuσá considerinτá thσ supplieΣ hardwarσ anΣ thσ qualit∙ oµ thσá programs« ì Thσá program≤ arσ designeΣ morσ fo≥ classrooφ usσ bu⌠ ╔ aφ surσ the∙á woulΣ ì bσ ß biτ hi⌠ a⌠ home.èé NE╫ FO╥ TH┼ MICROBEE SPEE─ MODULATOR Thi≤á hand∙ littlσ iteφ ha≤ thσ shapσ oµ ß D┬ 2╡ pluτ bu⌠ withou⌠ an∙ ì wires« I⌠ come≤ witΦ aε instructioε shee⌠ anΣ ß cassettσ tape. Thσá solσá purposσ oµ thσ modulato≥ i≤ t∩ slo≈ dowε thσ speeΣá oµá thσ ì compute≥á anΣ i≤ differen⌠ froφ thσ commanΣ "SPEEDó iε basic¼á a≤á SPEE─ ì onl∙ slow≤ thσ screeε routines«á Further¼á thσ basiπ speeΣ commanΣ ha≤ n∩ ì effec⌠ oε machinσ codσ game≤ o≥ CP/M« Thi≤ i≤ wherσ thi≤ modulσ won'⌠ fail¼ ì a≤ i⌠ caε reducσ thσ speeΣ oµ jus⌠ abou⌠ an∙ prograφ includinτá machinσ ì code¼ CP/M¼ BASIC¼ WORDBE┼ etc. Thσá softwarσ oε tapσ come≤ iε ▓ versions¼á onσ fo≥ 8░ columε screen≤ ì anΣ onσ fo≥ 6┤ columε screens«á I⌠ i≤ als∩ a≤ versatilσ a≤ yo⌡ caε ge⌠á it« ì Yo⌡ caε placσ i⌠ anywherσ iε memory¼ (oµ coursσ no⌠ iε scratcΦ area's)« I⌠ ì i≤á als∩ self-contained«á A≤ therσ arσ n∩ call≤ t∩ bootrom≤ o≥á basic¼á i⌠ ì coulΣá ruεá iε ß barσ computer╗á thereforσ yo⌡ caε ruε i⌠ oε an∙á Microbeσ ì e.g« ROM¼ IC¼ 2meτ disδ premium¼ Dreamdisδ etc« Als∩ i⌠ i≤ self-detecting¼ ì (iµá yo⌡á d∩á no⌠á havσ i⌠ pluggeΣ iε i⌠á won⌠á bothe≥á you)«á I⌠á i≤á no⌠ ì protected¼ s∩ yo⌡ caε transfe≥ i⌠ t∩ disk¼ appenΣ i⌠ t∩ ß gamσ o≥ ruε i⌠ oε ì it≤ own. Thσá maiεá reasoεá ╔ developeΣ i⌠ wa≤ t∩ slo≈ dowε somσá fas⌠á arcadσ ì game≤ s∩ the∙ becamσ morσ enjoyable¼ anΣ ╔ havσ t∩ admi⌠ ╔ pla∙ ß lo⌠ morσ ì no≈ thaε before«á Somσ oµ thσ game≤ sloweΣ dowε arσ Minσ Drop¼á Defender¼ ì Penetrato≥ jus⌠ t∩ namσ ß few. Thσ cassettσ supplieΣ ha≤ ┤ copie≤ oµ thσ program¼á ▓ fo≥ 80x2┤ anΣá ▓ ì fo≥á 64x1╢á screens«á Als∩ supplieΣ arσ ▓ addresses«á B∙á changinτá thesσ ì addresses¼á yo⌡á caεá slo≈ thσ compute≥ t∩ ß ratσ s∩ slo≈ tha⌠á i⌠á appear≤ ì frozen« Thσ use┐ Aε instan⌠ pausσ functioε t∩ an∙ gamσ yo⌡ like« ╔á havσ writteε t∩ Microbee'≤ managemen⌠ t∩ seσ iµ the∙ woulΣ pu⌠ thσ ì smal∞ softwarσ prograφ ont∩ eacΦ gamσ the∙ sel∞ s∩ a≤ t∩ freσ thσ use≥ oµ ì addinτ i⌠ oε himself« T∩ datσ ╔ havσ no⌠ hearΣ froφ them¼ s∩ bσ patient. A≤á aε option¼á instruction≤ arσ giveε t∩ adΣ ß simplσ switcΦá t∩á thσ ì modulato≥á s∩ yo⌡ caε inchÖ you≥ wa∙ througΦ ß gamσ o≥ program«á A⌠á reall∙ ì slo≈ speed≤ yo⌡ caε stud∙ thσ executioε oµ ß graphic¼ M├ prograφ o≥ game. Thσá completσá modulato≥ witΦá tape¼á instructions¼á etc.¼á wil∞á bσ ì availablσá froφá thσ Bazaa≥ anΣ als∩ froφ Australbee«á Thσ cos⌠á wil∞á bσ ì arounΣ $14.0░ $15.00« Thi≤ woulΣ bσ aε excellen⌠ investmen⌠ fo≥ an∙ school« Thσ minΣ boggle≤ ì a⌠ thσ application≤ thi≤ coulΣ bσ useΣ for« T∩ namσ jus⌠ tw∩ uses¼ LOGO¼ iµ ì thσá turtlσá move≤á to∩á fast¼á o≥ fo≥ an∙ gamσ o≥á applicatioεá wherσá thσ ì graphic≤ neeΣ close≥ attentioε wheε runninτ o≥ developinτ ß program. ┼ vaε BOMME╠ P╧ Bo° 5▓ TH┼ BASI╬ 315┤ (03) 762-7046 From: MARK GLOVER To: ALL Re: EXPERIMENTER & ROM BOARD FO╥á SAL┼á ▒ ONL┘ EXPERIMENTE╥ BOAR─ (NO╘ USED⌐ $4░ ▒ ONL┘á RO═á EXPANSIO╬ ì BOAR─ (NO╘ USED)¼ COMPLET┼ WIT╚ WORDBEE V1.2 AND ED.ASM $40 CONTACT MARK GLOVER ON 49 5507 (A/H) OR VIA MBUG BB.è PROGRAMIN╟ COMPETITION Herσ i≤ par⌠ tw∩ oµ ou≥ programminτ competitioε fo≥ yo⌡ t∩ worδ on« A≤ man∙ ì oµá yo⌡ wil∞ probabl∙ bσ ablσ t∩ worδ ou⌠ thσ answe≥ t∩ thσ probleφ iε you≥ ì head¼á wσá havσá decideΣ t∩ asδ yo⌡ t∩ writσ ß prograφ tha⌠ wil∞á prin⌠á t∩ ì screeεá thσá answe≥ anΣ tha⌠ i⌠ wil∞ bσ correc⌠ fo≥á AN┘á futurσá publisheΣ ì simila≥ problem« Thσ followinτ i≤ thσ probleφ yo⌡ havσ t∩ solve« Iε thσ squarσ below¼ ß se⌠ oµ value≤ arσ giveε fo≥ thσ suφ oµ thσ vertical¼ ì horizontal¼ anΣ diagona∞ oµ thσ square« Thesσ value≤ arσ representeΣ insidσ ì thσ squarσ b∙ aε alphß valuσ anΣ thesσ value≤ ma∙ appea≥ twicσ iε thσá samσ ì game║á e.g«á "Aó ma∙ represen⌠ ╡ iε tw∩ places¼á "Fó ma∙ represen⌠ ╣ iε ì tw∩á places╗á bu⌠ thσ lette≥ "Xó wil∞ appea≥ iε ever∙ gamσ anΣ i⌠ ma∙á havσ ì thσ samσ valuσ a≤ "Aó o≥ "Hó etc« "Xó wil∞ no⌠ appea≥ morσ thaε oncσ iε an∙ ì giveε game. You≥á joΓá i≤ t∩ writσ ß prograφ tha⌠ wil∞ prin⌠ thσ correc⌠ answe≥ t∩á AN┘ ì giveεá game«á Wσ wil∞ publisΦ onσ (1⌐ morσ "gameó nex⌠ montΦ t∩ givσ yo⌡á ß ì chancσá t∩ debuτ (anΣ prove⌐ you≥ program«á Thσ answe≥ t∩ this gamσ wil∞ bσ ì publisheΣá iεá thσá Februar∙á Catcher«á Thi≤ i≤ thσá seconΣá oµá thσá threσ ì problems: 21 16 16 26 11 ----------------------------------------- ⁿ ⁿ ⁿ ⁿ | ⁿ B ⁿ X ⁿ G ⁿ D ⁿ 24 |---------|---------|---------|---------| ⁿ C ⁿ G ⁿ A ⁿ H ⁿ 20 |---------|---------|---------|---------| ⁿ H ⁿ A ⁿ J ⁿ E ⁿ 19 |---------|---------|---------|---------| ⁿ F ⁿ E ⁿ C ⁿ B ⁿ 16 ⁿ ⁿ ⁿ ⁿ | ----------------------------------------- 21 16 16 26 27 Thσ forma⌠ oµ thσ answe≥ ma∙ bσ showε a≤ se⌠ ou⌠ below« (DECEMBERS ANSWERS SHOWN BELOW) ------------------------------------------------------------ ⁿ ┴ ⁿ ┬ ⁿ ├ ⁿ ─ ⁿ ┼ ⁿ ╞ ⁿ ╟ ⁿ ╚ ⁿ ╩ ⁿ ╪ | |-----------------------------------------------------------| ⁿ 1 ⁿ 9 ⁿ 2 ⁿ 8 ⁿ 3 ⁿ 7 ⁿ 4 ⁿ 6 ⁿ 5 ⁿ 9 ⁿ ------------------------------------------------------------ Thi≤ competitioε i≤ opeε t∩ al∞ financia∞ member≤ anΣ ma∙ bσ writteε iε AN┘ ì language«áá Therσá wil∞á bσá tw∩á categorie≤á oµá entries«á Thσá firs⌠á i≤ ì interpreteΣ language≤ - BASIC¼ MBASIC¼ DBASEI╔ o≥ an∙ othe≥ interpreter╗ anΣ thσ seconΣ i≤ compileΣ - CB80¼ CBASIC¼ PASCAL¼ EDASM¼ M80¼ C¼ etc. Entrie≤ wil∞ bσ judgeΣ oε 1«á Thσ correc⌠ answer¼á and¼á 2«á Prograφ speed« ì Therσá wil∞ bσ n∩ othe≥ categorie≤ fo≥ judging«á Al∞ entrie≤ wil∞ bσ judgeΣ ì oεá ßá STANDAR─á DIS╦á MICROBEE«á An∙ entrie≤ submitteΣá oεá tapσá wil∞á bσ ì transferreΣ t∩ disδ. All entries MUST ruε oε the samσ machine. Entrie≤ closσ oε thσ maiε meetinτ night¼á MarcΦ 198╖ anΣ winner≤ name≤ wil∞ ì bσ announceΣ iε thσ followinτ Catche≥ anΣ a⌠ thσ Apri∞ meeting«á ┴ prizσ oµ ì ß vouche≥ fo≥ thσ Bazaa≥ t∩ thσ valuσ oµ $25.0░ goe≤ t∩ thσ winners«á Pos⌠ ì entrie≤ t∩ ou≥ mai∞ bo° o≥ hanΣ theε t∩ ß committeσ member«á Al∞ mediß wil∞ ì bσ returneΣ. GOO─ LUCK....è *** BAZAAR SALES *** BAZAAR SALES *** CODE DESCRIPTION PRICE CODE DESCRIPTION PRICE "The Catcher" 02BC Volume 2 (Oct.83-Sept.84) $15.00 30CS Blank C-30 Cassettes $ 1.50 03BC Volume 3 (Oct.84-Sept.85) $15.00 30CB Blank C-30 Cassettes (20 per box) $25.00 01TC Back Issues (single) $ 1.50 02TC Back Issues (Vol 2 Nos. 6/7) $ 3.00 3SDB Blank 3.5" Disks (NASHUA SSDD Box of 10) $40.00 5HCK Drive Head Cleaning Kit 5.25" $12.00 3SDB Blanδ 3.5ó Disk≤ (1░ pe≥ box⌐ $46.00 3HCK Drive Head Cleaning Kit 3.5" $15.00 5DDSáBlanδ 5.25ó Disks(Precisioε DSDD)Box of 10 $20.00 01DC Dust Covers for 'BEE $ 6.00 5DDS Blank 5.25" Disks (NASHUA Singles) $ 2.00 80PR Carboε Printe≥ Ribboε (suit xyz.80/100 printers) $ 8.00 5B85 Disk Storage Box 5.25" (Lockable, holds 85) $18.00 5B10 Disk Library Box 5.25" (holds 10) $ 3.00 **10PP 1250 sheets cont. printer paper $15.00 3B40 Disk Storage Box 3.5" (Lockable, holds 40) $18.00 01BA Bee Artistic (Graphic S/W) $35.00 1FPF Flashprint (with Flashkey) $40.00 PLEASE NOTE: Poor Persons Software and Grotnik Software are still available. Refer to the June edition of 'The Catcher' for item availability and prices. Orders requesting Poor Persons Software may take more than 21 days to fill, because to get our special price we have to order five or more discs at a time. ** not normally available for postal purchase All postal orders to be sent to MBUG AUSTRALIA SALES P.O. BOX 157, NUNAWADING VICTORIA 3131 To avoid delays, all orders must include cheque, postal order or Bankcard authorization for the total amount(inc. postal & handling charges). Allow 21 days for the return of goods, or pick-up at the next meeting. Goods are only available to club members - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - Please charge my Bankcard/Visa/Master Card No. ___ __ ___ ______ Expiry Date __/__/____ Signature_________________ Members Name.__________________________________ M/ship No._____ Address._______________________________________________________ Code Item Quantity Price Total Cost ____ ________________________ ________ _____ __________ ____ ________________________ ________ _____ __________ ____ ________________________ ________ _____ __________ Postal Fees (within Aust.) Sub-Totals Items $_________ $10 to $20 order :$2.50 Postage & Handling Fee $_________ $20 to $80 order :$5.00 greater than $80 :P.O.A. Total Order $_________ Certified Mail add $1.00 Security Post add $5.00 MINIMUM POSTAL ORDER $10.00 Dec & Jan *** BAZAAR SALES *** BAZAAR SALES ***