home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CP/M
/
CPM_CDROM.iso
/
mbug
/
mbug079.arc
/
8510MBN.TZT
/
8510MBN.TXT
Wrap
Text File
|
1979-12-31
|
50KB
|
971 lines
Chris - leave the following lines in.
Therσ shoulΣ bσ n∩ neeΣ t∩ deletσ an∙ blanδ lines« EacΦ pagσ i≤ no≈ 5╕
lines« Thσ las⌠ pagσ i≤ agaiε pagσ number≤ - coulΣ yo⌡ d∩ theφ iε italics?
Thanks, Mal ( tel wrk: 79 9201).
Therσá wil∞ bσ somσ blanδ line≤ a⌠ thσ bottoφ oµ somσ pages¼á ╔ wil∞á pastσ
these over later (if I think of something to put there!)
CONTENTS
Club Notes
- The September Meeting ......................... 3
Communications
- Converting MODEM7 from 300 to 1200 baud ....... 9
- Multiple BBS review ........................... 8
Contributions
- What we need for next month ................... 2
Hardware
- The great microbee rebuild PT 2 ............... 4
Humour
- What do those commands in Basic really mean ... 11
Multiplan
Dsk - Hints from the Multiplan Users Group .......... 15
Program Listings
Dsk - Microsoft Basic - Keeping Tabs on MBASIC ..... 6
Bth - Microworld Basic - Psychrometer ............... 12
Bth - Microworld Basic - Township Distance Chart .... 16
Reviews
- Grotnik Wars .................................. 5
Dsk - Beetex graphics wordprocessor ................. 7
Dsk - Microbee Arcade Games Vol 2 ................... 14
Trading Place
- For sale notices .............................. 2
Wordprocessing
Dsk - Beetex Review ................................. 7
***************************************************************************
* *
* *
* APPLICATIONS AND RENEWALS $20-00 PA *
* *
* ------MONTHLY MEETING------ *
* Unley Senior Citizens Hall *
* 18 Arthur Street, Unley *
* Third Monday of the Month *
* From 7:30 - 10:00 *
***************************************************************************
Copyrigh⌠á (c)«á Al∞á materia∞á publisheΣá iε thi≤ journa∞á i≤á subjec⌠á t∩
Australiaεá anΣ internationa∞ copyrigh⌠ law«á However¼á limiteΣ copyinτá oµ
individua∞ article≤ i≤ permitteΣ provideΣ acknowledgemen⌠ oµ thσ autho≥ anΣ
MICROBE┼ NEW╙ i≤ made.
last line page 1è**¬ DISCLAIME╥ ***
Thσ MicroBeσ User≤ Grou≡ oµ S.A« (MUGSA)¼ it≤ officials¼ thσ edito≥ anΣ thσ
contributinτá author≤á oµ thσ MicroBeσ New≤ d∩ no⌠ expres≤á no≥á impl∙á an∙
warrant∙á o≥á liabilit∙á witΦá respec⌠ t∩ softwarσ o≥á hardwarσá anΣá thei≥
modification≤ whicΦ ma∙ bσ publisheΣ iε thi≤ journa∞ o≥ othe≥á publication≤
oµ MUGSA¼ o≥ describeΣ a⌠ an∙ officia∞ o≥ unofficia∞ meetinτ oµ MUGSA.
**¬ COMMITTE┼ **¬
Chairmaε -Brian Petersson.2502800(H⌐ V/Chairman -Colin Mercer. 2703563(H)
Secretar∙ -RicharΣ Jackson.2948591(H⌐ Editor -Mal Watt. 2931890(H⌐
Treasurer -Brian Uren. 2605038(H⌐ Member -Kris Sieben. 2651374(H)
Member -Fred Brunings. 2641798(H) Member -Robin Moseby. 424642(H)
*****¬ PLEAS┼ RESTRIC╘ AFTE╥ HOUR╙ CALL╙ T╧ BETWEE╬ 7.3░ - 8.3░ p.m« ******
***************************************************************************
CONTRIBUTIONS..............................................................
ááááááááááááThσá edito≥ i≤ pleaseΣ t∩ receivσ article≤ a⌠ eacΦá meetinτá oε
ááá5x12áááááTapσá a⌠á300 bauΣ o≥ Disk«á Eveε writteε o≥ typeΣ article≤á arσ
ááááááááááááwelcome«á Iµ yo⌡ d∩ no⌠ attenΣ thσ meeting¼á the∙ ma∙ bσ posteΣ
áááááát∩á thσ cluΓ (seσ fron⌠ cover⌐ anΣ wil∞ bσ posteΣ bacδ t∩á you«
Iµá yo⌡á havσá acces≤ t∩ ß modem¼á thσ edito≥ wil∞ receivσá theφá ove≥á thσ
telephone« Sourcσ file≤ caε bσ Wordbee¼ Wordstar¼ Mytek¼ Basic¼ Edasφ etc.
Thσá nex⌠á issuσ wil∞ coincidσ witΦ thσ Hobb∙ Fai≥ oε thσá weekenΣá oµ
Nov«á 23rΣá anΣ thσ CluΓ wil∞ havσ ß displa∙ there«á Anyonσá interesteΣá iε
helpinτ ou⌠ theε pleasσ contac⌠ ß committeσ member.
Fo≥á tha⌠ issuσ oµ thσ newslette≥ wσ desperatel∙ requirσ article≤á relatinτ
t∩á thσ usσ oµ microbee≤ witΦ hobbie≤ o≥ an∙ homσá orienteΣá activity«á An∙
programs¼á stories¼á anΣá hint≤á alonτ tha⌠ linσ anΣ an∙ othe≥ subjec⌠á arσ
alway≤ neededí
Thσ contribution≤ deadlinσ i≤ upt∩ tw∩ week≤ afte≥ ß monthl∙ meeting« []
***************************************************************************
TRADING PLACE..............................................................
For Sale****
Microbee Eprom programmer (Applied Technology Model) $100
Microbee 64k ROM board $ 40
Multiprom Interface for the Microbee $ 50
Microworld "OZ-LOGO" 8k Rom $ 20
Mytek Wordprocesor 8k Rom $ 20
Blank 2764 Rom Chip $ 7
6264 Ram Chip. To test programs before burning into rom $ 15
Manuals supplied, Software package for Multiprom Board included.
Reason for sale: upgraded to "computer in a book".
Will sell separately if required. Special price for sale of the LOT: $210
Apply to Doug Craigie, P.O. Box 3230, Alice Springs, 5750.
tel. (089) 525-214
***************************************************************************
[] The club hires out modems. Contact Kris Sieben (see tel. list above) []èCLUB NEWS..................................................................
[] THE SEPTEMBER MEETING
Therσ wa≤ n∩ 'specialº topiπ thi≤ week¼á thougΦ thσ meetinτ wa≤á stil∞
considereΣ ß gooΣ onσ b∙ ß randoφ samplinτ oµ biaseΣ members«
Johε Moffa⌠ wa≤ introduceΣ t∩ thσ group«á Hσ i≤ thσ ne≈ manage≥ oµ thσ
A.T«á sho≡á iε Adelaide¼á afte≥ havinτ manageΣ onσ o≥ tw∩ oµ thσ Dicδá (Yo⌡
can'⌠ pul∞ thσ Woolie≤ ove≥ me⌐ Smith≤ iε Adelaidσ anΣ suburbs.
Kri≤á Siebeεá gavσá aεá introductioε int∩ hi≤á Genealog∙á prograφá anΣ
discusseΣá thσ differinτ requirement≤ needeΣ iε ß famil∙ treσ databasσá duσ
t∩á thσ exceptionall∙ prolifiπ ancestor≤ oµ somσ people«á Afte≥ thσá forma∞
par⌠á oµá thσá meetinτá hσá showeΣá thσá prograφá operatinτá anΣá discusseΣ
programminτ techniques.
Leσá BarnarΣ gavσ ß talδ oε hi≤ opinioε oµ thσ direction/need≤ oµá thσ
club«á Iεá ßá nutshel∞ hσ saiΣ tha⌠ i⌠ i≤ importan⌠ fo≥ member≤ t∩á finΣá ß
commoεá leve∞ oµ knowledgσ anΣ interes⌠ b∙ gettinτ t∩ kno≈ a≤ man∙á member≤
a≤ possible«á I⌠ i≤ unfai≥ anΣ no⌠ practica∞ t∩ conside≥ jus⌠ thσ committeσ
member≤á a≤á thσá onl∙ sourcσ oµ knowledgσ iε thσá club«á I⌠á i≤á thereforσ
importan⌠á tha⌠ member≤ shoulΣ ge⌠ t∩ kno≈ eacΦ othe≥ anΣ wha⌠ eacΦ ha≤á t∩
offer«á Afte≥ thσ forma∞ par⌠ oµ thσ meeting¼á Leσ tooδ detail≤ oµá member≤
interest≤ supplieΣ b∙ thosσ interesteΣ members!
'Learninτáá caεá bσá Funºá anΣá 'Arcadσá Game≤á IIºá froφá A.T«áá werσ
demonstrateΣ oε thσ machine≤ arounΣ thσ room«
[] WHEN RENEWING
Wheεá renewinτ you≥ membership¼á pleasσ tr∙ t∩ senΣ i⌠ iε wheε yo⌡ ge⌠
thσ firs⌠ reminde≥ oε you≥ magazinσ mailinτ label«
Thi≤ give≤ u≤ plent∙ oµ timσ t∩ notσ thσ renewa∞ oε thσ membershi≡ list« Iµ
yo⌡á wai⌠ unti∞ thσ seconΣ (anΣ last⌐ notice¼á therσ arσ onl∙ ßá couplσá oµ
week≤á betweeεá wheε yo⌡ ge⌠ i⌠ anΣ wheε thσ label≤ fo≥ thσ nex⌠ issuσá arσ
printed«á Iµ you≥ renewa∞ ha≤ no⌠ beeε receiveΣ b∙ then¼á yo⌡ wil∞ mis≤ ou⌠
oε thσ mailinτ oµ thσ newsletter«á Wheε eventuall∙ thσ renewa∞ i≤ received¼
wσ havσ t∩ checδ iµ ß magazinσ wa≤ sent¼á and¼á iµ not¼á senΣ onσ out«á No⌠
onl∙ doe≤ thi≤ cos⌠ thσ cluΓ threσ time≤ thσ norma∞ cost¼á bu⌠ therσ i≤á n∩
guaranteσ tha⌠ yo⌡ wil∞ eveε ge⌠ one.
Pleasσ hel≡ b∙ gettinτ you≥ renewal≤ iε early.
[] EDUCATION SOFTWARE COMPETITION
Wσá havσá receiveΣá informatioεá abou⌠á ßá competitioεá beinτá ruεá b∙
Jacarandßá Software«á The∙á arσá offerinτ ß prizσ oµá $100░á fo≥á thσá bes⌠
softwarσá receiveΣ fo≥ usσ iε infant¼á primar∙ o≥ secondar∙ schools«á Therσ
arσ als∩ runne≥ u≡ prize≤ oµ $50░ anΣ $250«á Entrie≤ closσ oε Novembe≥ 1st¼
s∩á yo⌡ wil∞ havσ littlσ time«á Al∞ softwarσ submitteΣ ma∙ bσ eligiblσá fo≥
commercia∞ publication.
Iµá anyonσá i≤á interested¼á the∙ caε ge⌠ morσá informatioεá froφá thσ
Secretary¼ RicharΣ Jackson. []èTH┼ GREA╘ MICROBE┼ REBUIL─ - PAR╘ 2.......................« Richard Jackson
A≤á explaineΣá iε thσ Augus⌠ edition¼á thσ rebuildinτ oµá m∙á Microbeσ
starteΣá ofµ witΦ thσ desirσ t∩ fi⌠ ß ne≈ keyboard«á ╔ explaineΣ ho≈ ╔ wen⌠
abou⌠ fittinτ i⌠ t∩ m∙ systeφ anΣ gavσ aε ideß oµ thσ softwarσ change≤ tha⌠
werσ needeΣ t∩ reaΣ thσ ne≈ keyboard« M∙ systeφ i≤ thσ olΣ 64╦ APC«
Iεá it≤á prototypσ form¼á thσ additiona∞ por⌠ wa≤ buil⌠ oε ß piecσá oµ
Ver∩ boarΣ anΣ connecteΣ t∩ thσ bus≤ viß ß connecto≥ attacheΣ t∩ thσá cablσ
t∩ thσ drives«á I⌠ wa≤ obviou≤ tha⌠ ╔ woulΣ neeΣ ß ne≈ casσ iε whicΦ t∩ fi⌠
thσá hardwarσá associateΣ witΦ thσ ne≈ keyboarΣ anΣ thσ othe≥ mod≤á ╔á havσ
planned.
╔á founΣá ß suitablσ casσ a⌠ Dicδ Smiths«á I⌠ i≤ aε IBM-typσ casσá - fairl∙
large¼ bu⌠ givinτ plent∙ oµ rooφ fo≥ expansion« Thσ rea∞ IB═ compute≥ ha≤ ß
largσá circui⌠á boarΣ witΦ provisioε fo≥ si° expansioε board≤ a⌠á thσá lef⌠
hanΣá end«á Thσ D╙ bo° ha≤ al∞ thσ hardwarσ provision≤ fo≥ thesσá expansioε
boards¼ s∩ i⌠ seemeΣ logica∞ t∩ follo≈ mucΦ thσ samσ method.
Thσá bus≤ expansioε boarΣ tha⌠ ╔ settleΣ oε i≤ 6┤ way«á Thσ centrσá 5░
line≤á arσ connecteΣ t∩ thσ Microbeσ expansioε connecto≥ viß ßá heade≥á anΣ
ribboε cable« Therσ i≤ aε eartΦ ruε dowε eacΦ sidσ witΦ 5÷ anΣ 12÷ lines«
Thesσá adΣ u≡ t∩ 5╕ defineΣ connections¼á leavinτ ╢ tha⌠ interconnec⌠á eacΦ
boarΣá tha⌠ i≤ pluggeΣ int∩ thσ motherboard«á Thi≤ i≤ theε bolteΣ int∩á thσ
casσ alonτ sidσ thσ slot≤ iε thσ back« Board≤ caε bσ pluggeΣ iε anΣ picδ u≡
powe≥á anΣ al∞ thσ standarΣ expansioε signals¼á anΣ input/outpu⌠ connector≤
oε thσ board≤ caε bσ accesseΣ througΦ thσ slot≤ a⌠ thσ back.
Thσ ne≈ casσ i≤ designeΣ t∩ holΣ u≡ t∩ fou≥ slimlinσ drives« Thσ bracke⌠ i≤
easil∙ modifieΣ t∩ moun⌠ onl∙ two¼á givinτ eveε morσ spacσ inside« Therσ i≤
plent∙á oµá rooφ behinΣ thσ drive≤ fo≥ thσ origina∞ powe≥ supply«á Thi≤á i≤
wireΣ directl∙ t∩ thσ drive≤ anΣ als∩ t∩ thσ expansioε board.
Afte≥ mountinτ thσ powe≥ suppl∙ anΣ drives¼ thσ onl∙ bi⌠ lef⌠ ove≥ wa≤
thσ disπ controlle≥ card«á Onσ optioε wa≤ t∩ rebuilΣ thσ wholσ boarΣ ont∩ ß
ne≈ onσ t∩ pluτ int∩ thσ ne≈ mothe≥ board«á Thi≤ seemeΣ ß bi⌠ traumatiπá a⌠
thσá time¼á s∩ ╔ decideΣ t∩ moun⌠ thσ olΣ onσ oε ß blanδ boarΣ witΦ ß shor⌠
ribboε cablσ joininτ i⌠ t∩ thσ connector«
Thσá nex⌠ boarΣ t∩ makσ was¼á naturally¼á aε inpu⌠ boarΣ fo≥á thσá ne≈
keyboard«á Thi≤ i≤ jus⌠ ß PI╧ witΦ suitablσ decoding«á ┴ DI╨ switcΦ i≤ useΣ
t∩á selec⌠ thσ addres≤ oµ thσ port¼á althougΦ thσ softwarσ ╔ usσ ha≤ i⌠á a⌠
30H«á Sincσá therσá wa≤ spacσ lef⌠ oε thσ board¼á ╔ als∩ pu⌠ oε ßá battery-
backeΣ calenda≥ clock«á Thi≤ use≤ thσ Nationa∞ chi≡ MM58274« I⌠ keep≤ time≤
froφá ßá tentΦá oµ ß seconΣ u≡ t∩ ten≤ oµ year≤ anΣá compensate≤á fo≥á lea≡
years«á I⌠ use≤ 1╢ contiguou≤ por⌠ addresses¼ anΣ i≤ als∩ selectablσ b∙ DI╨
switches.
Thσ origina∞ plaε wa≤ t∩ fi⌠ thσ Microbeσ insidσ thσ casσ anΣá connec⌠
i⌠ t∩ thσ expansioε boarΣ viß ß shor⌠ ribboε cable«á Afte≥ al∞ thσ bit≤ haΣ
beeεá fitteΣ t∩ thσ case¼á therσ wasn'⌠ quitσ enougΦ spacσ fo≥ thσ 'beeíá ┴
passinτ though⌠ wa≤ t∩ cu⌠ ofµ thσ olΣ keyboard¼ bu⌠ tha⌠ seemeΣ drastic.
This¼ then¼ leΣ t∩ thσ curren⌠ plan¼ whicΦ i≤ t∩ makσ anothe≥ threσ plug-iε
boards«á Thσ firs⌠ wil∞ bσ ß memor∙ board« Thi≤ wil∞ havσ 56╦ oµ statiπ RA═
(usinτ 6264s⌐ anΣ 16╦ oµ ROM«á Thσ RO═ wil∞ bσ 2*2764≤ se⌠ u≡ a≤ ┤ bank≤ oµ
4╦ sittinτ a⌠ E000H«á Selectioε wil∞ bσ viß ß por⌠ address«á Thi≤ wil∞ makσ
i⌠ possiblσ t∩ havσ variou≤ utilitie≤ iε RO═ fo≥ instan⌠ access« >>è Thσ seconΣ boarΣ wil∞ bσ ß vide∩ board¼ witΦ thσ unlimiteΣ PC╟ system«
AnΣá thσ thirΣ onσ wil∞ havσ ß Z-8░ processo≥ anΣ PI╧ oεá it«á Thesσá threσ
additiona∞ board≤ wil∞ theε replacσ thσ Microbeσ itself.
Plan≤á arσá als∩ iε thσ earl∙ stagσ fo≥ ß 256╦ RA═ drive«á Thi≤á i≤á ß
blocδá oµ dynamiπ RA═ tha⌠ i≤ madσ t∩ looδ likσ ß disπ drive«á Program≤ caε
bσ copieΣ froφ thσ floppie≤ t∩ thσ RAM¼ anΣ theε useΣ iε jus⌠ thσ samσ way¼
onl∙ mucΦ faster« Wheε finished¼ yo⌡ cop∙ theφ bacδ t∩ thσ flopp∙ agaiε fo≥
permanen⌠ storage.
Nex⌠ month¼á iε thσ las⌠ par⌠ oµ thi≤ article¼á ╔ wil∞ explaiε ho≈á t∩
ruε ß 3.5ó drivσ oε thσ 5.25"system« []
***************************************************************************
SOFTWARE REVIEW - GROTNIK WARS.................................Robin Moseby
Sincσá wσá purchaseΣ ou≥ Microbeσ i⌠ ha≤ beeε interestinτ t∩á seσá thσ
softwarσ house≤ tha⌠ havσ beeε poppinτ u≡ anΣ dowε fo≥ thσ Microbeσ market«
Iεá Sydne∙á the∙á havσ ApplieΣ Technology«á Iε PertΦá the∙á haΣá Mytek«á Iε
Melbournσ the∙ havσ Dreamcard≤ anΣ iε Adelaidσ wσ havσ Grotniδ Software.
Grotniδá Softwarσá i≤ ß relativel∙ ne≈ softwarσ housσ anΣ s∩ fa≥ the∙á havσ
tw∩ programme≤ available«á ╔ tooδ thσ plungσ anΣ outlayeΣ $2░ fo≥ aε arcadσ
gamσá calleΣá Grotniδá War≤ «á I⌠ come≤ iε thσ usua∞á plastiπá baτá witΦá ß
cassettσá iεá ßá cassettσ casσ anΣ instructions«á (Disδ version≤á arσá als∩
available).
Mos⌠ arcadσ game≤ ╔ havσ seeε havσ ß thiε backinτ carΣ witΦ ß tablσ oµ
controls¼ bu⌠ Grotniδ War≤ come≤ witΦ ß twent∙ pagσ instructioε bookletí Iµ
othe≥ companie≤ skim≡ oε thσ documentatioε theε Grotniδ Softwarσ make≤ surσ
tha⌠ everythinτ i≤ covered« Thσ manua∞ i≤ ß bi⌠ dauntinτ a⌠ firs⌠ anΣ take≤
ß whilσ t∩ reaΣ bu⌠ whateve≥ yo⌡ wan⌠ t∩ kno≈ i≤ iε therσ somewhere«á Therσ
arσ quitσ ß fe≈ cartoon≤ t∩ lighteε thσ text.
Thσá gamσ start≤ witΦ aε impressivσ titlσ page«á Wheε thσ SPACEBA╥á i≤
presseΣá onσ i≤ presenteΣ witΦ aε threσ dimensiona∞ vie≈á int∩á space«á Thσ
graphic≤á arσ jerk∙ bu⌠ fas⌠ anΣ quicδ finge≥ contro∞ i≤ required.Thσ threσ
dimensiona∞á effect≤á arσá ver∙á gooΣ anΣ sho≈á thσá capabilitie≤á oµá thσ
MicroBeσ .╔ haΣ t∩ g∩ bacδ t∩ thσ titlσ pagσ t∩ slo≈ thσ gamσ down,anΣá i⌠
i≤ possiblσ t∩ d∩ thi≤ whils⌠ playing.
╔á founΣ thσ gamσ difficul⌠ t∩ pla∙ usinτ thσ keyboarΣ control≤ becausσ thσ
gamσ require≤ ß higΦ degreσ oµ finge≥ dexterity«á M∙ teenagσ childreεá havσ
developeΣá thesσá skill≤ anΣ thσ gamσ certainl∙ testeΣ thei≥ abilitie≤á anΣ
kep⌠ theφ amuseΣ (anΣ thσ lase≥ firinτ sounΣ caε bσ switcheΣ ofµ wheε othe≥
member≤ oµ thσ famil∙ wan⌠ somσ peacσ anΣ quiet).
Eventuall∙ ╔ purchaseΣ ß joysticδ anΣ founΣ thσ gamσ easie≥ t∩ play«á ╔ diΣ
no⌠á finΣá an∙á bug≤á iε thσ game«á Grotniδ War≤ i≤ ßá gooΣá gamσá tha⌠á i≤
certainl∙ wortΦ $20« Don'⌠ bu∙ i⌠ iµ yo⌡ havσ slo≈ reflexes« Iµ thσ ideß oµ
racinτ througΦ spacσ blastinτ everythinτ iε sigh⌠ appeal≤ t∩ yo⌡ theεá thi≤
i≤ thσ gamσ fo≥ you«
╔ thinδ i⌠ i≤ wortΦ buyinτ fo≥ thσ graphic≤ aloneí []èKEEPING TABS ON MBASIC......................................Stephen Frawley
Iεá aε earlie≥ articlσ (July⌐ ╔ wrotσ oµ thσ probleφ oµ gettinτ MBASI├
t∩ senΣ thσ Horizonta∞ TaΓ characte≥ CHR$(9⌐ t∩ thσ printer¼á botΦ a≤ ß TaΓ
characte≥á anΣá a≤ bit-imagσ graphic≤ data«á Thσ probleφá i≤á tha⌠á MBASI├
change≤á CHR$(9⌐ t∩ onσ o≥ morσ spacσ character≤ [CHR$(32)▌ beforσá sendinτ
i⌠ t∩ thσ printer¼ thu≤ corruptinτ bit-imagσ graphic≤ anΣ preventinτ usσ oµ
thσ softwarσ TaΓ functioε oµ printer≤ sucΦ a≤ thσ C.Itoh.
Thσá solutioεá (apar⌠ froφ usinτ MicroworlΣ Basic⌐ i≤á t∩á bypas≤á thσ
"LPRINTó routinσ oµ MBASI├ b∙ sendinτ thσ character≤ t∩ thσ printe≥ viß thσ
BDO╙á Lis⌠á Outpu⌠ functioε (No.5)«á Thi≤ involve≤ pokinτ ß shor⌠á machinσ
languagσá subroutinσá int∩ sparσ memory¼á anΣ callinτ i⌠ insteaΣá oµá usinτ
LPRIN╘ statements.
Thσ Z8░ machinσ languagσ codσ i≤ a≤ follows...
LD C,5 ;PUT BDOS FUNCTION NUMBER IN REGISTER C
LD D,0 ;SET REGISTER D TO ZERO
LD E,(HL) ;PUT CHARACTER TO BE PRINTED IN REGISTER E
CALL 05H ;CALL BDOS TO DO FUNCTION
RET ;RETURN TO MBASIC
The following routine will poke the hex data into spare RAM at 40H...
100 DATA &H0E,&H05
110 DATA &H16,&H00
120 DATA &H5E
130 DATA &HCD,&H05,&H00
140 DATA &HC9
150 FOR I=64 TO 72 : READ X : POKE I,X : NEXT I
160 CPMLIST=64 : REM store address in variable
To send a string TEST$ to the printer via the BDOS subroutine...
20░ FO╥ N=▒ T╧ LEN(TEST$)
210 A%=ASC(TEST$)
220 CALL CPMLIST(A%) 'A% pointed to by HL register pair
230 TEST$=MID$(TEST$,2)
240 NEXT N
To send bit-image graphics data via the BDOS subroutine...
300 FOR N=1 TO BIGNUMBER
310 READ A%
320 CALL CPMLIST(A%) 'A% pointed to HL register pair
330 NEXT N
***************************************************************************
Poking About....................................................Hugh Ristic
Dea≥á Dorith∙á askeΣá mσ t∩ looδ int∩ Aut∩ startinτá basiπá programs«á Thi≤
require≤ pokinτ abou⌠ witΦ thσ Monitor«á Thσ prograφ i≤ loadeΣ int∩á BASI├
anΣ theε ß Rese⌠ ═ int∩ thσ Monitor«á I⌠ i≤ easil∙ done¼á anΣ nex⌠ montΦ iε
Hivσá Hel≡ ╔ wil∞ sho≈ how«á Hint¼á therσ i≤ aε optiona∞ aut∩ star⌠ addres≤
fielΣ iε ß tapσ filσ heade≥ whicΦ shoulΣ bσ se⌠ t∩ 801┼ wheε thσ tapσá filσ
(filσ typσ M⌐ i≤ wriiten« []èSOFTWARE REVIEW - BEETEX graphics wordprocessor.............Richard Jackson
Al∞ Microbeσ owner≤ mus⌠ bσ onl∙ to∩ awarσ oµ thσ lacδ oµ ne≈ softwarσ
fo≥á thei≥á systems«á Therσá i≤ ß smal∞ collectioε oµ game≤á anΣá ßá slowl∙
increasinτá selectioε oµ educationa∞ program≤ available¼á bu⌠ i⌠ i≤ ßá rarσ
occurrencσ t∩ seσ gooΣ qualit∙ utilit∙ program≤ pu⌠ oε thσ market« Thσ las⌠
onσá wσ sa≈ wa≤ Flashprint«á Therσ i≤ no≈ anothe≥ ne≈ onσ iε thσ forφ oµá ß
worΣ processor«á Aε interestinτ poin⌠ abou⌠ botΦ oµ thesσ i≤ tha⌠ the∙ werσ
produceΣ herσ iε Adelaide¼á and¼á iε thσ casσ oµ thσ latter¼á b∙ onσ oµ ou≥
cluΓ members.
╔ hea≥ somσ peoplσ sayinτ "No⌠ anothe≥ worΣ processor!"¼á bu⌠ thi≤ onσ
i≤ different«á Whils⌠ WordSta≥ anΣ Wordbeσ arσ gooΣ a⌠ handlinτ text¼á the∙
fai∞á miserabl∙á wheε i⌠ come≤ t∩ specia∞ character≤ sucΦ a≤ thosσ useΣá iε
sciencσ anΣ maths«á Beetex¼ a≤ thi≤ ne≈ onσ i≤ called¼ i≤ uniquσ iε tha⌠ i⌠
caεá handlσ AN┘ shapeΣ characte≥ tha⌠ yo⌡ carσ t∩á thinδá of«á
Mathematica∞ formulaσ anΣ expression≤ arσ eas∙ t∩ generate¼ oncσ thσ systeφ
i≤ understooΣ (anΣ tha⌠ i≤ quitσ easy)« AnΣ wha⌠ i≤ als∩ uniquσ i≤ tha⌠ thσ
specia∞á character≤á appea≥á oε thσ screeε exactl∙ thσá wa∙á the∙á wil∞á bσ
printed«
Thσ versioε tha⌠ ╔ havσ beeε playinτ witΦ i≤ ß pre-productioε one¼ anΣ
naturall∙á haΣá ß fe≈ mino≥ bug≤ iε it«á Bu⌠ thσ advantagσá oµá havinτá thσ
write≥ livinτ herσ wa≤ obviou≤ when¼ ß fe≈ day≤ afte≥ discussinτ thesσ bug≤
witΦá hiφ (Alaiε Remont)¼á ╔ wa≤ tolΣ the∙ haΣ al∞ beeε fixed«á That'≤ rea∞
service!
Thσá secre⌠ oµ thi≤ worΣ processo≥ i≤ tha⌠ i⌠ use≤ thσ PC╟á facilitie≤
oµá thσá Microbeσá t∩ generatσ anΣ displa∙ thσ specia∞á character≤á oεá thσ
screen« Wheε thσ tex⌠ anΣ specia∞ character≤ arσ finished¼ i⌠ i≤ printeΣ b∙
doinτ ß screeε dum≡ oµ thσ wholσ text«á Yo⌡ arσ no⌠ limiteΣ t∩ onσá screen-
full¼ a≤ Beete° scroll≤ iε thσ tex⌠ a≤ i⌠ i≤ printed.
Beete° ha≤ al∞ thσ facilitie≤ tha⌠ arσ founΣ iε othe≥ worΣ processors¼
s∩ ╔ won'⌠ g∩ int∩ detail«á Thesσ includσ scrollinτ u≡ anΣ down¼á characte≥
anΣá worΣ lef⌠ anΣ right¼á to≡ oµ page¼á bottoφ oµ page¼á star⌠ anΣ enΣá oµ
text« I⌠ i≤ thσ additiona∞ feature≤ tha⌠ makσ i⌠ unique.
Thσ UNDELET┼ commanΣ ha≤ tw∩ functions«á I⌠ caε eithe≥ replacσ ß word¼
linσ o≥ blocδ oµ tex⌠ froφ wherσ i⌠ wa≤ deleted¼á or¼ alternatively¼ a⌠ thσ
curren⌠á curso≥á position«á Thi≤á caεá thu≤ bσ useΣ a≤ ßá movσá commanΣá b∙
deletinτ ß block¼ anΣ theε wanderinτ througΦ thσ tex⌠ t∩ thσ placσ yo⌡ wan⌠
i⌠á inserted«á Thσ commanΣ i≤ repetitivσ (witΦ somσá limitations)¼á s∩á thσ
piecσ oµ tex⌠ caε bσ inserteΣ a≤ man∙ time≤ a≤ yo⌡ like.
Anothe≥á interestinτ featurσ i≤ thσ usσ oµ templates«á Yo⌡ caε se⌠á u≡
ninσá template≤ oµ u≡ t∩ 7╡ characters¼á whicΦ caε includσ specia∞ graphic≤
characters«á Thesσ smal∞ block≤ oµ tex⌠ caε theε bσ calleΣ u≡ anΣá inserteΣ
iε you≥ tex⌠ whereve≥ yo⌡ likσ anΣ a≤ ofteε a≤ yo⌡ like« ┴ singlσ keystrokσ
wil∞ displa∙ thσ curren⌠ template≤ anΣ the∙ caε bσ editeΣ wheε needed« The∙
caεá bσ useΣ t∩ storσ sucΦ thing≤ a≤ comple° mathematica∞ formulaσ tha⌠ caε
bσ pu⌠ iε thσ tex⌠ a≤ required.
Beete° ha≤ thσ abilit∙ t∩ jum≡ t∩ an∙ poin⌠ iε thσ text«á Thi≤ caεá bσ
t∩ ß pre-se⌠ marker¼á o≥ t∩ ß poin⌠ specifieΣ b∙ ß linσ number¼ pagσ numbe≥
o≥ ß relativσ position¼ i.e« 70Ñ througΦ thσ text« Wh∙ can'⌠ othe≥ program≤
d∩ this? >>è I⌠á is¼á however¼á thσá graphic≤á facilit∙ tha⌠ makσ thi≤á packagσá s∩
interesting«á
Thσá ^╨ commanΣ put≤ yo⌡ iε thσ FON╘ SELECTIO╬ menu«á Yo⌡ caεá theεá selec⌠
sucΦá thing≤á a≤ bolΣ print¼á underline¼á overline¼á anΣ singlσ anΣá doublσ
dotteΣá letters«á Wheε yo⌡ pres≤ thσ selectioε number¼á yo⌡ g∩ bacδ t∩á thσ
tex⌠ anΣ al∞ letter≤ afte≥ tha⌠ wil∞ havσ thσ characteristiπ selected«
Thσ mos⌠ interestinτ thinτ i≤ t∩ actuall∙ seσ theφ oε thσ screen«á Froφ thσ
FON╘ SELECTIO╬ menu¼ yo⌡ caε als∩ selec⌠ thσ choicσ oµ graphic≤ characters«
Beete° wil∞ holΣ tw∩ graphic≤ fonts¼á plu≤ thσ standarΣ characte≥ set¼á onσ
oµá whicΦ caε bσ useΣ fo≥ supe≥ anΣ subscripts«á Thi≤ mus⌠ bσ defaul⌠á fon⌠
#2.
Bu⌠ yo⌡ arσ no⌠ limiteΣ t∩ onl∙ thesσ three«á Thσ Beete° packagσ come≤
witΦá additiona∞ font≤ tha⌠ caε bσ selecteΣ froφ thσ CONFIGUR┼ menu«á Thesσ
includσ scrip⌠ letters¼á electroniπ symbol≤ anΣ shape≤ tha⌠ caε bσ useΣá t∩
makσá ba≥á graph≤ etc«á WitΦ these¼á yo⌡ caε embeΣ circui⌠ diagram≤ o≥á ba≥
graph≤ iε thσ middlσ oµ you≥ text.
Oncσá yo⌡ havσ selecteΣ ß font¼á thσ letter≤ tha⌠ yo⌡ typσ iε arσ displayeΣ
a≤ thσ graphiπ symbol≤ oε thσ screeε anΣ printeΣ s∩ oε paper«á T∩ ge⌠á bacδ
t∩á norma∞á text¼á yo⌡á g∩ bacδ t∩ thσ fon⌠ selectioε men⌡ anΣá selec⌠á thσ
standarΣ font«á Oncσ yo⌡ ge⌠ useΣ t∩ it¼á i⌠ i≤ quitσ eas∙ t∩ use«á Yo⌡ caε
displa∙á ß "fon⌠ conversioε menuó a⌠ an∙ timσ s∩ yo⌡ caε tel∞ whicΦá lette≥
wil∞ givσ wha⌠ shape.
T∩á accommodatσá thσá limi⌠á oµ 12╕á PCGs¼á Beete°á wil∞á replacσá graphic≤
character≤á u≡ thσ pagσ witΦ ß cross-hatcΦ t∩ enablσ ne≈ character≤á t∩á bσ
displayeΣá iε thσ curren⌠ line«á Iµ yo⌡ scrol∞ u≡ thσá page¼á however¼á thσ
character≤á arσ alway≤ correctl∙ displayeΣ oε thσ linσ beinτ accessed«á AnΣ
wheε yo⌡ print¼ al∞ thσ character≤ arσ correct.
Iµá thσ supplieΣ graphic≤ character≤ d∩ no⌠ sui⌠ you≥ needs¼á yo⌡á caε
creatσá you≥ owε usinτ thσ PC╟ edito≥ tha⌠ i≤ supplied«á Thi≤ ne≈ fon⌠á caε
theε bσ madσ thσ defaul⌠ fon⌠ iε thσ fon⌠ menu.
Sincσá thσ printinτ proces≤ i≤ ß graphic≤ screeε dump¼á yo⌡ mus⌠ usσ ß
printe≥á tha⌠á ha≤ thσ abilit∙ t∩ prin⌠ dot-addressablσ graphic≤ ßá l'Epsoε
etc«á Iµá thσ characteristic≤ oµ you≥ printe≥ diffe≥ froφ thσá standard¼á ß
configuratioε filσ caε bσ altereΣ fo≥ you≥ particula≥ system«á Thσ printinτ
proces≤á i≤á fairl∙ slow¼á bu⌠ i⌠ i≤ ß smal∞ pricσ t∩ pa∙ fo≥á thσá result≤
obtained.
Thσá pricσá oµá Beete° i≤ $99-00«á Thσá documentatioεá (2╢á pages⌐á i≤
adequate¼á anΣ anyonσ shoulΣ bσ ablσ t∩ maste≥ thσ packagσ quitσ easily« I⌠
shoulΣ bσ idea∞ fo≥ peoplσ dealinτ witΦ sciencσ anΣ math≤ paper≤ who¼ unti∞
now¼á havσ no⌠ beeε ablσ t∩ prin⌠ thei≥ uniquσ symbols« Iε fact¼ anyonσ wh∩
want≤ thσ abilit∙ t∩ mi° tex⌠ anΣ graphic≤ woulΣ finΣ i⌠ ideal.
Beete°á i≤ availablσ froφ thσ author¼á Alaiε Remon⌠ a⌠ 5▒ Finnis≤ St.¼
NortΦ Adelaide¼ 5006. []
***************************************************************************
A Bugs View...........................................................A Bug
Statistic≤ arσ wha⌠ yo⌡ tel∞ ß computer«á Iµ ß fac⌠ i≤ no⌠ iε therσ i⌠ doe≤
no⌠ exist« []èCOMMUNICATIONS - Converting 300 baud Modem7 to 1200 baud.......David Rapson
ááááááááááááMBMODEM7.CO═ i≤ supplieΣ witΦ thσ 64δ disδ system« Thσ prograφ
áááááááááááái≤á thσá Microbeσ variatioε oµ WarΣ Christensen≤á popula≥á filσ
ááá#2ááááááátransfe≥á prograφá calleΣ MODEM7«á Thσ program¼á a≤á thσá namσ
áááááááááááásuggests¼á i≤á useΣ t∩ transfe≥ file≤ usinτ thσá RS-23▓á seria∞
áááááááááááápor⌠ t∩ ß modem¼ o≥ othe≥ computer.
Thσá Microbeσá MBMODEM7.CO═á default≤ t∩ 30░ bauΣ fo≥á standarΣá modeφ
communication«á Therσ arσ situation≤ wheε faste≥ transfe≥ oµ informatioε i≤
advantageous«á WitΦá minima∞ effor⌠ froφ someonσ wh∩ know≤ nearl∙á nothinτ
abou⌠á machinσá languagσ programming¼á i⌠ i≤ possiblσ t∩ makσá thσá prograφ
defaul⌠ t∩ 120░ bauΣ iε abou⌠ ╡ minutes.
Becausσá thσá origina∞á Modem╖ prograφ addresseΣ ß Z8░á SIO¼á anΣá thσ
Microbee≤ hardwarσ use≤ ß Z8░ PIO¼ ß cal∞ t∩ thσ boo⌠ RO═ (a⌠ E045⌐ mus⌠ bσ
useΣá t∩á se⌠ u≡ thσ 30░ bauΣ RS-232«á Thσ boo⌠ RO═ als∩ ha≤ ßá 120░á bauΣ
routinσá whicΦ i≤ a⌠ addres≤ E048«á Thesσ routine≤ arσ detaileΣ iε thσá 64δ
Disδ operator≤ Manual.
Thσ objec⌠ i≤ t∩ replacσ thσ cal∞ t∩ thσ 30░ bauΣ routine¼ witΦ tha⌠ oµ thσ
120░ bauΣ one¼ b∙ changinτ E04╡ t∩ E04╕ withiε thσ program.
Iε machinσ languagσ ß CAL╠ ha≤ thσ he° codσ oµ CD« T∩ finΣ thi≤ ╔ raε
MBMODEM╖ anΣ theε useΣ M-rese⌠ t∩ ente≥ thσ monito≥ whils⌠ iε thσ middlσ oµ
MBMODEM7«á ╔á theε searcheΣ fo≥ C─ 4╡ E░ witΦ ╙ 10░ 1B0░ C─ 4╡á E░á <ret╛
Thσá addres≤á 116╣á wa≤ displayed¼á anΣ haΣ 4╡ E░ following¼á 4╡á beinτá a⌠
addres≤ 1170«á Thσ 100Φ i≤ thσ prograφ start¼ anΣ 1B00Φ i≤ thσ prograφ enΣ
founΣ usinτ DD╘ detaileΣ below.
No≈ thi≤ i≤ wha⌠ yo⌡ do«á Makσ surσ tha⌠ afte≥ ß warφ boo⌠ yo⌡ don'⌠á aut∩
ruεá ß program«á Havσ DD╘ (Dynamiπ Debugginτ Tool⌐ anΣ MBMODEM7.CO═ oε thσ
samσ disk¼ then;
A> DDT MBMODEM7.COM <cr> [run DDT, loading MBMODEM7]
DDT VERS 2.2
NEXT PC
1B00 0100 [end and starting address of program]
-S1170 <cr> [enter S1170 and return]
1170 45 48 <cr> [enter 48 and return. New address]
1171 E0 . <cr> [enter a . and return to end]
-^C [control C to exit]
A> SAVE 26 MB1200.COM <cr>
2╢á page≤ oµ memor∙ arσ saved«á Simply¼á iµ thσ NEX╘ addres≤ end≤ witΦá 0░
theεá subtrac⌠ 1Φ (iµ no⌠ 0░ theε d∩ no⌠ subtrac⌠ 1h⌐á givinτá here¼á 1B00-
1h=1AFF« Theε conver⌠ thσ 1┴ t∩ decimal¼ 1*1╢ plu≤ ┴ (decima∞ 10⌐ give≤ 2╢
decimal.
Thσá ne≈á prograφ i≤ calleΣ MB1200.CO═ anΣ i≤ identica∞á iεá operatioε
excep⌠ tha⌠ no≈ i⌠ wil∞ ruε a⌠ 120░ bauΣ insteaΣ oµ 300«á That'≤ al∞á therσ
i≤ t∩ it. []èMULTIPL┼ BB╙ II╔ REVIEW......................................DAMIEN BARNARD
ááááááááááááA≤ yo⌡ caε seσ froφ it≤ namσ ¼á Multiplσ BB╙ i≤ divideΣ u≡ int∩
ááá#2 áááádifferen⌠ board≤ o≥ specia∞ interes⌠ sections«
ááááááááááááThσ board≤ tha⌠ arσ availablσ are:-
SAAU├ - S.A. Apple Users C6┤ - Commodorσ Hacker≤ board
APPL┼ HACKE╥ - Applσ Hacker≤ Board JOKE╙ - Joke≤ rateΣ <G>
MA├ - MacintosΦ Board MAI╬ - Genera∞ Inf∩ Board
X-RATE─ - Joke≤ rateΣ <X> FOR-SAL┼ - What there i≤ fo≥ sale
DATE╙ - Lookinτ fo≥ someone? HINT╙ - Adventure/Arcadσ hints
CP═ STUF╞ - Fo≥ al∞ CP═ nuts
The∙á wa∙á yo⌡ choosσ whicΦ sectioε o≥ `Boardº yo⌡ wan⌠ i≤ t∩á simpl∙á typσ
it'≤ name║ t∩ g∩ t∩ thσ joke≤ boarΣ typσ JOKES.
Othe≥ command≤ availablσ t∩ yo⌡ are:-
C- cha⌠ t∩ sysop¼á O- Othe≥ bb≤ numbers¼á D- Ente≥ Upload/DownloaΣ
P- Changσ Password¼á V- Changσ vide∩ width¼á E- Examinσ you≥ stats¼
R- ReaΣ you≥ mail¼ S- SenΣ mail¼ F- SenΣ Feedbacδ t∩ SYSOPS¼
U- Sho≈ Othe≥ users¼á H- Displa∙ systeφ help¼á Z- Changσ user≤á status¼á
I- Displa∙ inf∩ oε thσ system¼á $- Systeφ News¼á N- Se⌠ numbe≥ oµ nulls¼
?- Thi≤ men⌡ L- Loτ ofµ system¼ FEES- Displa∙ inf∩ oε joininτ thσ system.
A≤á yo⌡ caε seσ therσ arσ ß lo⌠ oµ command≤ s∩ i⌠ make≤ gooΣ sensσá t∩
prin⌠ ou⌠ thesσ Command≤ ¿ iµ yo⌡ havσ ß printe≥ )«á
Wheεá yo⌡ downloaΣ froφ thσ systeφ i⌠ ask≤ yo⌡ froφ whicΦ boarΣ d∩ yo⌡
wisΦ t∩ downloaΣ anΣ yo⌡ caε choosσ froφ ╖ boards«á Therσ i≤ als∩ ß specia∞
sectioεá oµá thσá upload/downloaΣá wherσá yo⌡á caεá down/u≡á loaΣáá X-rateΣ
graphics!«á Thσ commanΣ ╬ t∩ se⌠ no«á oµ null≤ i≤ ver∙ usefu∞ iµ yo⌡ havσ ß
slo≈ printer«á Therσ arσ tw∩ command≤ whicΦ ╔ haven'⌠ tolΣ yo⌡ about║á the∙
arσ 30░ - switcΦ t∩ 30░ bauΣ ¼ 120░ - switcΦ t∩ 1200/7╡ baud« That'≤ rightí
Iµá yo⌡á havσ ß 1200/7╡ modeφ yo⌡ caε switcΦ t∩ tha⌠ modσ anΣá zi≡á througΦ
bulletins«á ╔á d∩ no⌠ havσ ß 1200/7╡ modeφ (yet⌐ s∩ ╔ can'⌠ commen⌠ oεá ho≈
wel∞ i⌠ works.
Thσ systeφ i≤ ruε oε aε Applσ I╔ witΦ ß 2░ meτ harΣ disδ anΣ aεá Avteδ
multi-modem«á Yo⌡á arσ probabl∙ wonderinτ wh∙ thσ systeφ i≤ calleΣ Multiplσ
BB╙ `III'¼á wel∞ thσ answe≥ i≤ simple║ thσ softwarσ ha≤ beeε upgradeΣ threσ
times«á ╔á neve≥ diΣ seσ multiplσ bb≤ I¼á anΣ ╔ don'⌠ thinδ thσ publiπá diΣ
eithe≥ ¿ i⌠ wa≤ ß tes⌠ stagσ )« ╔ hearΣ abou⌠ thσ systeφ wheε i⌠ wa≤ calleΣ
Multiplσ BB╙ II«á I⌠ wa≤ ruε a⌠ nigh⌠ timσ becausσ the∙ hadn'⌠ haΣá anothe≥
telephonσ linσ pu⌠ in.
Thσá SYSOP╙á Dann∙ Vozz∩ anΣ Lyal∞ Pearcσ arσ constantl∙ watchinτá thσ
systeφ ¼ s∩ don'⌠ bσ surpriseΣ iµ the∙ star⌠ typinτ command≤ fo≥ yo⌡ iµ yo⌡
arσ stuck«á I⌠ caε bσ ß bi⌠ shockinτ wheε you'vσ stoppeΣ typinτ becausσ yo⌡
haΣ enougΦ anΣ suddenl∙ thσ command≤ yo⌡ neeΣ appearí
No≈ thσ mos⌠ importan⌠ part║ Ho≈ mucΦ wil∞ i⌠ al∞ cost┐ Wel∞ therσ arσ
ß fe≈ way≤ yo⌡ caε join║á firstl∙ yo⌡ caε senΣ Multiplσ bb≤ $30.0░ fo≥á al∞
oµ thσ board≤ anΣ an∙ ne≈ board≤ the∙ pu⌠ on¼ o≥ yo⌡ caε pa∙ $10.0░ anΣ ge⌠
acces≤á t∩ onσ boarΣ anΣ thσ MAI╬ board«á Iµ yo⌡ choosσ tha⌠ optioε yo⌡ caε
pa∙ $3.0░ fo≥ an∙ additiona∞ boarΣ yo⌡ want,o≥ pa∙ aε extrß $20.0░ anΣá ge⌠
acces≤ t∩ al∞ thσ board≤ anΣ al∞ futurσ board≤ ¿ tha⌠ i≤ pa∙ $10.0░ fo≥ onσ
boarΣ anΣ theε late≥ pa∙ $20.0░ fo≥ al∞ thσ board≤ )«á >>èThi≤ wa∙ yo⌡ caε pa∙ fo≥ wha⌠ yo⌡ need«á ┴ typica∞ microbeσ use≥ woulΣ joiε
thσá Microbeσá boarΣá anΣ probabl∙ thσ FO╥ SAL┼ anΣ (iµ i⌠á wa≤á ROSS⌐á thσ
JOKES« Tha⌠ woulΣ meaε yo⌡ woulΣ havσ t∩ par⌠ witΦ $16.0░ dollars.
Iµ yo⌡ wan⌠ t∩ havσ ß looδ phonσ (08)25╡ 511╢ anΣ typσ GUES╘ fo≥ gues⌠
use≥ access,theε typσ FEE╙ t∩ ge⌠ ß completσ lis⌠ oµ wha⌠ i⌠ wil∞ cost«á A⌠
thσ momen⌠ thσ cha⌠ witΦ syso≡ commanΣ ha≤ beeε retrenched,bu⌠ b∙ thσá timσ
yo⌡á reaΣá thi≤á thi≤ i⌠ coulΣ bσ bacδ on«á Iµ yo⌡ havσ an∙á problem≤á senΣ
feedbacδ t∩ thσ sysops.
Thσ boarΣ work≤ well- apar⌠ froφ thσ editor«á Wheε yo⌡ arσ typinτ iε ß
bulletiε anΣ yo⌡ makσ ß mistake¼á iµ yo⌡ pusΦ deletσ t∩ ge⌠ riΣ oµ i⌠á yo⌡
ge⌠ aε inversσ character«á Bu⌠ don'⌠ worry¼ i⌠ diΣ deletσ thσ characte≥ bu⌠
yo⌡ can'⌠ seσ ití Als∩ wheε yo⌡ ge⌠ t∩ thσ enΣ oµ ß linσ i⌠ wil∞ bee≡ unti∞
yo⌡á pusΦ <return╛ ¿ n∩ continuou≤ typinτ )¼á bu⌠ apar⌠ froφ tha⌠ thσ boarΣ
i≤ good« Wel∞ tha⌠ abou⌠ wrap≤ i⌠ up«
Thσ nex⌠ bb≤ ╔ wil∞ revie≈ wil∞ bσ thσ OME╬ V« []
***************************************************************************
Wha⌠ d∩ thosσ command≤ iε basiπ reall∙ mean┐........................D P Gee
A⌠ thσ las⌠ Microbeσ user≤ grou≡ meetinτ ╔ wa≤ interesteΣ t∩ notσ tha⌠
wheε ß questioε wa≤ askeΣ concerninτ basiπ program≤ tha⌠ man∙ peoplσ lookeΣ
blanδá faceΣ «á Late≥ oε wheε ╔ wa≤ wanderinτ arounΣ lookinτ a⌠ thσ variou≤
display≤ man∙ peoplσ werσ talkinτ abou⌠ CPM¼á DOS¼ Mbasiπ etc« s∩ ╔ though⌠
wha⌠á ha≤á happeneΣ t∩ MicroworlΣ Basiπ ┐á A≤ ╔ havσ ß 32╦ Microbeσá t∩á mσ
BASI├ i≤ thσ onl∙ languagσ!
S∩á fo≥á thosσ oµ yo⌡ wh∩ havσ forgotteε wha⌠ somσ oµ thosσ term≤á anΣ
command≤á arσ iε Basiπ ╔ fel⌠ i⌠ wa≤ m∙ dut∙ t∩ re-introducσ yo⌡á t∩á thesσ
commands:
ColΣá Boo⌠ - thi≤ i≤ wha⌠ yo⌡ d∩ wheε thσ prograφ yo⌡ havσ beeεá typinτá iε
fo≥ hour≤ doesn'⌠ work.
RO═á - rudd∙á 'oriblσ machinσ ¿ thi≤ i≤ wha⌠ yo⌡ sa∙ afte≥á yo⌡á havσ
colΣ booteΣ you≥ microbeσ )
RA═ - ß malσ ewe
Breaδ Ke∙ - a≤ fa≥ a≤ ╔ kno≈ thi≤ i≤ ß ke∙ t∩ thσ smok∩ room.
Bytσ - thi≤ i≤ obviousl∙ wha⌠ yo⌡ d∩ durinτ you≥ break.
Variablσá - thi≤ terφ caε meaε anything¼á bu⌠ generall∙ i⌠ relate≤á t∩á thσ
firs⌠ timσ yo⌡ ruε you≥ program¼ seσ colΣ boot.
Expression≤á - thesσ arσ stronge≥ term≤ whicΦ comσ afte≥ ROM¼á whicΦ ╔ wil∞
no⌠ prin⌠ here.
Cur≤ - ver∙ simila≥ t∩ expression≤ anΣ ROM.
TaΓ - ß typσ oµ sof⌠ drink¼ caε bσ drunδ durinτ break.
Synte° - ╔ don'⌠ kno≈ wh∩ thi≤ synte° i≤ bu⌠ hσ i≤ foreve≥ makinτ error≤
oε m∙ microbee.
Pokσ - stylσ oµ typinτ generall∙ useΣ b∙ onσ finge≥ typists.
Erro≥á Message≤á - thi≤ i≤ aε ofteε cryptiπ messagσ whicΦá appear≤á oεá thσ
screeεá whicΦ tell≤ yo⌡ tha⌠ somethinτ i≤ wronτ someho≈ somewherσ
ááááááááááiεá you≥ program¼á anΣ caε bσ fixeΣ b∙ doinτ somethinτá somewherσ
áááááááááásomehowíá Thσ easies⌠ methoΣ t∩ riΣ yourselµ oµ thesσ i≤ t∩á colΣ
ááááááááááboot.
Diφ - ß descriptioε oµ tha⌠ Synte° person.
Ruεá - thi≤á i≤ thσ mos⌠ valuablσ commanΣ containeΣ iε BASI├ a≤ i⌠á i≤
thσáescapσ clausσ tha⌠ man∙ oµ u≤ woulΣ bσ programmer≤ usσ wheε ß
prograφ i≤ no⌠ working¼ RU╬! []è00100 REM ***** PSYCHROMETER *****...........................Kevin Burrows
00110 REM A program for the MICROBEE to convert readings from
00120 REM a PSYCROMETER to several common measures of humidity.
00130 REM An estimate of the height at which clouds will form
00140 REM is also given.
00150 REM By Kevin Burrows, Adelaide
00160 REM References:
00170 REM Using Home Computers to study the Weather
00180 REM Weatherwise, August 1983.
00190 REM
00200 REM To find the height of clouds will form
00210 REM Meteorology Australia, Autumn 1981.
00220 REM
00230 CLS :POKE 257,1
00240 CURS 24,5 :INVERSE
00250 PRINT" PSYCHROMETER " :NORMAL
00260 PRINT\"A program to convert readings from a psychrometer to several"
00270 PRINT"common measures of humidity. An estimate of the height of
the"\"cloud base and temperature at this height is also calculated."
00280 CURS 10,14 :PRINT"Do you want instructions on a psychrometer (Y/N) ?"
00290 A1$ = KEY :IF A1$ ="" AND A1$<>"Y" AND A1$<>"N" THEN 290
00300 IF A1$ ="Y"THEN GOSUB 730
00310 CLS
00320 PRINT"HEIGHT ABOVE SEA LEVEL IN METRES ";
00330 INPUT H1
00340 PRINT"DRY-BULB TEMPERATURE (deg C) ";
00350 INPUT T0
00360 PRINT"WET-BULB TEMPERATURE (deq C) ";
00370 INPUT T1
00380 IF T1>T0 THEN CURS 1,15 :INVERSE :PRINT" ERROR :- DRY-BULB <
WET-BULB TEMPERATURE "; :NORMAL :PLAY 20 :GOTO 660
00390 ON ERROR GOTO 1030
00400 REM Convert Celsius to Absolute (Kelvin)
00410 T3 = T0+273.15
00420 T4 = T1+273.15
00430 E1 = EXP(21.4-5351/T4) :REM Calculate vapour pressure
00440 P0 = 1014-(H1/884)*100 : REM If height in feet alter 884 to 2900
00450 E0 = E1-P0*(T3-T4)/1555 :REM Adjust vapour pressure for altitude
00460 D0 = 5351/(21.4-2.30258*LOG(E0)) :REM Calculate dew point
00470 D0 = D0-273.15
00480 E2 = EXP(21.4-5351/T3) :REM Calculate saturation vapour pressure
00490 R0 = 100*E0/E2 :REM Calculate Relative Humidity
00500 Q0 = .622*E0/(P0-.378*E0) :REM Calculate Specific Humidity
00510 PRINT
00520 PRINT" ANSWERS"
00530 PRINT
00540 PRINT "DEW POINT = "; FLT(INT(D0*10+0.5))/10; " "; "C"; ". "
00550 PRINT "VAPOUR PRESSURE = "; FLT(INT(E0*10+0.5))/10; " MB. "
00560 PRINT"SATURATION VAPOUR PRESSURE = ";FLT(INT(E2*10+.5))/10;" MB. "
00570 PRINT"RELATIVE HUMIDITY = ";INT(R0+0.5);" PERCENT. "
00580 PRINT"SPECIFIC HUMIDITY = ";FLT(INT(1000*Q0*10+.5))/10;" PARTS PER
THOUSAND. "
00590 GOSUB 920 : REM CALCULATE CLOUD BASE HEIGHT
00600 PRINT\"Press any key to continue or `Q` to Quit "; :PLAY 12
00610 A1$ = KEY :IF A1$ ="" THEN 610
00620 IF A1$ ="Q"THEN END
00630 CURS 41,1 :PRINT"CHANGE TO :-"; : INPUT C7$ :IF C7$ =""THEN GOTO 650
00640 H1 = VAL(C7$)è00650 CURS 35,1 :PRINT H1;" "
00660 CURS 41,2 :PRINT"CHANGE TO |-"; :INPUT C7$ :IF C7$ ="" THEN GOTO 680
00670 T0 = VAL(C7$)
00680 CURS 31,2 : PRINT T0;" "
00690 CURS 41,3 :PRINT"CHANGE TO |-"; :INPUT C7$ :IF C7$ ="" THEN GOTO 710
00700 T1 = VAL(C7$)
00710 CURS 31,3 : PRINT T1;" "
00720 GOTO 380
00730 CLS :PRINT\"A psychrometer consists of two thermometers, one with a
sleeve"
00740 PRINT"of wet fabric around the bulb. The `wet-bulb` thermometer"
00750 PRINT"shows a reading which is lower than that of the `dry-bulb`"
00760 PRINT"themometer which reads the ambient air temperature."
00770 PRINT\"The difference between the two temperatures is known as the"
00780 PRINT"`wet-bulb depression` and is proportional to the rate of"
00790 PRINT"cooling of the wet-bulb due to evaporation from its moist "
00800 PRINT"surface."
00810 PRINT\"Press any key to continue"
00820 A1$ = KEY :IF A1$ =""THEN 820
00830 CLS
00840 PRINT\"A psychrometer can be made by mounting two matched
thermometers"\"firmly (glue is preferable) to a thin wooden paddle
with the"
00850 PRINT"bulbs projecting from one end. At the other end, drill a
hole"\"and tie a stout piece of string to the paddle so that it can"
00860 PRINT"whirled rapidly. A layer of muslin is tied around one of
the"\"bulbs and dipped in water. The psychrometer is then whirled"
00870 PRINT"rapidly for about a minute, or untill the temperatures do
not"\"change."
00880 PRINT\"Press any key to continue"
00890 A1$ = KEY :IF A1$ =""THEN 890
00900 RETURN
00910 REM *** Calculate cloud height ***
00920 U0 = 0.01*R0
00930 T5 = T3/((U0)^(2/7))
00940 F0 = 2.30258*LOG(T5/T3)+(2/7)*2.30258*LOG(U0)+1548.06*(1/T5-1/T3)
00950 G0 = 1/(T3*T5)-1548.06/(T5*T5)
00960 T5 = T5-F0/G0
00970 IF T5<1 THEN T5 = 1
00980 IF ABS(F0/G0)> = 0.01 THEN GOTO 940
00990 Z0 = 100*(T3-T5)
01000 PRINT"HEIGHT OF CLOUD BASE = ";INT(Z0);" METRES ABOVE THE SURFACE. "
01010 PRINT"TEMPERATURE AT CLOUD BASE = ";FLT(INT((T5-273.15)*10+0.5))/10;
" C. "
01020 RETURN
01030 REM WET BULB TEMP TOO LOW
01040 CURS 1,15 :INVERSE :PRINT" ERROR :- WET-BULB TEMPERATURE TOO LOW ";
:NORMAL :PLAY 22 :GOTO 660
Example of output....
DEW POINT = 23. C.
VAPOUR PRESSURE = 28. MB.
SATURATION VAPOUR PRESSURE = 35.6 MB.
RELATIVE HUMIDITY = 79 PERCENT.
SPECIFIC HUMIDITY = 19.6 PARTS PER THOUSAND.
HEIGHT OF CLOUD BASE = 486 METRES ABOVE THE SURFACE.
TEMPERATURE AT CLOUD BASE = 22.1 C. []èDISK SOFTWARE REVIEW - MICROBEE ARCADE GAMES Vol. 2................G Smith
ApplieΣá Technolog∙ havσ releaseΣ anothe≥ disδ oµ arcadσá games«á Thi≤
onσ ha≤ ╢ game≤ ranginτ froφ thσ ver∙ eas∙ t∩ quitσ hard«á Tw∩ oµ thσ game≤
arσá one≤á tha⌠ havσ beeε arounΣ fo≥ ß whilσ bu⌠ onσ oµ thesσ i≤ ßá classiπ
compute≥á gamσ anΣ show≤ tha⌠ ß gooΣ gamσ doe≤ no⌠ necessaril∙á neeΣá fanc∙
graphic≤ t∩ bσ interesting.
Iε orde≥ oε thσ disδ thσ game≤ are:-
DEFENDE╥ Disδ versioε oµ thσ cassettσ game«á Thσ objec⌠ i≤ t∩ rescuσ peoplσ
anΣ shoo⌠ aliens« Al∞ ver∙ familiar« Yo⌡ caε za≡ int∩ hyperspacσ anΣ returε
t∩á ß differen⌠ (random⌐ par⌠ oµ thσ terrain«á I⌠ appear≤ t∩ havσ differen⌠
(better⌐ graphic≤ thaε thσ cassettσ version«á M∙ ninσ yea≥ olΣ prograφ tes⌠
pilo⌠ reckon≤ thi≤ onσ i≤ fairl∙ easy.
GRIDFIR┼á Yo⌡á movσ arounΣ ß tw∩ dimensiona∞ griΣá shootinτá nastie≤á whilσ
tryinτá t∩ avoiΣ theφ (the∙ shoo⌠ back!!)«á Therσ arσá Furballs¼á Androids¼
Spheres¼á Star≤ anΣ Beakers«á Thi≤ onσ i≤ difficult«á Thσ nastie≤ movσ fas⌠
anΣ i⌠ i≤ difficul⌠ t∩ maste≥ thσ control≤ t∩ movσ anΣ fire.
CAPTUR┼á Thi≤á i≤ simila≥ t∩ thσ arcadσ gamσ "PENGO"«á Yo⌡ arσ iεá ßá largσ
rectanglσ witΦ tw∩ mine≤ anΣ somσ blocks« Thσ ideß i≤ t∩ movσ thσ block≤ t∩
tra≡ thσ mine≤ s∩ the∙ canno⌠ move«á ┴ gooΣ strategiπ gamσ witΦ ╣ level≤ oµ
difficulty« Thσ instruction≤ sa∙ tha⌠ level≤ ╕ anΣ ╣ arσ almos⌠ unplayable.
ZTRE╦á Thi≤ i≤ inspireΣ b∙ thσ defunc⌠ T╓ serie≤ "Sta≥ TreK"«á Yo⌡ arσá thσ
captaiε oµ thσ sta≥ shi≡ "Enterprise"«á WitΦ thσ aiΣ oµ Dr«á Spocδá yo⌡
mus⌠á tracδá dowε anΣ destro∙ Klingon≤ whilσ lookinτ afte≥ thσ spacσá ship«
Thσá gamσá i≤á playeΣ a≤ iµ oε thσ surfacσ oµ ßá largσá spherσá (Einstein'≤
curveΣá spacσ theory??)«á Bu⌠ al∞ yo⌡ seσ i≤ ß smal∞ par⌠ iε thσ forφ oµá ß
grid« Thσ "Enterpriseó anΣ othe≥ bit≤ anΣ piece≤ arσ representeΣ b∙ variou≤
symbols«á Yo⌡ havσ finitσ resource≤ t∩ pursuσ thσ Klingons« Therσ i≤ ß ver∙
comprehensivσ se⌠ oµ instruction≤ witΦ thi≤ one.
GRAPHI├ LANDE╥ Thi≤ i≤ thσ onl∙ non-competitivσ gamσ oε thσ disk«á Yo⌡ havσ
contro∞á oµá ß spacσ shi≡ anΣ mus⌠ lanΣ i⌠ safely«á Thσ terraiεá i≤á prett∙
ruggeΣá anΣá eveε iµ yo⌡ locatσ somσ fla⌠ grounΣ yo⌡ mus⌠á descenΣá a⌠á thσ
righ⌠ ratσ o≥ CRASH!!« Oncσ yo⌡ lanΣ anΣ tr∙ agaiε therσ i≤ spacσ debri≤ t∩
avoid.
JUSTL┼á ╔á canno⌠ sa∙ mucΦ abou⌠ thi≤ becausσ i⌠ i≤ fo≥ joystick≤ onl∙á anΣ
thosσ ╔ d∩ no⌠ have«á Howeve≥ froφ thσ instruction≤ thi≤ i≤ ß "cleaneΣá upó
versioεá oµ "Hustleó froφ Game≤ Disδ 1«á (CleaneΣ u≡ froφ wha⌠ ╔á wonder?)«
Point≤ arσ scoreΣ b∙ runninτ int∩ targets« Thσ morσ yo⌡ hi⌠ thσ bigge≥ you≥
tai∞ get≤ (perhap≤ tha⌠ i≤ thσ bi⌠ thσ cleaneΣ up?)«á Yo⌡ canno⌠ cros≤ you≥
tai∞ o≥ banτ int∩ thσ walls« Thσ scorσ i≤ effecteΣ b∙ thσ timσ taken.
Thσ disδ i≤ availablσ fo≥ $29.9╡ iε eithe≥ 3.5ó o≥ 5.25ó formats.
(les≤á 10Ñá fo≥ members)«á Thσ disδ selµ boot≤ froφ "resetó witΦ ß men⌡á t∩
selec⌠ thσ game≤ from«
┴ gooΣ featurσ i≤ thσ ver∙ completσ "Helpó note≤ fo≥ eacΦ game.
I≤ i⌠ wortΦ thσ money┐ ╔ woulΣ sa∙ ye≤ iµ "Justleó coulΣ bσ playeΣ froφ thσ
keyboard.
Revie≈ cop∙ courtes∙ oµ ApplieΣ Technology. []èHint≤ froφ thσ MULTIPLA╬ USER'╙ GROU╨ - Pt 1.............«.Johε Buckerfield
1. Before PRINTing to Printer or File check:
a.áá PRIN╘á OPTIONS║áá area║á - seσá tha⌠á thi≤á correspond≤á t∩á thσ
ááááááááááareßá yo⌡á wan⌠á t∩á prin⌠á o≥á savσá t∩á disδá - arσá yo⌡á awarσ
áááááááááátha⌠áá thσáá areßáá change≤áá automaticall∙áá wheεáá yo⌡áá Inser⌠
ááááááááááRow≤ anΣ Column≤ ?
b.á áPRIN╘áá MARGINS║áá prin⌠áá width║áá ªá prin⌠á length║áá mus⌠áá bσ
ááááááááááadjusteΣáá t∩á ensurσá tha⌠á thσá outpu⌠á i≤á presenteΣá iεáá thσ
áááááááááádesireΣáá forma⌠á - i⌠á appear≤á tha⌠á prin⌠á widtΦá i≤áá limiteΣ
áááááááááát∩ ß maximuφ oµ 16┤ characters╗ lef⌠ margiε mus⌠ bσ >0
2. Before QUITting and returning to the Operating System:
a. ááTRANSFER SAVE: filename: - to save the active worksheet.
b.á áTRANSFE╥áá OPTIONS║áá setup║áá - t∩áá ensurσá tha⌠áá thσáá setu≡
áááááááááádefaul⌠áá drivσáá ha≤áá Multiplaεáá anΣáá Operatinτáá Systeφááá -
ááááááááááotherwisσá (witΦá somσá Operatinτá Systems¼áá bu⌠á no⌠á witΦá thσ
ááááááááááMicrobee⌐á yo⌡á ma∙ hanτ witΦ ß cryptiπ messagσ ...«á checδá you≥
áááááááááásysteφ !!
3.á Afte≥á OPTION╙á (t∩ se⌠ recalc:⌐ thσ statu≤ linσ no⌠ onl∙á display≤á
áááá"Ñ Freeó bu⌠ als∩ thσ actua∞ "bytσ spaceó lef⌠ oε thσ worksheet.
4.á Havσá yo⌡á discovereΣ tha⌠ thσ @-ke∙ instantl∙ convert≤á Relativσá cel∞
ááááreference≤ t∩ Absolutσ references¼á anΣ caε als∩ bσ useΣ t∩ ente≥ Name≤
ááááwheε constructinτ formulae.
5.á Wheε INSTALLinτ Multiplaε yo⌡ wil∞ neeΣ t∩ responΣ t∩ al∞ thσ question≤
áááásequentiall∙ iµ yo⌡ wan⌠ t∩ define/redefinσ functioε keys.
6. Havσ yo⌡ trieΣ t∩ usσ thσ letter≤ "ró o≥ "Ró o≥ "có o≥ "Có a≤ Name≤ fo≥
áááácell≤ ┐á You'l∞ finΣ Multiplaε doesn'⌠ accep⌠ these¼á a≤ the∙ woulΣ bσ
ááááconfuseΣ witΦ reference≤ t∩ Row≤ ª Columns.
7. áSYMBOLI├á Transfe≥ Save/LoaΣ caε bσ useΣ ver∙ effectivel∙ t∩ cleaεá u≡
ááááuntid∙á formulaσá anΣ inefficien⌠ cel∞ reference≤ iε ß largσá workshee⌠
áááá(tha⌠á ha≤á undergonσá man∙ version≤á anΣá edits)«á Savinτá unde≥á thσ
ááááTransfe≥ Options║ Symboliπ modσ ma∙ savσ memor∙ anΣ significantl∙ speeΣ
ááááu≡á recalculations«á Bu⌠á bσ prepareΣ t∩ tr∙ thi≤ ove≥ ß tea-breaδá a≤
ááááit'≤ rathe≥ slow╗á ß filσ loadeΣ iε Symboliπ o≥ Othe≥ modσ shoulΣá theε
áááábσ saveΣ iε Norma∞ modσ fo≥ faste≥ loading.
8. Havσ yo⌡ beeε threateneΣ b∙ "Filσ forma⌠ error║ linσ 1ó ????
ááááYou'vσá probabl∙ Transfe≥ SaveΣ ß filσ unde≥ Symboliπ modσ anΣ arσá no≈
áááátryinτ t∩ Transfe≥ LoaΣ i⌠ unde≥ Norma∞ mode.
Wσá sugges⌠á yo⌡ givσ Symboliπ forma⌠ file≤ aε extensioε sucΦá a≤á .SL╦
ááááwhicΦ readil∙ identifie≤ them.
Thσáá MULTIPLA╬á ªá APPLICATION╙á USE╥á GROU╨á wil∞á continuσá t∩áá arrangσ
occasiona∞ specia∞ meeting≤ - RicharΣ Newcombσ (convenor).
AnΣ now¼á wai⌠ fo≥ it¼ withiε nex⌠ fe≈ week≤ **¬ ß ne≈ versioε oµ Multiplaε
duσ fo≥ release¼á witΦ macro≤ anΣ al∞ **¬ ß Microbeσ Multiplaε contac⌠ t∩
bσ announceΣ **¬ ß spreadshee⌠ sectioε oε thσ AMU╟ Bulletiε BoarΣ *** []èMICROWORLD BASIC - Township Distance chart.........................Mal Watt
00100 REM *** Township Distance Chart ***
00110 REM *** Mal Watt August 1985 ***
00120 DIM T(100) :REM one element for each town name in the DATA
00130 CLS:CURS 1,7:PRINT "This prints a chart of township distances."
0014░áPLA┘á 0,1▓ :PRIN╘ "Ente≥ printe≥ redirectioε (╡ ╜ 120░á bauΣá seria∞
printer)ó
0015░ PLA┘ 0,1▓ :PRIN╘ SPC(26⌐ "(▒ ╜ paralle∞ printer)ó
0016░ PLA┘ 0,╢ :PRIN╘ SPC(26⌐ "(░ ╜ onl∙ displa∙ t∩ thσ screen)"
0017░ PRIN╘ SPC(10⌐ "Pres≤ ß numbe≥ :"╗ :RE═ accep⌠ anΣ then
0018░ P1$=KEY$:I╞ P1$="ó THE╬ 18░ :RE═ validatσ thσ optioε
0019░ R=(SEARCH("015",P1$)>0)║ I╞ NO╘ ╥ ║ PLA┘ 2▓ ║ GOT╧ 18░
0020░ P=INT(VAL(P1$)⌐ ║ PRIN╘ ╨ :RE═ optioε i≤ valid
0021░áRE═ Thσ nex⌠ linσ send≤ ou⌠ thσ printe≥ commanΣ fo≥ CondenseΣá prin⌠
oε ß Gemini.
0022░ I╞ P<>0:OUT#P:PRIN╘ CHR$(27⌐ CHR$(66⌐ CHR$(3):OUT#0:OUT#╨ ON
0023░ REA─ A1$║ I╞ A1$<>"$ó THE╬ GOSU┬ 28░ ║ GOT╧ 230
0024░ OUT#╨ OFF║ OUTú 0
0025░ PRIN╘ "*¬ finisheΣ **"
0026░ END
0027░ RE═ ====printinτ routine===========
0028░ E=0
0029░ REA─ ─ :E=E+─ ║ I╞ D<╛ ░ THE╬ 290
0030░ C=C+1
0031░ FO╥ K=▒ T╧ C
0032░ T(K)=T(K⌐ ½ ┼
0033░ I╞ K>▒ THE╬ PRIN╘ [I╡ T(K)];
0034░ NEX╘ K:PRIN╘ SPC(4⌐ A1$
0035░ RETURN
0036░ RE═ forma⌠ oµ thσ Datß item≤ i≤ "TOWN",distance,distance,...,0¼ wherσ
thσ distance≤ arσ thosσ markeΣ oε ß ma≡ froφ thσ PRIO╥ towε t∩ thi≤ one.
0037░ DAT┴ "ADELAIDE",0,"MURRA┘ BRIDGE",17,36,24,0,"TAILE═ BEND",3,21,0
0038░ DAT┴ "COONALPYN",64,0,"KEITH",66,0,"BORDERTOWN",34,11,0,"KANIVA",43,0
0039░ DAT┴ "KANIVA",43,0,"NHILL",40,0,"DIMBOOLA",38,0,"HORSHAM",36,0
0040░ DAT┴ "$"
0041░ RE═ thσ fina∞ datß iteφ mus⌠ bσ "$"
>RUN
This prints a chart of township distances.
Enter printer redirection (5 = 1200 baud serial printer)
(1 = parallel printer)
(0 = only display to the screen)
Press a number : 0
ADELAIDE
77 MURRAY BRIDGE
101 24 TAILEM BEND
165 88 64 COONALPYN
231 154 130 66 KEITH
276 199 175 111 45 BORDERTOWN
319 242 218 154 88 43 KANIVA
362 285 261 197 131 86 43 KANIVA
402 325 301 237 171 126 83 40 NHILL
440 363 339 275 209 164 121 78 38 DIMBOOLA
476 399 375 311 245 200 157 114 74 36 HORSHAM
èpage 2 MICROBEE NEWS - OCTOBER 1985
MICROBEE NEWS - OCTOBER 1985 page 3
page 4 MICROBEE NEWS - OCTOBER 1985
MICROBEE NEWS - OCTOBER 1985 page 5
page 6 MICROBEE NEWS - OCTOBER 1985
MICROBEE NEWS - OCTOBER 1985 page 7
page 8 MICROBEE NEWS - OCTOBER 1985
MICROBEE NEWS - OCTOBER 1985 page 9
page 10 MICROBEE NEWS - OCTOBER 1985
MICROBEE NEWS - OCTOBER 1985 page 11
page 12 MICROBEE NEWS - OCTOBER 1985
MICROBEE NEWS - OCTOBER 1985 page 13
page 14 MICROBEE NEWS - OCTOBER 1985
MICROBEE NEWS - OCTOBER 1985 page 15
page 16 MICROBEE NEWS - OCTOBER 1985
page 2 MICROBEE NEWS - OCTOBER 1985
MICROBEE NEWS - OCTOBER 1985 page 3
page 4 MICROBEE NEWS - OCTOBER 1985
MICROBEE NEWS - OCTOBER 1985 page 5
page 6 MICROBEE NEWS - OCTOBER 1985
MICROBEE NEWS - OCTOBER 1985 page 7
page 8 MICROBEE NEWS - OCTOBER 1985
MICROBEE NEWS - OCTOBER 1985 page 9
page 10 MICROBEE NEWS - OCTOBER 1985
MICROBEE NEWS - OCTOBER 1985 page 11
page 12 MICROBEE NEWS - OCTOBER 1985
MICROBEE NEWS - OCTOBER 1985 page 13
page 14 MICROBEE NEWS - OCTOBER 1985
MICROBEE NEWS - OCTOBER 1985 page 15
page 16 MICROBEE NEWS - OCTOBER 1985
MICROBEE NEWS - OCTOBER 1985 page 17
page 2 MICROBEE NEWS - OCTOBER 1985
MICROBEE NEWS - OCTOBER 1985 page 3
page 4 MICROBEE NEWS - OCTOBER 1985
MICROBEE NEWS - OCTOBER 1985 page 5
page 6 MICROBEE NEWS - OCTOBER 1985
MICROBEE NEWS - OCTOBER 1985 page 7
page 8 MICROBEE NEWS - OCTOBER 1985
MICROBEE NEWS - OCTOBER 1985 page 9
page 10 MICROBEE NEWS - OCTOBER 1985
MICROBEE NEWS - OCTOBER 1985 page 11
page 12 MICROBEE NEWS - OCTOBER 1985
MICROBEE NEWS - OCTOBER 1985 page 13
page 14 MICROBEE NEWS - OCTOBER 1985
MICROBEE NEWS - OCTOBER 1985 page 15
page 16 MICROBEE NEWS - OCTOBER 1985
MICROBEE NEWS - OCTOBER 1985 page 17