home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CP/M
/
CPM_CDROM.iso
/
mbug
/
mbug049.arc
/
1987MAY.CAT
< prev
next >
Wrap
Text File
|
1979-12-31
|
55KB
|
1,109 lines
.. set page width to 70 & print on Star printer
.pl70
.po0
.OP
.HE# MAY - 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, preferably before 9.00 P.M.
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 Simon Gerraty B/H 420-5827
Mike Holzinger 354-6742 Jim Lobley 758-9169
Mike Thompson 882-5002 John Mitchell 720-2016
SERVICES PROVIDED BY MBUG AUSTRALIA
DISK FORMAT COPYING JOHN BUXTON 758-5744
RBBS SYSTEM OPERATOR. MIKE THOMPSON 882-5002
BAZAAR JOHN MITCHELL. P.O. BOX 157 NUNAWADING 3131
EDITOR A. BARFOOT. P.O. BOX 157 NUNAWADING 3131
MODEM HIRE C. ANDERSON. P.O. BOX. 157 NUNAWADING 3131
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 IRVING 425 HIGH ST. NORTHCOTE
COMPUTER BOOK DISCOUNT TECHNICAL BOOKSHOP SWANSTON St. MELBOURNE
PRESTON ELECTRONIC COMPONENTS 217 HIGH ST. PRESTON.
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
╔á aφá sorr∙ t∩ announce¼á duσ t∩ famil∙á commitments¼á tha⌠á BoΓ ì
Dentoεá ha≤ resigneΣ anΣ wil∞ n∩ longe≥ bσ servinτ yo⌡ a≤ ßá committeσ ì
member«á No≈ wσ neeΣ someonσ t∩ replacσ hiφ anΣ anothe≥ membe≥ wh∩ ha≤ ì
worδ commitment≤ forcinτ hiφ t∩ curtai∞ hi≤ committeσ involvement«á Iµ ì
YO╒á woulΣá likσ t∩ assis⌠ YOU╥ club¼á pleasσ talδ t∩á mσá o≥á anothe≥ ì
committee member about it.
Iε thσ Catche≥ thi≤ montΦ i≤ ß surve∙ forφ whicΦ wσ woulΣ likσ yo⌡ ì
t∩á fil∞á ou⌠ anΣ returε t∩ u≤ a⌠ thσ nex⌠ chancσ yo⌡ have«á Wσá woulΣ ì
appreciatσá i⌠á iµ yo⌡ woulΣ brinτ i⌠ t∩ thσ meetinτ anΣ savσá u≤á thσ ì
postage¼ bu⌠ ge⌠ i⌠ bacδ t∩ u≤ a≤ sooε a≤ yo⌡ can« Wσ wan⌠ t∩ finΣ ou⌠ ì
wha⌠ wσ caε abou⌠ thσ membershi≡ s∩ wσ caε cate≥ fo≥ you≥ needs« Thosσ ì
postinτá thσá forφ caε seσ tha⌠ therσ i≤ n∩ mentioε oµá you≥á namσá o≥ ì
privatσá detail≤á tha⌠ non-authoriseΣ person≤ ma∙ tr∙ t∩ use«á Iµá yo⌡ ì
like¼á wσá wil∞ no⌠ objec⌠ iµ yo⌡ pu⌠ ß stam≡ oε thσ carΣ anΣ savσá u≤ ì
thσ postageí Pleasσ reaΣ i⌠ carefull∙ anΣ returε i⌠ t∩ us.
╔á woulΣá likσá t∩ expres≤ ß votσ oµ thank≤ t∩á thσá member≤á anΣ ì
friend≤á wh∩á assisteΣá u≤ a⌠ thσ Ballara⌠ meeting«á ┴ repor⌠á oµá thσ ì
day≤ event≤ i≤ printeΣ elsewherσ iε thi≤ issue«á Ou≥ prizσ oµ mediß t∩ ì
thσá membe≥ wh∩ travelleΣ thσ mos⌠ distancσ t∩ thσ meetinτ wa≤ woεá b∙ ì
Pete≥á NILO╬ oµ Taturß wh∩ travelleΣ ove≥ 25░ K'φ t∩ ge⌠ t∩á Ballaratí ì
Thank≤ fo≥ puttinτ iε thσ effor⌠ Peter«á Thσ prizσ fo≥ thσ ne≈á membe≥ ì
ha≤ no⌠ beeε decided«
Countr∙á member≤á interesteΣá iε havinτ ß meetinτ iεá therσá areß ì
shoulΣ contac⌠ thσ committeσ witΦ suggestion≤ oε ß loca∞á co-ordinato≥ ì
anΣá ßá venuσ etc«á A≤ ß startinτ point¼á thσ area≤ oµ Wangarattßá anΣ ì
Taralgoε havσ beeε suggesteΣ a≤ possiblσ citie≤ t∩ holΣá meetings«á Iµ ì
thσ forme≥ i≤ decideΣ upon¼ member≤ oµ thσ Albury/Wodongß and/o≥ othe≥ ì
use≥ group≤ woulΣ bσ quitσ welcomσ t∩ attend«
Thi≤á montΦ a⌠ thσ maiε meetinτ wσ wil∞ havσ PREMIU═ upgrade≤ fo≥ ì
BEEARTISTIC«á Thσ pricσ wil∞ bσ $20.0░ (EITHE╥ SIZ┼ DISK⌐ anΣá includσ ì
aε up-datσ fo≥ thσ manual« T∩ ge⌠ aε upgradσ copy¼ yo⌡ mus⌠ brinτ you≥ ì
ORIGINA╠ maste≥ disk for exchange« N╧ OL─ MASTE╥ ╜ N╧ NE╫ VERSION.
Thi≤ ne≈ versioε wil∞ bσ demonstrateΣ oε thσ night«á Also¼ iµ thσ cop∙ ì
ha≤ reacheΣ Australiß iε time¼á ß LB╥ utilit∙ prograφ calleΣ NOA╚ wil∞ ì
bσ displayed«
A≤á oµ thi≤ issue¼á anΣ witΦ specia∞ thanks¼á PRESTO╬á ELECTRONI├ ì
COMPONENT╙ oµ 21╖ HigΦ St« PRESTON¼ supplier≤ oµ electroniπ part≤ havσ ì
offereΣ member≤ oµ MBU╟ ß 10Ñ discoun⌠ oε parts«á Membershi≡ carΣ mus⌠ ì
bσ showε beforσ purchasinτ goods«
╔ suggesteΣ ß couplσ oµ month≤ ag∩ tha⌠ M╙ woulΣ suppl∙ copie≤ oµ ì
BEETHOVE╬á o≥á BE┼ TALKE╥ oε disδ a⌠ ß nomina∞ pricσ t∩ owner≤ oµá thσ ì
Tapσá Versions«á Thi≤á i≤ no⌠ quitσ correct«á The∙ wil∞á SELLá ßá disδ ì
versioε oµ BEETHOVE╬ fo≥ $5.00«á Thi≤ ver« save≤ ª load≤ t∩ disk« The∙ ì
a⌠ presen⌠ havσ n∩ BE┼ TALKE╥ oε disk«
Congratulation≤á t∩á Chri≤ ANDERSON¼á ou≥ e° tapσ bu⌠á ne≈á pape≥ ì
librariaε oε thσ birtΦ oµ hi≤ firs⌠ child«á Chris'≤ wifσ gavσ birtΦ t∩ ì
Rebekah on Thursday 16 April. Both are well and sound very happy.
>ANDREW
è STATISTICS HISTORY etc
Statistic≤áá inferencσáá froφáá sample≤á t∩áá population≤áá usinτ ì
probabilit∙ characterisinτ anΣ summarisinτ collection≤ oµ datß method≤ ì
oµ collectinτ data.
MA╬áAN─ MATHEMATIC╙ Grφ BURTO╬¼á KatΦ WALLAC┼ LONGMA╬ CHESHIRE
Wφá thσá Conquero≥á DOOMSDA┘ BOO╦ 106╕ recorΣá oµá king≤á possession≤ ì
beforσ Hind⌡ numbe≥ systeφ iε Britain.
Ohma≥á Khayam¼á Ch⌡ Shih-ChieΦ iε Chinß anΣ Dantσ al∞ wrotσ oεá game≤ ì
probability¼á particularl∙á dicσá typσ game≤á - earl∙á `diceºá calleΣ ì
astragalΘá madσá froφ anima∞ bonσ anΣ comple° `board-gamesºá sucΦá a≤ ì
`jacka∞ anΣ houndsº froφ Egyp⌠ 150░ BC.
Johεá Graun⌠á {Captaiεá oµ thσ Traiε band≤ oµá thσá city²á haberdashe≥ ì
alternatel∙á commonwealtΦá man¼á supporte≥á oµ kinτá anΣá catholiπá a≤ ì
politica∞á powe≥á changeΣ iε Londoε electeΣ fello≈ oµá roya∞á societ∙ ì
1662¼á removed┐á 166╢á (1620-74⌐á foundeΣ fielΣ oµ forma∞á statistics« ì
PublisheΣ 166▓ Natura∞ anΣ Politica∞ Observation≤ madσ upoε thσá Bill≤ ì
oµá Mortalit∙á (whicΦ werσ weekl∙ publication≤ oµ ParisΦá clerk≤á tha⌠ ì
listeΣ births¼á christening≤ anΣ deaths)« ParisΦ Register≤ begaε t∩ bσ ì
kep⌠á officiall∙ b∙ injunctioε oµ Thoma≤ Cromwel∞ GranΣ Chancello≥ fo≥ ì
Henr∙á VII╔ iε 153╕ {the∙ werσ inaccuratσ fo≥ reason≤ sucΦá a≤á death≤ ì
beinτá recordeΣ onl∙ fo≥ thosσ burieΣ a≤ ├ oµ E}«á Thσ keepinτ oµ thσ ì
register≤ haΣ beeε stimulateΣ b∙ neeΣ fo≥ informatioε durinτ thσ Grea⌠ ì
Plague«á The∙á werσá issueΣ sporadicall∙ froφ 153▓á theεá weekl∙á witΦ ì
christening≤ anΣ burial≤ froφ 1592¼ madσ publiπ iε 159┤ bu⌠ suppresseΣ ì
durinτ thσ plaguσ oµ 159╡ anΣ no⌠ madσ publiπ agaiε til∞ 1603« iε 162╡ ì
ßá printinτá pres≤ wa≤ obtaineΣ t∩ publisΦ theφ bu⌠ man∙ record≤á werσ ì
completel∙ destroyeΣ iε thσ Grea⌠ Firσ 1666.
┴ Pari≤ journa∞ oµ 166╢ say≤ ó t∩ issuσ Bill≤ oµ Mortalit∙ i≤ ßá thinτ ì
peculia≥á t∩á thσ EnglisΦ "«á Alteratioε t∩ lega∞ codσ iεá introduceΣ ì
theφ int∩ Francσ iε 1667¼ late≥ iε othe≥ Europeaε countrie≤ .
Thσá existancσ oµ botΦ thσ datß anΣ thσ actuaria∞ mathematic≤ leaΣá t∩ ì
tradinτá iεá lifσá insurancσá anΣá assurancσá iεá EnglanΣá whicΦá wa≤ ì
`swappedº fo≥ saving≤ bank≤ witΦ HollanΣ a⌠ abou⌠ thi≤ time.
I⌠ i≤ interestinτ t∩ notσ thσ intensσ interes⌠ iε probabilit∙á relateΣ ì
t∩á gaminτá iε Ital∙ theε Francσ theε t∩ ß limiteΣ exten⌠á iεá HollanΣ ì
essentia∞á t∩ thσ foundatioε oµ statistic≤ - whilσ iεá England¼á apar⌠ ì
froφá ß lette≥ froφ Pepy≤ t∩ Newtoε regardinτ relativσ odd≤ fo≥ ßá si° ì
iεá ßá thro≈ oµ si° die¼á versu≤ tw∩ sixe≤ iµ twelvσ diσ arσá useΣá o≥ ì
threσá sixe≤á iµá eighteeε diσ arσ thrown¼á therσ i≤á n∩á mathematica∞ ì
writinτá oε game≤ probability¼á bu⌠ mucΦ commercia∞á actuaria∞á maths¼ ì
whils⌠ thσ Nederland≤ seem≤ uniquσ iε havinτ somσ oµ each.
Graun⌠ concludeΣ - malσ birth≤ exceedeΣ femalσ birth≤ b∙ ca«
1/1│á thσ numbe≥ oµ adul⌠ meε appro° ╜ adul⌠ female≤
morσ meε diσ violen⌠ death≤ thaε womeε
fe≈ peoplσ dieΣ froφ starvation.
IndulgeΣá iεá statistica∞á calculation≤ no⌠ jus⌠ recordinτ oµá datßá - ì
attempteΣ t∩ determinσ populatioε sizσ a⌠ differen⌠ time≤ froφ datß oε ì
births¼á death≤á anΣá migratioεá anΣá sicknes≤á risδá difference≤á fo≥ ì
differen⌠ areas« èSi≥á Wφá PETT┘ foundatioε membe≥ Roya∞ Societ∙ workeΣá witΦá Graun⌠ ì
`politica∞á arithmetician'¼á suggesteΣ thσ wortΦ oµ copyinτ thσá DutcΦ ì
`saving≤ banksº a≤ ß wa∙ oµ increasinτ thσ utilisatioε oµ money.
EdmunΣá Halle∙á (yeß thσ Come⌠ bloke⌐ wrotσ tw∩ paper≤á oεá mortalit∙ ì
rate≤ iε 169▓ - leadinτ t∩ calculatioε oµ lifσ expectanc∙á (┐á firs⌠ ì
Lifσ Assurancσ compan∙ 1699).
Si≥á Franci≤á Galtoε (1822-1911⌐ cousiε oµ Cha≤ Darwiεá developeΣá thσ ì
concep⌠á oµá statistica∞á correlatioε introduceΣ usσá oµá statistica∞ ì
method≤á int∩ U.S«á responsiblσ fo≥ mathematica∞ stud∙ oµá heredity¼ ì
statistica∞áá stud∙á oµá relationshi≡á betweeεá povert∙á anΣáá chroniπ ì
drunkenes≤ {usinτ proposa∞ oµ inversσ hypothesi≤ t∩ bσ disproved}.
quote "Never resent criticism - and never answer it"
_ _
RUBIK'S MAGIC PUZZLE, SOLVED.
by T Hudson, Member # 705.
This method will take 5 - 10 seconds to do
Step 1: Star⌠á witΦá puzzlσ a≤ receiveΣá witΦá │á separatσá rings¼á anΣ ì
Rubik'≤ signaturσ iε bottoφ righ⌠ corner.
Step 2: Lif⌠ lef⌠ anΣ righ⌠ enΣ section≤ u≡ anΣ folΣ iε t∩ forφ ß square.
Step 3: FolΣ ou⌠ underneatΦ section≤ t∩ forφ ß vertica∞ rectangle.
Step 4: FolΣ thσ lef⌠ halµ dowε unde≥ thσ righ⌠ half¼á t∩ forφ ß ┤ ╪á ▒ ì
rectangle¼ ▓ deep.
Step 5: Separatσ layer≤ anΣ rol∞ to≡ halµ awa∙ froφ you¼ b∙ ▒ square.
Step 6: UnfolΣ to≡ laye≥ t∩ thσ righ⌠ t∩ forφ ß ┤ ° ▓ vertica∞ rectangle« ì
Yo⌡á shoulΣ no≈ havσ completσ ring≤ oε thσ to≡ righ⌠ anΣá bottoφ ì
lef⌠ corners¼á plu≤ halµ ring≤ oε thσ to≡ lef⌠ anΣ bottoφá righ⌠ ì
corners«á Turεá thσ puzzlσ ove≥ anΣ la∙ i⌠ horizontall∙ s∩á tha⌠ ì
thσ completσ rinτ i≤ t∩ you≥ left.
Step 7: Lif⌠ thσ righ⌠ enΣ pai≥ u≡ anΣ folΣ ove≥ t∩ thσ left.
Step 8: Lif⌠ thσ to≡ righ⌠ corne≥ squarσ u≡ anΣ folΣ dowε toward≤ you.
Step 9: Lif⌠ thσ to≡ ▓ righ⌠ enΣ section≤ anΣ folΣ t∩ thσ left.
Step 10: Lif⌠ thσ ▓ to≡ square≤ nea≥ yo⌡ anΣ folΣ theφ awa∙ froφ you.
Step 11: Lif⌠á thσ lef⌠ edgσ oµ thσ to≡ squarσ anΣ folΣ i⌠ ove≥á t∩á thσ ì
right.
Step 12: Lif⌠ thσ to≡ ▓ square≤ u≡ anΣ folΣ awa∙ froφ you« That'≤ it!
No≈á yo⌡á shoulΣ havσ │ linkeΣ rings¼á oε ß │ ° │ squarσ witΦ thσá to≡ ì
lef⌠ corne≥ missinτ anΣ Rubik'≤ signaturσ iε thσ bottoφ righ⌠á corner« ì
T∩ ge⌠ thσ puzzlσ bacδ t∩ │ separatσ rings¼ reversσ procedure.
è SALESMAN.MWB
By B. ROBINSON # 1087
┴á Bascoφá compileΣá versioε i≤ oε thσ publiπ domaiεá disδá witΦá thi≤ ì
Catcher« (Usσ CKSM23.MWB)Ö .ED
00100 CLEAR √▓┤╕²
00110 CLS:REM PRODUCTION LINE SCHEDULER √▒╖│²
00120 CLS:PRINT"TO USE INBUILT TEST DATA, TYPE
`T' ELSE ANY OTHER KEY" √░╡░²
00130 Z=0:T0$=KEY$:IF T0$="" THEN 130 ELSE IF T0$="T" THEN LET Z=1:
LET P=10:GOTO 150 √▒│╢² : REM Must be capitol T
00140 INPUT"HOW MANY NODES? ";P √▓▒╡²
00150 DIM A0(4,P,P),R0(2,P),T(P),E(P,2) √▒▓│²
00160 FOR C=1 TO P:T(C)=0:NEXT C √▒▓╡²
00170 FOR N=1 TO P:FOR M=1 TO 2:E(N,M)=9999:NEXT M:NEXT N √▒╢╡²
00180 ON Z GOTO 30120 √▓│┤²
00190 PRINT"NOW INPUT INTER-NODAL COSTS" √░▒│²
00200 FOR M=1 TO P √░╡╡²
00210 FOR N=1 TO P √░╡▒²
00220 PRINT"POINT ";M;" TO ";N:INPUT A0(1,M,N) √▒│╖²
00230 NEXT N √░▓╕²
00240 NEXT M √░│▓²
00250 Z0=0:D0=0:CLS:PRINT"PRODUCTION LINE SCHEDULER."\\
"WAIT! I'm working on it." √▒╣▓²
00260 FOR N=1 TO P √░╡╕²
00270 A0(1,N,N)=9999 √▒░╖²
00280 NEXT N √░│╡²
00290 FOR H=1 TO P-1 √▒╡╕²
00300 L=1:K=2 √░╖┤²
00310 FOR M=1 TO P:GOSUB 790:IF X0=9999 THEN NEXT M:GOTO 340 √░┤░²
00320 Z0=Z0+X0:NEXT M √▒░│²
00330 L=2:K=2 √░╖╕²
00340 FOR N=1 TO P:GOSUB 890:IF Y0=9999 THEN NEXT N:GOTO 360 √░┤╡²
00350 Z0=Z0+Y0:NEXT N √▒░┤²
00360 L=2:K=3 √░╕▓²
00370 FOR M=1 TO P:GOSUB 790:NEXT M √░│┤²
00380 FOR N=1 TO P:GOSUB 890:NEXT N √░│╢²
00390 L=4:FOR M=1 TO P:FOR N=1 TO P √▓▒▒²
00400 A0(L,M,N)=9999:NEXT N:NEXT M √▓╡│²
00410 FOR M=1 TO P:FOR N=1 TO P √▓│╡²
00420 IF A0(K,M,N)=0 THEN LET A0(4,M,N)=R0(1,M)+R0(2,N) √░╡╡²
00430 NEXT N:NEXT M √▓░╣²
00440 B0=0:FOR M=1 TO P:FOR N=1 TO P √▓│╖²
00450 IF A0(4,M,N)=9999 THEN GOTO 470 √░░┤²
00460 IF A0(4,M,N)>B0 THEN LET B0=A0(4,M,N):F=M:G=N √▒╡░²
00470 NEXT N:NEXT M √▓▒│²
00480 FOR W=1 TO P:A0(2,F,W)=9999:A0(2,W,G)=9999:NEXT W:
A0(2,G,F)=9999 √░▒╡²
00490 D0=D0+Z0:Z0=0 √▒╖╢²
00500 L=2:K=3 √░╖╕²
00510 FOR M=1 TO P:GOSUB 790:IF X0=9999 THEN NEXT M :GOTO 530 √░│╣²
00520 Z0=Z0+X0:NEXT M √▒░╡²
00530FOR N=1 TO P:GOSUB 890:IF Y0=9999 THEN NEXT N:GOTO 550 √░┤▒²
00540 Z0=Z0+Y0:NEXT N √▒░╖²
00550 IF Z0>=B0 THEN LET A0(1,F,G)=9999:GOTO 300 √▒╖▒²
00560 PRINT F;" - ";G: PLAY 24:T(F)=G:FOR M=1 TO P:FOR N=1 TO P:
A0(1,M,N)=A0(2,M,N):NEXT N:NEXT M √▓▓▒²
00570 E(F,1)=G:E(G,2)=F √░╢▒²è00580 X=F:Y=G √▒┤╕²
00590 FOR W=1 TO P √░╖▒²
00600 Q=E(X,1):IF Q=9999 THEN NEXT* W 620 ELSE LET X=Q √▒╕╢²
00610 NEXT W √░│╖²
00620 FOR W=1 TO P √░╢╖²
00630 Q=E(Y,2):IF Q=9999 THEN NEXT* W 650 ELSE LET Y=Q √▒╕╖²
00640 NEXT W √░┤▓²
00650 A0(1,X,Y)=9999 √▒│┤²
00660 NEXT H √░┤│²
00670 LET X=1 √░╕░²
00680 IF E(X,1)=9999 THEN GOTO 690 ELSE LET X=X+1:GOTO 680 √▒▒╡²
00690 LET Y=1 √░╕│²
00700 IF E(Y,2)=9999 THEN GOTO 710 ELSE LET Y=Y+1:GOTO 700 √▒│░²
00710 E(X,1)=Y √▒▒▓²
00720 PRINT X;" - "Y √▒▓╢²
00730 PRINT"THE FOLLOWING SCHEDULE HAS MINIMAL COST :-" √▒▓┤²
00740 X=1:PRINT\X; √░▒╢²
00750 FOR N=1 TO P √░╢░²
00760 PRINT" -";E(X,1); √░╢│²
00770 X=E(X,1):NEXT N √░╖│²
00780 END √▒▒╡²
00790 X0=9999:X1=9999 √▓┤┤²
00800 FOR N=1 TO P √░╡╕²
00810 IF A0(L,M,N)=<X0 THEN LET X1=X0:LET X0=A0(L,M,N):GOTO 830 √▓▒▓²
00820 IF A0(L,M,N)=<X1 THEN LET X1=A0(L,M,N) √▒╣╣²
00830 NEXT N √░│┤²
00840 FOR N=1 TO P √░╢▓²
00850 IF A0(L,M,N)=9999 THEN LET A0(K,M,N)=9999:GOTO 870 √░░╖²
00860 A0(K,M,N)=A0(L,M,N)-X0 √▓│╖²
00870 NEXT N:R0(1,M)=X1 √▒▒▓²
00880 RETURN √▒▒╢²
00890 Y0=9999:Y1=9999 √▓┤│²
00900 FOR M=1 TO P √░╢▓²
00910 IF A0(K,M,N)=<Y0 THEN LET Y1=Y0:LET Y0=A0(K,M,N):GOTO 930 √▓▒▓²
00920 IF A0(K,M,N)=<Y1 THEN LET Y1=A0(K,M,N) √▓░░²
00930 NEXT M √░│╢²
00940 FOR M=1 TO P √░╢╢²
00950 IF A0(K,M,N)=9999 THEN GOTO 970 √░░│²
00960 A0(K,M,N)=A0(K,M,N)-Y0 √▓│╢²
00970 NEXT M:R0(2,N)=Y1 √▒▒▒²
00980 RETURN √▒▒╖²
30000 DATA1,51,55,90,41,63,77,69,0,23 √▒╡╣²
30010 DATA 50,1,0,64,8,53,0,46,73,72 √▒│▓²
30020 DATA 30,77,1,21,25,51,47,16,0,60 √▒╢╡²
30030 DATA 65,0,6,1,2,9,17,5,26,42 √░╕╢²
30040 DATA 0,94,0,5,1,0,41,31,59,48 √░╣▒²
30050 DATA 79,65,0,0,15,1,17,47,32,43 √▒╖▓²
30060 DATA 76,96,48,27,34,0,1,0,25,0 √▒│▓²
30070 DATA 0,17,9,27,46,15,84,1,0,24 √░╣╕²
30090 DATA 56,7,45,39,0,93,67,79,1,38 √▒╕╣²
30100 DATA 30,0,42,56,49,77,76,49,23,1 √▒╖╡²
30120 FOR M=1 TO 10 √▒╖│²
30121 FOR N=1 TO 10 √▒╖╡²
30122 READ A0(1,M,N) √░┤▒²
30123 NEXT N √▒┤│²
30124 NEXT M √▒││²
30125 GOTO 250 √▓▒▒²
è Thσ Microbeσ 25╢ T├ - It≤ fo≥ You!
Aε Engineerinτ Experience.
Fivσá year≤ afte≥ thσ releasσ oµ thσ Microbee¼á thσ successo≥á t∩ ì
it≤ origina∞ rangσ ha≤ arrived« Thσ al∞ familia≥ blacδ anΣ beigσ slim-ì
linσ caseΣ Microbeσ ha≤ ß ne≈ relative«á DubbeΣ thσ Telecomputer¼ thσ ì
Microbeσ 256T├ wa≤ firs⌠ introduceΣ int∩ thσ marke⌠ a⌠ thσ Sydne∙ PC8╖ ì
show¼á i⌠á gavσ Microbeσ user≤ ß pleasan⌠ surprisσ a≤ thi≤ machinσ wa≤ ì
totall∙ unexpected.
Thσá Microbeσá 256T├ stylishl∙ incorporate≤ thσ disδá drive≤á anΣ ì
keyboarΣ int∩ onσ compac⌠ transportablσ unit«á Thσ ergonomiπ keyboarΣ ì
come≤á completσá witΦ 1▓ use≥ programmablσ functioεá keys¼á ßá numeriπ ì
keypaΣ anΣ separatσ curso≥ keys« Thσ Z80┴ CP╒ withiε addresse≤ 278δ oµ ì
RA═á anΣá 20δá oµá ROM¼á whilσ givinτ thσ cleaεá cris≡á 512x25╢á pixe∞ ì
graphic≤á iεá 1╢á colours«áá Whilσá retaininτá thσá Microbeσá Premiuφ ì
technology¼á thσ Microbeσ 256TC≤ maiε boarΣ ha≤ beeε full∙á redesigneΣ ì
int∩ ┤ layer≤ oµ circuits¼ whilσ onl∙ requirinτ abou⌠ 40Ñ oµ thσ powe≥ ì
needeΣá b∙á thσá Microbeσá Premium«á I⌠ receive≤ it≤á powe≥á froφá thσ ì
Microbeσ M1╡ monochromσ monito≥ o≥ ß pluτ pack.
Thσ interna∞ 3.5ó flopp∙ disδ drivσ caε storσ u≡ t∩ 800δ oµ data¼ ì
anΣ come≤ neatl∙ mounteΣ oε thσ sidσ oµ thσ machine« A≤ thσ machinσ i≤ ì
switcheΣ on¼á i⌠ sense≤ fo≥ ß disδ anΣ theε sign≤ oε witΦ ß Kerne∞á iµ ì
onσá i≤ no⌠ available«á Thσ Kerne∞ formall∙ greet≤ yo⌡ anΣ inform≤ yo⌡ ì
oµ thσ las⌠ timσ you'vσ useΣ thσ system«á Yo⌡ theε havσ thσ choicσ oµ ì
bootinτ u≡ ß disk¼ settinτ thσ timσ o≥ testinτ thσ computer« Fo≥ othe≥ ì
users¼ ß Machinσ Codσ Monito≥ i≤ als∩ accessiblσ viß ß ke∙ sequence.
Thσ Microbeσ 256T├ run≤ most¼ iµ no⌠ al∞ thσ softwarσ writteε fo≥ ì
thσá Microbeσ 128k«á Iµ ß piecσ oµ softwarσ doe≤ no⌠ run¼á i⌠ probabl∙ ì
mean≤ tha⌠ thσ softwarσ use≤ hardwarσ keyboarΣ detectioε o≥á somethinτ ì
alonτá tha⌠ line«á Whilσ designinτ thσ system¼á softwarσ engineer≤ iε ì
Microbeσ System≤ havσ defineΣ standard≤ fo≥ keyboarΣ sequence≤ fo≥ thσ ì
curren⌠á anΣ futurσ rangσ oµ Microbeσ computers¼á thi≤á standarΣá wil∞ ì
ensurσ tha⌠ keyboarΣ incompatibilit∙ wil∞ neve≥ occu≥ again.
Oµ thσ 256δ oµ maiε memory¼ 64δ oµ i⌠ caε onl∙ bσ accesseΣ b∙ thσ ì
Z8░ microprocessor«á 128δ i≤ designateΣ t∩ becomσ ß higΦ speeΣ memor∙ ì
drive¼á anΣá thσ remaininτ 64δ i≤ useΣ a≤ ß softwarσ disδ cache«á Thσ ì
softwarσ disδ cachσ perform≤ pre-read≤ anΣ pre-write≤ t∩ anΣ froφá thσ ì
flopp∙á disδá drive¼á thu≤á reducinτ disδá activity¼á anΣá drasticall∙ ì
reducinτ disδ accessinτ time« Thi≤ featurσ wil∞ bσ highlighteΣ iµ thσ ì
Microbeσ 256T├ i≤ pu⌠ througΦ ß bencΦ test.
Thσá Microbeσá 256T├ come≤ standarΣ witΦ thσ CP/═á 2.▓á Operatinτ ì
System¼á completσá witΦ thσ famou≤ B-SHEL╠ icoε baseΣ commanΣá system« ì
Videotex⌠á anΣá Telcoφ 2.┤ arσ thσ tw∩á communication≤á package≤á sup-ì
portinτ thσ 256TC¼á togethe≥ witΦ thσ Simpl∙ Writσ wordprocessor¼á al∞ ì
supplieΣ standarΣ a≤ ß completσ package« ┴ ┤ booδ use≥ manua∞ provide≤ ì
al∞ thσ necessar∙ literaturσ t∩ ge⌠ anyonσ starteΣ oε thi≤ machine.
Thσ basiπ Microbeσ 256T├ witΦ al∞ oµ thσ abovσ features¼ onσ disδ ì
drive¼á systeφá softwarσ anΣ manual≤ retail≤ a⌠ $999.00¼á whilσ ß dua∞ ì
drivσá systeφá retail≤ a⌠ $1299.00«á Thσ compute≥ require≤ powe≥á froφ ì
eithe≥ ß Microbeσ M-1╡ Monito≥ o≥ ß pluτ pack¼ whicΦ retai∞ a⌠ $249.0░ ì
anΣá $25.0░ respectively«á ┴ uni⌠ wil∞ bσ oε displa∙ anΣ salσ a⌠á thσ ì
Deepdenσá Technolog∙ Centrσ anΣ mos⌠ definitel∙ a⌠ thσ Melbournσá PC8╖ ì
sho≈ iε thσ Exhibitioε Buildings¼ Ma∙ 31s⌠ - Junσ 3rd.è THE MICROBEE 256 TC REVIEW
Thσ ne≈ Microbeσ persona∞ compute≥ haΣ it≤ releasσ a⌠ Sydne∙ PC8╖ ì
anΣá ßá demonstratioε mode∞ ha≤ beeε sen⌠ t∩ thσ Melbournσá Technolog∙ ì
centre« Thi≤ revie≈ i≤ beinτ writteε oε "Dem∩ uni⌠ No« 4"«
Thσ firs⌠ thinτ ╔ diΣ wheε ╔ go⌠ thi≤ uni⌠ homσ wa≤ t∩ pluτ i⌠ iε ì
anΣá inser⌠á thσ dem∩ disδ supplied«á T∩ m∙ suprise¼á insteaΣá oµá thσ ì
screeε ╔ haΣ seeε a⌠ thσ sho≡ appea≥ oε thσ colou≥ monitor¼á ß norma∞ ì
"SHELLó appeared«á A≤ ╔ said¼ t∩ m∙ suprise¼ fo≥ thσ onl∙ wa∙ ╔ haΣ ì
seeε thσ machinσ runninτ wa≤ froφ aε "u≡ frontó menuíá No⌠ t∩ bσá ou⌠ ì
whitteΣá ╔á trieΣ thσ filσ TI.CO═ whicΦ ╔ figureΣ wa≤ par⌠á oµá thσ ì
demonstratioε program«á Thi≤ duel∙ begaε runninτ anΣ signeΣ oε witΦ ì
ß messagσ tellinτ mσ i⌠ wa≤ initialzing╗á then¼á SHOCK!í HORROR!í Wha⌠ ì
haΣ gonσ wrong┐ CP/═ ERRO╥ O╬ A║ BA─ SECTOR« Afte≥ somσ constination¼ ì
╔ decideΣ t∩ cop∙ al∞ thσ file≤ froφ BOT╚ dem∩ disk≤ ont∩ onσ ne≈ onσ ì
anΣ trieΣ t∩ ruε i⌠ again« VOL┴ i⌠ worked« A≤ ╔ wa≤ late≥ t∩ finΣ out¼ ì
thσ 256δ mus⌠ ruε oε thσ powe≥ suppl∙ includeΣ witΦ thσ computer¼á no⌠ ì
oε ß switcΦ modσ suppl∙ a≤ ╔ trieΣ t∩ ruε it«á Usinτ thσ powe≥á suppl∙ ì
a≤ ╔ diΣ causeΣ thσ compute≥ t∩ writσ ß baΣ secto≥ ont∩ thσ diskíá (I⌠ ì
isn'⌠ eas∙ withou⌠ ß manual).
But¼á iε gettinτ i⌠ t∩ work¼ ╔ switcheΣ thσ machinσ oε withou⌠ ì
ß disδ iε thσ drivσ anΣ abou⌠ tw∩ second≤ late≥ i⌠ wen⌠ BEEPí A≤ thσ ì
monito≥ li⌠ up¼ therσ wa≤ thσ openinτ men⌡ ╔ sa≈ a⌠ thσ shop«
Wel∞á no≈ ╔ coulΣ seσ wha⌠ wa≤ reall∙ goinτ on«á A≤ ß welcomσá t∩ ì
thσá computer¼á i⌠á tolΣ mσ thσ timσ anΣ offereΣ mσ ß choicσá oµá fou≥ ì
options« Optioε ▒ (F1⌐ thσ curren⌠ loggeΣ disδ woulΣ boo⌠ t∩ thσ shel∞ ì
anΣ wσ al∞ arσ awarσ oµ wha⌠ thi≤ look≤ likσ althougΦ onσ oµ thσ icon≤ ì
ha≤ beeε changed«á Thi≤ icon¼ numbe≥ 9¼ start≤ ß fas⌠ cop∙ prograφ fo≥ ì
singlσ disδ system≤ formattinτ eacΦ ne≈ disδ beforσ copyinτ t∩ it.
Bacδá a⌠á thσ maiε menu¼á thσ othe≥ function≤ cal∞á u≡á thσá timσ ì
adjustmen⌠ program¼ ß cal∞ t∩ ß networkinτ prograφ (no⌠ supplied⌐ anΣ ì
ß selµ tes⌠ program«
Thσá selµ tes⌠ prograφ wen⌠ througΦ al∞ phase≤ oµ testinτá thσ ì
ram¼ colour¼ anΣ othe≥ routine≤ a≤ required¼ bu⌠ i⌠ lef⌠ mσ wonderinτ ì
abou⌠á thσ tes⌠ oε thσ cpu«á Wa≤ thi≤ compute≥ supposeΣ t∩ ruε a⌠á tw∩ ì
speeds┐ A⌠ thσ timσ oµ writinτ ╔ wa≤ no⌠ t∩ finΣ out.
Oεá enterinτ thσ shel∞ ╔ decideΣ t∩ ruε TI.CO═ agaiε anΣ seσ wha⌠ ì
happened«áá Thi≤á prograφá give≤á ßá comprehensivσá lessoεá oεá thσ ì
operatioεá oµ ┴ compute≥ witΦ thσ 256δ specificall∙á relevant«á A≤á ß ì
quicδá summasition¼á it'≤á functioε i≤ simila≥ t∩ thσ "gettinτá t∩ ì
kno≈ you≥ Microbeeó series« EnougΦ said.
Nex⌠á ╔á booteΣá u≡ BASI├ anΣ wa≤ greateΣ witΦá thσá sigεá oε ì
messagσá tellinτ mσ thi≤ wa≤ versioε 6.31e«á Iεá thσá genera∞ ì
discussion≤ abou⌠ Basics¼ mos⌠ peoplσ refe≥ t∩ Premiuφ Basiπ a≤ ve≥ ì
6.28¼ (m∙ premiuφ basiπ i≤ ve≥ 6.30σ anΣ ╔ havσ hearΣ n∩ mentioε ì
oµ thi≤ ve≥ anywhere)«á Aparently¼ thi≤ ne≈ versioε ha≤ facilitie≤ fo≥ ì
programminτ thσ functioε keys«á No⌠ havinτ ß manual¼á ╔ coulΣ no⌠á tr∙ ì
thi≤ feature«á Anyway¼ ╔ typeΣ iε ß couplσ oµ smal∞ listing≤ t∩ seσ iµ ì
anythinτ happeneΣ an∙ differently«
The∙á surσá did«á Tw∩ thing≤ happeneΣ tha⌠ ╔ haΣ no⌠á seeεá iε ì
othe≥á version≤á oµ Basic«á Thσ firs⌠ wa≤ tha⌠ oncσ ß prograφ wa≤á iε ìèmemory¼á i⌠ stayeΣ there«á eg«á ╔ calleΣ u≡ onσ oµ thσ file≤ ╔á haΣ ì
typeΣ iε anΣ theε NEWeΣ it« Nex⌠ ╔ reloadeΣ i⌠ iε thσ usua∞ wa∙ bu⌠ ì
╔á hearΣ N╧ disδ activityíá Checkinτ iµ thσ prograφ wa≤ reall∙ therσ ╔ ì
typeΣ LIST¼á listeΣ it«á I⌠ wa≤ al∞ there«á O.K.¼á s∩ no≈ let≤ NE╫ i⌠ ì
agaiεá anΣ removσ thσ disk«á ┴ LIS╘ commanΣ showeΣ n∩ listinτ oµ thσ ì
program╗á but¼ b∙ typinτ LOA─ witΦ N╧ filename¼ thσ prograφ camσ bacδ ì
int∩ memoryí Wσ tinδ i⌠ mazingí
Oεá furthe≥ investigation¼á afte≥ replacinτ thσ disδ anΣá callinτ ì
othe≥á program≤á iε anΣ ou⌠ oµ basic╗á typinτ DISKRESE╘á withou⌠ ì
an∙ parameters¼ ╔ guesseΣ thσ program≤ mus⌠ residσ somewherσ iε ì
memory« Afte≥ successfull∙ deletinτ ß couplσ oµ dumm∙ file≤ ╔ haΣ madσ ì
i⌠ wa≤ timσ t∩ exi⌠ basic«
Herσ i≤ wherσ (my⌐ probleφ tw∩ reareΣ it≤ ugl∙ head«á AlthougΦ ╔ ì
madσ ß synta° erro≥ iε deletinτ onσ oµ thσ .MW┬ files¼ no⌠ onl∙ werσ ì
thσá file≤á ╔á wanteΣ deleateΣ gone¼á bu⌠ als∩ tw∩ ╔á haΣá spen⌠á 3░ ì
minute≤ typinτ iε gonσ a≤ well« Eas∙ fix« Usσ ß disδ edito≥ prograφ ì
anΣ unerasσ them« N╧ SUC╚ LUCK« Thσ listing≤ werσ NO╘ oε thσ disk« No⌠ ì
onl∙ that¼á the∙ werσ no⌠ iε memor∙ eitheríá Shal∞ ╔ pu⌠ thi≤ dowε ì
t∩ expirencσ anΣ neve≥ usσ Ve≥ 6.31σ BASI├ again?
No⌠á really«á Microbeσá System≤ havσ useΣ somσ oµ thσá technolog∙ ì
developeΣ fo≥ thσ no≈ shelveΣ Gamma«á Thσ memor∙ oµ thσ 256δá Microbeσ ì
i≤á madσ u≡ oµ threσ parts«á Thσ firs⌠ beinτ thσ 64δ oµ use≥ RAM¼á thσ ì
seconΣ beinτ ß 128δ memor∙ drivσ anΣ thσ thirΣ beinτ ß 64δ disδ cashe« ì
┴ disδ what┐ ┴ disδ cashe«
Wheε usinτ Basic¼á thσ systeφ load≤ use≥ file≤ int∩ thσ 64δ cashσ ì
anΣ hold≤ theφ therσ fo≥ usσ a≤ required« A⌠ thi≤ poin⌠ ß filσ "SAVEDó ì
i≤ no⌠ ye⌠ truel∙ saveΣ anΣ ß filσ NEWeΣ doe≤ no⌠ havσ t∩ bσ re-loadeΣ ì
froφá disk«á I⌠á reside≤ iε memor∙ unti∞ requireΣ again¼á o≥ Basiπá i≤ ì
exited«á Herσá i≤ wherσ ß mos⌠ importan⌠ fac⌠ fo≥ user≤á emerges«á Onσ ì
mus⌠ neve≥ exi⌠ froφ Basiπ b∙ hittinτ thσ rese⌠ botton¼á whicΦ b∙á thσ ì
wa∙á i≤ no≈ ß smal∞ buttoε a⌠ thσ rea≥ oµ thσ machinσ besidσ thσ powe≥ ì
syppl∙á inpu⌠ cable«á T∩ exi⌠ Basiπ alway≤ typσ "SYSTEM"<c/r>«á I⌠á i≤ ì
onl∙ iε thi≤ manne≥ wil∞ you≥ SAVE─ MWBasiπ file≤ reall∙ bσ saved«
S∩ mucΦ fo≥ Basic« Onσ oµ thσ othe≥ program≤ oε thσ dem∩ disδ wa≤ ì
Ve≥ 2.┤ oµ TELCO═ II«á A≤ ╔ haΣ ver∙ littlσ timσ oε thi≤ review¼á thi≤ ì
wa≤ onσ oµ thσ program≤ ╔ didn'⌠ looδ to∩ harΣ at« Onσ changσ froφ Ve≥ ì
2.│ i≤ thσ REA╠ loggeΣ disδ drivσ (anΣ use≥ number⌐ no≈ displa∙ oε thσ ì
screen«á Thσá prograφ wa≤ headeΣ "128δ » 256δ microbeσ versioε 2.4ó s∩ ì
maybσ update≤ caε bσ obtaineΣ froφ MS┐á
Thσá lates⌠á Ve≥ oµ Simpl∙ Writσ (2.0┤ ╔ think⌐ wa≤ als∩á oεá thσ ì
dem∩ disk« Mos⌠ oµ thi≤ revie≈ wa≤ typeΣ usinτ S.W« s∩ ╔ learn⌠ littlσ ì
morσá abou⌠ that«á Thσ ne≈ stylσ keyboarΣ wa≤ ß blessing¼á bu⌠ ╔á kep⌠ ì
pushinτ button≤ wherσ the∙ useΣ t∩ bσ oε m∙ Beσ anΣ findinτ al∞á sort≤ ì
oµ strangσ thing≤ happening«á Thi≤ wil∞ bσ onσ oµ thσ bigges⌠ problem≤ ì
facinτ thσ use≥ wh∩ change≤ froφ aε olΣ Bee.
Iε m∙ opinion¼á thσ Microbeσ 25╢K├ compute≥ i≤ ß powerfu∞á beas⌠ ì
tha⌠ wil∞ givσ thσ ne≈ Microbeσ use≥ ß grea⌠ dea∞ oµ pleasure¼á mainl∙ ì
duσ t∩ thσ shel∞ anΣ it≤ "friendlyó functions«á Oε thσ othe≥ hand¼á i⌠ ì
wil∞á causσ thσ olΣ "hackeró somσ mino≥ headache≤ duσ t∩ thσá dramatiπ ì
changσá iεá thσá operatinτ systeφ anΣ thσá keyboard«á Thosσá wh∩á likσ ì
playinτ witΦ thσ monito≥ wil∞ no⌠ likσ thσ wa∙ onσ ha≤ t∩ ge⌠ int∩ ití
If MS have one to give away, please see me first.è ┴ FE╫ HARDWAR┼ TIT-BIT╙
Ricδ Millicer.
Havinτá undertakeεá t∩ suppl∙ thσ versioε │ Dreamdisδá systeφá t∩ ì
thosσá peoplσá wh∩á wan⌠á it¼á ╔ fee∞á tha⌠á thi≤á publicatioεá i≤á aε ì
appropriatσá foruφá fo≥ mσ t∩ pas≤ oε somσ thing≤ I'vσ learneΣá myselµ ì
anΣ whicΦ ma∙ bσ oµ usσ t∩ others.
1«á Thσá Dreaφ systeφ monito≥ RO═ wa≤ anΣ i≤ offereΣ iε ßá variet∙á oµ ì
Eproφ type≤ includinτ 2532¼á 2732¼á 2732A¼á 2764«á Report≤ oµ problem≤ ì
witΦá thσá monito≥ RO═ havσ tendeΣ t∩ implicatσ thσ 273▓á Eproφá type« ì
Subsequen⌠áá investigatioεá revealeΣá tha⌠á thσá recommendeΣá Microbeσ ì
System≤ connectioε fo≥ 273▓ Eprom≤ i≤ incorrect.
Thσá resul⌠á oµá thi≤ dubiou≤ connectioε i≤á ßá systeφá whicΦá i≤ ì
unreliable«á Somσá peoplσá havσá beeε unlucky¼á somσá luck∙á bu⌠á thi≤ ì
reliancσá oεá lucδ witΦ an∙ par-ticula≥ 273▓ i≤ hardl∙ funn∙ t∩á thosσ ì
plagueΣá witΦá sucΦá problems«á Thσ compute≥á behave≤á a≤á thougΦá thσ ì
softwarσá ha≤ bug≤ witΦ randoφ crashe≤ anΣ strangσ (anΣá unrepeatable⌐ ì
disδ relateΣ errors« I⌠ ha≤ unfortunatel∙ beeε blameΣ oε thσ Dreamdisδ ì
software¼á wherea≤á thσ blamσ fo≥ thσ supposeΣ unreliabilit∙á actuall∙ ì
lie≤á elsewhere«á Thσ reasoε fo≥ thi≤ unreliablσ behavio≥ i≤ tha⌠ wheε ì
CE¬ oε ß 273▓ i≤ high¼á thσ chi≡ goe≤ int∩ ß powe≥ dowε mode« I⌠ take≤ ì
quitσá ßá lonτá timσ fo≥ i⌠ t∩ 'powe≥ upº agaiεá a≤á thσá datßá sheet≤ ì
clearl∙á show«á Thσ origina∞ M╙ recommendatioε linkeΣ botΦ OE¬ anΣ CE¬ ì
t∩á ROMSEL¬á anΣ thσ 273▓ i≤ no⌠ designeΣ t∩ handlσ thσá acces≤á speeΣ ì
requireΣ iε thi≤ modσ oµ operation«á Thσ samσ doe≤ no⌠ appl∙ t∩ ß 253▓ ì
whicΦ doe≤ no⌠ havσ ß powe≥ dowε mode«á 2764'≤ arσ fas⌠ enougΦ t∩ copσ ì
eveε wheε powereΣ dowε a⌠ u≡ t∩ abou⌠ 4Mh· CP╒ speed.
Belo≈á i≤á ßá reproductioε oµ thσ relevan⌠ portioεá oµá thσá Technica∞ ì
Manual« Thσ prope≥ connection≤ arσ a≤ labelled.
2«á Recently¼á Westerε Digita∞ Corporatioε releaseΣ aε updatσ t∩ thei≥ ì
recommendeΣá procedurσ fo≥ calibratinτ thσ 279│ disδ controlle≥á chip« ì
Thesσá chip≤ arσ useΣ iε thσ Dreamdisδ serie≤ 1¼á Dreaφ serie≤á ▓á anΣ ì
MicroBeσá disδá systems«á Thσá ne≈á procedurσ suggest≤á tha⌠á thσá VC╧ ì
frequenc∙á bσá se⌠á lowe≥á thaεá originall∙á recommended«áá User≤á wh∩ ì
experiencσ difficult∙ bootinτ wheε thσ systeφ i≤ cold¼á wil∞ finΣ tha⌠ ì
thi≤á ne≈ recommendatioε ma∙ solve≤ thei≥ problem«á Thσ VC╧á frequenc∙ ì
shoulΣá bσ se⌠ a⌠ 24╡ KHz¼á no⌠ 25░ KH· withiε ▓ minute≤ oµ switcΦá oε ì
froφá cold«á ╔ finΣ tha⌠ thσ frequenc∙ shoulΣ bσ abou⌠ 24│á KH·á afte≥ ì
abou⌠ 1╡ minutes¼ ie¼ stead∙ state.
èIµá anyonσá want≤ thei≥ Dreamdisδ serie≤ onσ board≤á re-calibrateΣá t∩ ì
thi≤á newl∙ recommendeΣ frequency¼á ╔ caε d∩ s∩ fo≥ ß nomina∞á charge« ì
Thi≤á updatσ i≤ includeΣ iε thσ documentatioε supplieΣ witΦ thσá Dreaφ ì
serie≤ ▓ system« Te∞ (03⌐ 497-3435.
3«á ╔ aφ consciou≤ oµ thσ fac⌠ tha⌠ thσ olΣ Dreamdisδ system≤ arσ ver∙ ì
ligh⌠á oεá a≤á regard≤á 5÷ suppl∙ bypas≤ capacitor≤á oεá botΦá oεá thσ ì
controlle≥ boarΣ anΣ thσ powe≥ suppl∙ itself« Thσ late≥ serie≤ ▓ Dreaφ ì
boarΣá ha≤ 1│ ° 0.1u╞ cap≤ oε i⌠ anΣ appear≤ t∩ bσ mucΦ les≤á affecteΣ ì
b∙á spike≤á iε ß nois∙ electrica∞ environment«á ╔ recommenΣá tha⌠á al∞ ì
serie≤á onσá boarΣá user≤á adΣ halµ ß dozeεá monolithiπá cap≤á t∩á thσ ì
undersidσá oµ thei≥ board≤ alonτ thσ paralle∞ +5÷ anΣ gnΣ traces«á AdΣ ì
als∩á ß 10u╞ tantaluφ a⌠ thσ termina∞ block«á Therσ i≤ als∩á valuσá iε ì
addinτá 0.▒á u╞ mono'≤ acros≤ botΦ thσ inpu⌠ anΣ outpu⌠á terminal≤á oµ ì
ever∙ regulato≥ iε thσ powe≥ supply.
$$ FOR SALE $$ FOR SALE $$ FOR SALE $$
56δá M'bee¼á Dreamdisδ controller«á 2x8░ Tracδ drives¼á greeεá screen¼ ì
software¼á heap≤ oµ Catcher≤ ª othe≥ docs«á $90░ Neg«á ì
Contact WICHAEL WOODWARD. A/H«á 763-4046«è REA╠ TIM┼ CLOC╦ (MC146818)
Alber⌠ vaε Bommel.
Thi≤á articlσ deal≤ witΦ wha⌠ al∞ thσ Register≤ anΣ wha⌠ yo⌡á caε ì
d∩ witΦ them«á Iε thσ Microbee¼á thσ clocδ i≤ connecteΣ t∩ port≤ 4¼á ╢ ì
anΣá 7«á ThrougΦá thesσá port≤ yo⌡ caε reaΣ anΣ o≥ writσá t∩á al∞á thσ ì
registers«á Onσá thinτ t∩ kee≡ iε minΣ i≤ tha⌠ ever∙ timσ yo⌡ reaΣá o≥ ì
writσ t∩ ß register¼ yo⌡ mus⌠ addres≤ i⌠ first« Thi≤ mean≤ tha⌠ iµ yo⌡ ì
wan⌠ t∩ writσ anΣ reaΣ registe≥ 2░ yo⌡ addres≤ i⌠ first¼á writσ t∩ it¼ ì
addres≤ i⌠ again¼á theε reaΣ thσ register«á Thσ nex⌠ thinτ t∩ remembe≥ ì
i≤ tha⌠ por⌠ ┤ i≤ fo≥ addressinτ only¼á por⌠ ╢ i≤ fo≥ writinτ onl∙ anΣ ì
por⌠á ╖á i≤á fo≥á readinτ only«á Thu≤ iµ yo⌡ wan⌠ t∩á writσá anΣá reaΣ ì
registe≥ 20« Thi≤ i≤ wha⌠ thσ orde≥ is║
Iε Basiπ yo⌡ senΣ aε ou⌠ 4,2░ (t∩ address)¼á theε aε ou⌠ 6,x° (x° ì
i≤ you≥ data⌐ theε aε ou⌠ 4,2░ t∩ addres≤ i⌠ agaiε theε ß prin⌠á in(7⌐ ì
t∩ reaΣ tha⌠ register«á No≈ tha⌠ yo⌡ kno≈ ho≈ t∩ talδ t∩ thσ register≤ ì
╔á shal∞ lis⌠ al∞ it≤ functions«á Thσ clocδ chi≡ ha≤ 6┤ registers«á Oµ ì
thesσá 6┤á thσá firs⌠ 1┤ arσ useΣ fo≥ thσ clocδá anΣá othe≥á function≤ ì
(remembe≥á ░ - 13)«á Registe≥ 1┤ u≡ t∩ anΣ includinτ registe≥á 6│á arσ ì
genera∞á purposσ RA═ register≤ whicΦ arσ batter∙ backeΣ likσ thσá one≤ ì
iεá thσ Roφ Microbees«á Thσ RA═ register≤ caε be usσd fo≥ whateve≥ yo⌡ ì
wan⌠ a≤ the∙ arσ no⌠ affecteΣ b∙ ß rese⌠ o≥ othe≥ clocδ activities«
S∩, havinτá gotteεá riΣá oµ thσ bulδá oµá register≤á wσá caεá no≈ ì
concentratσ oε thσ firs⌠ 14«á Namel∙ ░ - 13«á Oµ thesσ 1┤ thσ firs⌠ 1░ ì
arσ useΣ t∩ tel∞ yo⌡ thσ timσ etc«á So¼ startinτ witΦ registe≥ 0¼ the∙ ì
contaiε thσ followinτ data«á 0-Seconds¼ 1-Alarφ seconds¼ ▓ -Minutes¼ │ ì
-Alarφ minutes¼á 4-Hours¼á 5-Alarφ Hours¼ 6-Da∙ oµ thσ week¼ 7-Datσ oµ ì
thσ month¼á 8-Month¼ 9-Year« Thi≤ leave≤ u≤ witΦ Register≤ 10,11,12,1│ ì
Decima∞á o≥á 0A,0B,0C,0─á iε HE╪ whicΦ arσ referreΣá t∩á a≤á register≤ ì
A,B,C,─ (obviousl∙ froφ thei≥ he° positioε iε thσ memor∙ map)« Thesσ ┤ ì
register≤á arσ thσ mos⌠ comple° a≤ thei≥ individua∞ bit≤ havσ meaning≤ ì
and/o≥ determinσ wha⌠ thσ clocδ i≤ doing« S∩ herσ wσ go.
Registe≥á A║á
Bit≤ ░ t∩ ╢ onl∙ caε bσ writteε t∩ bu⌠ al∞ thσ bits¼ thu≤ thσ bytσ caε ì
bσ read« Bit≤ 0¼ 1¼ ▓ anΣ │ arσ useΣ t∩ determinσ wha⌠ thσ squarσ wavσ ì
frequenc∙ i≤ oε piε 23¼ anΣ a≤ thi≤ piε i≤ no⌠ connecteΣ wσ canno⌠ usσ ì
thi≤ function╗ bu⌠ i≤ therσ iµ yo⌡ wan⌠ frequenc∙ signal≤ froφ ▓ h· t∩ ì
╕ khz«á Bit≤ 4¼ ╡ anΣ ╢ arσ useΣ t∩ tel∞ thσ clocδ chi≡ wha⌠ frequenc∙ ì
x-ta∞á i≤á connecteΣ anΣ a≤ thi≤ i≤ 32.76╕ kh· yo⌡ neeΣ t∩á se⌠á thesσ ì
bit≤ t∩ 010╗ thus¼ bi⌠ ╡ i≤ ß ▒ anΣ 4¼ ╢ arσ ß 0« Bi⌠ ╖ i≤ ß reaΣ onl∙ ì
statu≤ bi⌠ anΣ wheε thi≤ i≤ ß ▒ thσ chi≡ i≤ iε o≥ i≤ abou⌠ t∩ ente≥ aε ì
updatσ cycle¼á thu≤ thσ datß iε thσ register≤ coulΣ bσ wrong«á Yo⌡ arσ ì
bette≥á ofµá t∩á forge⌠á thi≤ las⌠ bi⌠ a≤ registe≥á ├á i≤á capablσá oµ ì
detectinτ al∞ yo⌡ wan⌠ t∩ know.
Registe≥á B║á
Herσ yo⌡ havσ ╕ bit≤ whicΦ yo⌡ caε se⌠ t∩ d∩ thσ followinτ functions:
Bi⌠ 0╗á wheε se⌠ t∩ 1¼á yo⌡ invokσ ß dayligh⌠ savinτ jum≡ iε April¼ ì
leavσ thi≤ bi⌠ ß ░ becausσ iε Australiß anΣ i≤ n∩ gooΣ t∩ you.
Bi⌠ 1╗ wheε se⌠ t∩ 1¼ yo⌡ havσ 2┤ h≥ mode╗ anΣ 1▓ h≥ modσ iµ ░ (wheε ì
iε 1▓ h≥ mode¼á bi⌠ ╖ oµ thσ hou≥ registe≥ ac⌠ a≤ aε P═ indicator⌐ ß ░ ì
i≤ A═ ß ▒ i≤ PM.
èBi⌠ 2╗ wheε se⌠ t∩ ß ▒ wil∞ se⌠ al∞ clocδ register≤ t∩ Binar∙ whilσ ì
ß ░ wil∞ givσ yo⌡ BCDecima∞ datß wheε read.
Bi⌠ 3╗ wheε se⌠ t∩ ▒ allow≤ thσ squarσ wavσ piε t∩ worδ whilσ ░ wil∞ ì
holΣ thi≤ piε low« Thi≤ piε i≤ useles≤ a≤ therσ i≤ n∩ connection.
Bi⌠á 4╗á wheεá se⌠á t∩ ß ▒ wil∞ allo≈ ß IOReques⌠ afte≥á updatσá i≤ ì
complete¼á wheεá se⌠á t∩á ßá ░ yo⌡ wil∞ stil∞ ge⌠á aεá updatσá bu⌠á n∩ ì
IOReques⌠á (leavσ a≤ ß ░ a≤ yo⌡ coulΣ bσ faceΣ witΦ interrupt≤ iεá thσ ì
middlσ oµ disδ axcessing)« ╔ prefe≥ flaτ testing)
Bi⌠ 5╗ wil∞ d∩ thσ samσ a≤ Bi⌠ ┤ bu⌠ act≤ oε thσ alarφ flag.
Bi⌠ 6╗á wil∞ d∩ thσ samσ a≤ Bi⌠ ┤ bu⌠ act≤ oε thσ S╤ wavσ signa∞ a⌠ ì
piεá 23«á Wheε bi⌠ ╢ i≤ ß onσ yo⌡ caε obtaiε rapiΣ interrupt≤á a⌠á thσ ì
IOReques⌠ piε provideΣ als∩ yo⌡ havσ determineΣ ß frequenc∙ rati∩ witΦ ì
thσ firs⌠ ┤ bit≤ iε Registe≥ A.
Bi⌠á 7╗á Thi≤ i≤ perhap≤ thσ majo≥ bi⌠ a≤ i⌠ i≤ thσ Se⌠á bit«á Wheε ì
thi≤á bi⌠á i≤á ßá 1¼á al∞ update≤ iε thσ clocδ sto≡ anΣá thi≤á i≤á thσ ì
opportunσá timσ t∩ se⌠ al∞ clocδ registers¼á afte≥ whicΦ yo⌡á caεá se⌠ ì
thi≤á bi⌠á t∩ ß lo≈ t∩ allo≈ thσ clocδ t∩ functioε normall∙á witΦá thσ ì
update≤ occurrinτ ever∙ second.
Registe≥ C║
Thi≤ i≤ thσ flaτ registe≥ anΣ i≤ ß reaΣ onl∙ register«
Bit≤ 0, 1, 2 and │ arσ unuseΣ anΣ reaΣ a≤ zero's.
Bi⌠ 4╗ goe≤ t∩ ß ▒ wheε thσ clocδ i≤ finisheΣ aε updatσ anΣ thi≤ i≤ ì
thσ timσ t∩ reaΣ you≥ registers.
Bi⌠ 5╗ i≤ se⌠ t∩ ß ▒ iµ thσ alarφ byte≤ matcΦ thσ timσ oµ da∙ o≥ iµ ì
thσ alarφ byte≤ arσ se⌠ t∩ ß don'⌠ carσ position«á E.g«á aε don'⌠ carσ ì
mean≤á yo⌡ havσ t∩ se⌠ thσ ▓ mos⌠ significan⌠ byte≤ iε thσ appropriatσ ì
alarφá register≤ anΣ iµ yo⌡ d∩ thi≤ t∩ al∞ threσ alarφá register≤á yo⌡ ì
caε obtaiε aε alarφ outpu⌠ ever∙ second.
Bi⌠ 6╗ goe≤ t∩ ß ▒ ever∙ timσ aε edgσ i≤ detecteΣ oε thσ SQWavσ ta≡ ì
a⌠ piε 23.
Bi⌠á 7╗á tell≤ yo⌡ tha⌠ ever∙ timσ thσ IOReques⌠ piε i≤ driveεá lo≈ ì
thi≤ flaτ bi⌠ goe≤ t∩ ß 1« I⌠ i≤ importan⌠ t∩ kno≈ tha⌠ ever∙ timσ yo⌡ ì
reaΣá thi≤á registe≥ al∞ thσ bit≤ arσ rese⌠ t∩ ░ thu≤ iµ yo⌡á wan⌠á t∩ ì
checδá morσá thaε ▒ bi⌠ yo⌡ wil∞ havσ t∩ savσ thσ value≤ oµá thσá jus⌠ ì
reaΣ register«á ╔ checδ mainl∙ fo≥ ▓ bit≤ thσ updatσ bi⌠ anΣ thσ alarφ ì
bi⌠ arσ thσ mos⌠ important.
Registe≥á─:
Registe≥ ─ i≤ ß reaΣ onl∙ register« Bit≤ ░ t∩ ╢ arσ unuseΣ anΣ reaΣ a≤ ì
zero's« Bi⌠ ╖ caε bσ se⌠ b∙ thσ prograφ b∙ doinτ ß reaΣ t∩ registe≥ D« ì
Thi≤á bi⌠á wil∞ rese⌠ t∩ lo≈ iµ yo⌡ disconnec⌠ al∞ powe≥ t∩ thσá clocδ ì
chi≡ thu≤ thi≤ bi⌠ i≤ useΣ a≤ aε valiΣ Raφ bi⌠ t∩ seσ iµ thσ clocδ ha≤ ì
beeε workinτ oε batter∙ standby« ╔ caε onl∙ seσ thσ usσ oµ thi≤ bi⌠ iµ ì
thi≤ i≤ thσ onl∙ clocδ yo⌡ have.
Thi≤á i≤á i⌠ folk≤ ╔ hopσ tha⌠ witΦ thi≤ informatioε yo⌡á caεá furthe≥ ì
explorσ you≥ clocδ chi≡ iε thσ Microbee« è BCLOCK.MWB
Öá Thi≤ Basiπ listinτ goe≤ witΦ thσ articlσ oε thσ clocδá register« ì
Oεá thσ disδ containinτ thi≤ basiπ listinτ therσ i≤ als∩ ßá .ED╘á filσ ì
whicΦ wil∞ d∩ thσ samσ a≤ thi≤ basiπ file« Ö ED.
00100 REM Real Time Clock Interface √▒┤╕²
00110 REM Displays Time and Date on top line of screen √▒┤╖²
00120 REM Independant of of other basic programs provided √▒╡░²
00130 REM The keyboard is turned On (eg in#0 has to be on) √▒┤╣²
00140 REM for various Basic 's √▒╡▓²
00150 REM tested on V 6.22 6.23 6.28 √▒╡▒²
00160 REM Delete REM at line 260 for operation with 6.28 Premium √▒╡┤²
00170 REM principle is a keyboard scan bypass routine √▒╡│²
00180 REM loaded at 7F00 Hex √▒╡╢²
00190 REM poke 32512 with non zero value to stop the scan √▒╡╡²
00200 REM Top of memory is adjusted to 7F00 Hex. √▒┤╣²
00210 REM Written and Designed by E van Bommel 6/4/87 √▒┤╕²
00220 REM √▒╡▒²
00230 A=32512:B=220:REM Location and number of bytes to poke √▒╖╡²
00240 FOR P=A TO A+B-1 √░▓╕²
00250 READ D:POKE P,D:NEXT P √▒╣╕²
00260 REM POKE 32675,232 : REM byte for adjusting Premium Basic √▒╡╡²
00270 U=USR(A) √▒╖┤²
00280 NEW √▒▓╡²
00290 DATA 0, 1, 194, 0, 62, 24, 2, 3, 62, 127 √▒▓╡²
00300 DATA 2, 1, 160, 0, 175, 2, 3, 62, 127, 2 √▒▒╡²
00310 DATA 175, 50, 0, 127, 245, 197, 213, 58, 0, 127 √▓░╖²
00320 DATA 254, 0, 194, 159, 127, 62, 12, 211, 4, 219 √▓╡┤²
00330 DATA 7, 203, 103, 202, 159, 127, 245, 1, 0, 240 √▓░▒²
00340 DATA 17, 63, 127, 26, 254, 36, 40, 19, 2, 3 √▒╖╡²
00350 DATA 19, 24, 246, 84, 105, 109, 101, 32, 36, 32 √▓┤╡²
00360 DATA 32, 68, 97, 116, 101, 32, 36, 62, 4, 205 √▒│╕²
00370 DATA 165, 127, 62, 58, 2, 3, 62, 2, 205, 165 √▓│▒²
00380 DATA 127, 62, 58, 2, 3, 62, 0, 205, 165, 127 √▓▒┤²
00390 DATA 30, 36, 29, 123, 254, 0, 40, 6, 62, 32 √▒▒╖²
00400 DATA 2, 3, 24, 244, 17, 69, 127, 26, 254, 36 √▒╕░²
00410 DATA 40, 5, 2, 3, 19, 24, 246, 62, 7, 205 √░╖╢²
00420 DATA 165, 127, 62, 47, 2, 3, 62, 8, 205, 165 √▓▒▒²
00430 DATA 127, 62, 47, 2, 3, 62, 9, 205, 165, 127 √▓░▒²
00440 DATA 62, 32, 2, 241, 203, 111, 196, 188, 127, 209 √▓│╖²
00450 DATA 193, 241, 195, 233, 163, 211, 4, 219, 7, 87 √░░╢²
00460 DATA 31, 31, 31, 31, 230, 15, 198, 48, 2, 3 √▒░▓²
00470 DATA 122, 230, 15, 198, 48, 2, 3, 201, 6, 0 √▒╣╣²
00480 DATA 30, 0, 22, 0, 219, 2, 203, 247, 211, 2 √▒╡╣²
00490 DATA 21, 32, 253, 219, 2, 203, 183, 211, 2, 29 √▓│▓²
00500 DATA 32, 253, 5, 32, 231, 201, 0, 0, 0, 0 √░╣┤²
HELP ?? HELP ?? HELP ?? HELP ??
╔ requirσ informatioε rσ thσ fittinτ oµ ß "De-glitchingó moΣ t∩ ß ì
Dreamdisδ System« Wheε fitteΣ thσ compute≥ wil∞ no⌠ operate«
Contact RO┬ SMITH via this newsletter.
è VISIT TO BALLARAT By Jim Thyer.
Saturda∙ 4tΦ April¼ ß beautifu∞ sunn∙ autumε Ballara⌠ day¼ festivitie≤ ì
anΣá display≤ carrieΣ ove≥ froφ thσ Begoniß Festiva∞ helΣ ß fe≈á week≤ ì
earlie≥á werσ stil∞ iε ful∞ swing«á Howeve≥ thesσ entertainment≤á diΣ ì
no⌠á distrac⌠á thσ banΣ oµ Microbeσ enthusiast≤ wh∩ emergeΣá froφá thσ ì
Melbournσ smoτ t∩ enjo∙ thσ delight≤ oµ thσ fresΦ countr∙ air¼á insidσ ì
al∞á da∙ anΣ halµ thσ nigh⌠ iε thσ Physic≤ Departmen⌠ a⌠ thσá Ballara⌠ ì
Collegσá oµá AdvanceΣá Education«áá Al∞á sort≤á oµá bells¼áá musica∞ ì
instruments¼á interestinτá vide∩ display≤ anΣ man∙ othe≥á treat≤á werσ ì
displayeΣ t∩ aε enthusiastiπ crowΣ oµ locals¼á (t∩ countr∙ peoplσ tha⌠ ì
mean≤ anywherσ withiε 15░ kφ o≥ so)« Loca∞ towns¼ sucΦ a≤ Geelonτ anΣ ì
Horshaφ werσ represented«á Andre≈ tooδ awa∙ thσ visitor≤ sheet¼ s∩ hσ ì
ma∙ wisΦ t∩ commen⌠ oε thσ distance≤ covered« Somσ oµ thσ highlights:
Stevσ Jepson¼á bus∙ al∞ da∙ witΦ copyinτ publiπ domaiε software«á Thσ ì
demanΣá wa≤á s∩ grea⌠ hσ haΣ t∩ takσ order≤ awa∙ t∩ bσá completeΣá anΣ ì
havσ thσ disk≤ returneΣ a⌠ ß late≥ date.
Riπá Millice≥ oµ Karφ Systems¼á witΦ detail≤ oµ thσ lates⌠ upgrade≤ t∩ ì
thσ Dreaφ Disδ System≤ whicΦ the∙ no≈ handle«á Thσ update≤ werσ s∩ u≡ ì
t∩á datσ tha⌠ thσ Physic≤ Departmen⌠ systeφ usinτ Dreaφá Disδá Monito≥ ì
versioεá 3.1▒ whicΦ haΣ beeε installeΣ les≤ thaε onσ weeδ wa≤ upgradeΣ ì
t∩á 3.14«á Test≤á late≥á showeΣ tha⌠ somσ oµ thσá problem≤á witΦá thσ ì
earlie≥ version¼á particularl∙ thσ screeε prin⌠ facility¼á wa≤á fixed¼ ì
anΣ problem≤ usinτ ß modeφ haΣ no≈ vanished«
Wheεá thesσ tw∩ person≤ go⌠ together¼á (the∙ werσ actuall∙ locateΣá iε ì
oppositσá corner≤á oµ thσ room)¼á ß buτ iε thσ setdisδá prograφá whicΦ ì
alloweΣá fo≥ onl∙ accessinτ 6│ insteaΣ oµ 12╖ director∙ entrie≤ oε thσ ì
Microbeσ 3.╡ incΦ singlσ sideΣ (CIAB⌐ forma⌠ wa≤ als∩ rectified«á Al∞ ì
╔á no≈ wan⌠ i≤ thσ abilit∙ t∩ reaΣ thσ 3.╡ incΦ 8░ tracδ doublσá sideΣ ì
forma⌠ unde≥ thσ Dreaφ Disδ System.
Stevσá JEPSO╬á witΦ aε excellen⌠ displa∙ oµ musiπá usinτá somσá simplσ ì
circuitr∙ anΣ program≤ froφ ß publiπ domaiε disk«á Onσ oµ thσ Ballara⌠ ì
enthusiasts¼á Douτá Marshall¼á obtaineΣ thσ relevan⌠ disk≤ froφ Steve¼ ì
anΣ ╔ looδ forwarΣ t∩ ß furthe≥ demonstratioε oµ thi≤ systeφ locally.
Pete≥á BROUGHTO╬ witΦ ß demonstratioε oµ hi≤ 512δ Bee¼á a≤ wel∞á a≤á ß ì
rangσá oµá circui⌠ board≤ anΣ component≤ fo≥ sale«á (followeΣ witΦá ß ì
generou≤ donatioε t∩ thσ departmen⌠ a⌠ thσ enΣ oµ thσ day)« Onσ oµ hσ ì
local≤á wen⌠á homσ anΣ returneΣ witΦ hi≤ Beσ fo≥ ß memor∙á upgradσá t∩ ì
512k« Thσ compute≥ wa≤ returneΣ b∙ Tuesday«
A demonstration of the 256k Microbee computer recently released.
Thσá Bazaa≥ witΦ aε excellen⌠ rangσ oµ goodies«á AlthougΦ i⌠ diΣá no⌠ ì
sel∞ a≤ mucΦ a≤ i⌠ doe≤ a⌠ ß regula≥ cluΓ night¼ sale≤ werσ excellent¼ ì
especialll∙ fo≥ ß firs⌠ visit«
Durinτ thσ eveninτ aε excellen⌠ casserolσ dinne≥ wa≤ consumed¼á thank≤ ì
t∩á ß numbe≥ oµ Ballara⌠ Microbeσ Widows-for-the-da∙ wh∩ prepareΣá thσ ì
casserole≤ anΣ sweets«
Oε behalµ oµ thσ locals¼ thank≤ ver∙ mucΦ t∩ thσ Melbournσ M'beσ User≤ ì
wh∩ camσ u≡ fo≥ thσ day¼á anΣ generousl∙ gavσ thei≥ suppor⌠ t∩ al∞ thσ ì
visitor≤á wh∩á came«á Als∩ t∩ thσ Physic≤ Departmen⌠ oµ thσá Ballara⌠ ì
Collegσ oµ AdvanceΣ Educatioε fo≥ allowinτ acces≤ t∩ thei≥ laboratory.è MBUG MICROBEE USERS SURVEY
Thσá question≤á belo≈ arσ t∩ assis⌠ thσ committeσ iε caterinτ fo≥á thσ ì
need≤ oµ YO╒ thσ membe≥ anΣ a≤ such¼ wσ woulΣ likσ yo⌡ t∩ answe≥ ever∙ ì
question« Thσ repl∙ carΣ ha≤ beeε designeΣ s∩ therσ i≤ n∩ referencσ t∩ ì
you≥ identity« You≥ membe≥ numbe≥ i≤ includeΣ fo≥ statistica∞ purpose≤ ì
only«á I⌠ i≤ iε you≥ interest≤ t∩ answe≥ al∞ question≤ anΣ returεá thσ ì
pre-paiΣ carΣ t∩ thσ nex⌠ cluΓ meetinτ o≥ b∙ mai∞ a≤ sooε a≤ possible«
┴ samplσ card i≤ showε below.
Q1. MEMBER NUMBER Q2. Are you a full time student
Q3. Do you still own a Microbee. Q4. Is it ROM or DISK based
Q5. What size is it in k Q6. Is it a DREAMDISK
Q7. How many drives Q8. Will you be keeping it
Q9. Will you be upgrading it to...Q10. A Microbee Systems upgrade
IF ANSWER TO Q10 IS NO PLEASE SPECIFY WHAT TYPE OF UPGRADE eg. Gerraty
Q11. Colour monitor Q12. Do you own a Printer
Q13. Printer name and model. Q14. Do you own a Microbee Modem
Q15. If other, name & model Q16. Do you use the Bulletin board
Q17. Do you use the TAPE Library Q18. Do you use public domain disks
Q19. List in order YOUR main uses for YOUR Microbee:
(A)Wordprocessinτ (B)Spreadshee⌠ (C)Databasσ (D)Busines≤
(E)Programminτ (F)game≤ (G)Educatioε (H)Other
Q20« Doe≤ thσ Catche≥ cate≥ fo≥ you≥ need≤
Q21« D∩ yo⌡ wan⌠ a⌠ leas⌠ ON┼ BASI├ prograφ eacΦ montΦ iε thσ Catcher
Q22. Do you type in the listings. Q23. Do you use the checksums
Q24«áHavσáyo⌡ápersonall∙ágaineΣáfroφáthσáhelp/answe≥ámessage≤ published
Q25«áD∩áyo⌡áwritσ you≥ owε program≤
Q26« Lis⌠ iε orde≥ thσ maiε language≤ yo⌡ normall∙ usσ oε thσ Bee
(A⌐ MBASI├ (B⌐ MICROWORL─ BASI├ (C⌐ PASCA╠ (D⌐ ├ (E⌐ DBASEII
(F⌐ CBASI├ (G⌐ 8080/Z8░ (H⌐ OTHE╥ (Marδ onl∙ thosσ yo⌡ use)
Q27« Wha⌠ woulΣ YO╒ likσ t∩ seσ iε thσ Catcher.
Q28«áI≤ái⌠álikely¼áiε thσ futurσ, yo⌡ ma∙ contributσ t∩áthσ Catcher
Q29. What do YOU want to see more of at meetings:
(A) DEMONSTRATIONS (B) TUTORIALS (C) OTHER (specify)
Q30. How can the club help YOU and your Microbee.
Q31« Arσ therσ AN┘ comment≤ you would likσ t∩ make about the club.
PLEASE READ ALL THE QUESTIONS FIRST.
Pleasσá answe≥ question≤ thσ easies⌠ wa∙ yo⌡ caε e.τ ┘ o≥ YE╙ o≥ ╬á o≥ ì
N╧á anΣ pu⌠ number≤ a≤ numeral≤ insteaΣ oµ text«á e.g«á 6┤ insteaΣá oµ ì
sixt∙ four.
SAMPLE REPLY CARD
Q1. ____ Q2. ____ Q3. ____ Q4. ____ Q5. ____ Q6. ____ Q7. ____
Q8. ____ Q9. ____ Q10. ____ SPECIFY ______________________________
Q11. ____ Q12. ____ Q13. ________________________ Q14. ____
Q15. __________________________________ Q16. ____ Q17. ____ Q18. ____
Q19. __________________________________ Q20. ____ Q21. ____ Q22. ____
Q23. ____ Q24. ____ Q25«á____ Q26«á__________________________________
Q27« ________________________________________________________________
Q28. ____ Q29. ____ SPECIFY _________________________________________
Q30. ________________________________________________________________
________________________________________________________________
Q31. ________________________________________________________________
________________________________________________________________è DOCUMENTATION FOR MERGE.MWB, BY J.LOKE 87APR06
A⌠ ß recen⌠ meeting¼á ß fello≈ >RUN "MERGE"
cluΓá membe≥ describeΣ somσ oµá thσ
problem≤ hσ wa≤ havinτ witΦ merginτ MERGE V1.00 BY J.LOKE 87APR06ì
MicroworlΣáá tin∙á BASI├á programs«
MERGE.MW┬ i≤ ß utilit∙ designeΣá t∩ NAME OF FIRST FILE =? PROG1ì
allo≈áá thσá eas∙á merginτá oµá tw∩ NAME OF SECOND FILE=? PROG2
programs«á I⌠ produce≤ ß temporar∙
batcΦ commanΣ filσ calleΣ "$$$.000ó MERGING PROG1.MWB WITH PROG2.MWB
whicΦáá supervise≤áá thσááá merginτ
proces≤á vißá aε intermediatσá filσ .
calleΣ "$$$.ASC"« N∩ provisioε ha≤ .
beeε madσ fo≥ detectinτ line-numbe≥
clashes¼á anΣ i⌠ i≤ u≡ t∩ thσá use≥ >_
t∩ avoiΣ thesσ iµ s∩ required.
A⌠ thi≤ápoint¼áthσámergeΣ program
Herσá i≤á thσá outpu⌠á froφá ß reside≤ iε memor∙ anΣáma∙ be EDIT-ì
samplσ run: ed beforσábeinτ SAVEd.
00010 REM √░╣╕²
00020 REM MERGE UTILITY FOR MICROWORLD TINY BASIC PROGRAMS √░╣╣²
00030 REM √▒░░²
00040 REM VERS DATE NOTES √▒░▒²
00050 REM 1.00 87APR08 J.LOKE: ORIGINAL VERSION √▒░▓²
00060 REM √▒░│²
00070 PRINT "MERGE V1.00 BY J.LOKE 87APR06" √▒╕░²
00080 PRINT √▓┤╢²
00090 INPUT "NAME OF FIRST FILE =?",F1$ √░░╣²
00100 INPUT "NAME OF SECOND FILE=?",F2$ √▓▓╖²
00110 PRINT √░│╡²
00120 PRINT "MERGING " F1$ ".MWB WITH " F2$ ".MWB" √░░│²
00130 REM √▒┤╣²
00140 F0$="$$$.000" √░│┤²
00150 F3$="$$$.ASC" √▒░▒²
00160 Q0$=CHR$(34) √░╖╡²
00170 REM √▒╡│²
00180 L=PEEK(227) √░╡░²
00190 CLOSE 6 √░╢╢²
00200 OPEN "O",6,F0$ √▒│╣²
00210 OUTL#6 √░┤╢²
00220 REM √▒╡▒²
00230 LPRINT "LOAD " Q0$ F2$ Q0$ √▓┤░²
00240 LPRINT "L=PEEK(227):CLOSE 7" √▒│┤²
00250 LPRINT "OPEN " Q0$ "O" Q0$ ",7," Q0$ F3$ Q0$ √▓│░²
00260 LPRINT "OUTL#7:LLIST" √░╕░²
00270 LPRINT "CLOSE 7:POKE 227,L" √░░┤²
00280 LPRINT "LOAD " Q0$ F1$ Q0$ √▓┤╕²
00290 LPRINT "OPEN " Q0$ "I" Q0$ ",7," Q0$ F3$ Q0$ ":IN#7 ON" √▓░░²
00300 LPRINT "IN#7 OFF" √▒╖╣²
00310 LPRINT "KILL " Q0$ F3$ Q0$ √▓▒░²
00320 LPRINT "IN#6 OFF:CLOSE 6:KILL " Q0$ F0$ Q0$ √▒╖┤²
00330 CLOSE 6 √░╢▓²
00340 POKE 227,L √▓▓╖²
00350 REM √▒╡│²
00360 OPEN "I",6,F0$ √▒┤░²
00370 IN#6 ON √░▒╣²
00380 END √▒▒▒²
è
*** BAZAAR SALES *** BAZAAR SALES ***
*ááYOU╥ááááLIBRAR┘áááá* ì
THE CATCHER
02B├ Volumσ ▓ (Oct.83-Sept.84⌐.................. $15.0░
03BC Volume 3 (Oct.84-Sept.85).................. $15.00
04UB Volume 4 (Oct.85-Sept.86)
(Unbound-Only enough for 4).................... $15.00
MB01 MAGAZINE BINDERS (For ONLINE)................ $ 8.00
* HEAD CLEAN *
5HCK Drive Head Cleaning Kit 5.25" ................. $12.00
3HCK Drive Head Cleaning Kit 3.5" .................. $15.00
* SOFTWARE *
01B┴ BeeArtistiπá (Graphiπ S/W⌐á.................... $35.0░ ì
001W Write Hand Man (Order) .................... $40.00
0BKP Beekeeper (see review Catcher Jan. '87)........ $90.00
1FPF Flashprint 4 (with Flashkey) ............... $50.00
002S Poor Persons Spooler (Order) ................ $45.00
003S Poor Persons Spreadsheet (Order)............. $45.00
004S Poor Persons Spelling Checker (Order)......... $30.00
005S Poor Persons Window System (Order)........... $40.00
006S Poor Persons Menus (Order)................... $38.00
007S Poor Persons Keyed Sequential Files (Order).... $45.00
* YOUR PRINTER *
80PR Carboε Printe≥ Ribboε
(suit xyz.80/100 printers) .......... $ 8.00
10PP 1250 SHEETS CONT. PAPER
(70 GSM - NOT AVAILABLE FOR MAILING ...... $15.00
¬ááDISK╙ ááááá *
3SMS Blank 3.5" Disks, MAXWELL SSDD, Box of 10 ...... $40.00
3SDB Blank 3.5" Disks, NASHUA SSDD, Box of 10 ....... $40.00
3SDS Blanδ 3.5ó Disk≤, NASHUA SSDD Singles .......... ñ 5.00
3DSF Blank 3.5" Disks, BASF DSDD Plastic Box of 5 ... $25.00
5DDS Blank 5.25" Disks PRECISION DSDD Box of 10 ..... $20.00
5DSSáBlanδ 5.25ó Disks, NASHUA DSDD Singles ......... $ 2.00
5DSS Blank 5.25" Disks, MEMRON DSDD Coloured Covers
(Packed in Plastic Box of 10)................... $25.00
*** BAZAAR SALES *** BAZAAR SALES ***
è*** BAZAAR SALES *** BAZAAR SALES ***
* HARDWARE *
00PB Don McKenzie Printer Buffers
PC Board and Eprom ......................... $ 39.00
Full 8 - 64K Kit (of parts) ................ $ 90.00
Full 256K Kit (of parts) ................... $115.00
03DD 1MEG. (Unformatted) NEC 3.5" Third Height DS/FDD $200.00
05DD 1MEG/1.6MEG DUAL SPEED 5.25" Disk Drive ........ $200.00
(DRIVES NOT AVAILABLE BY MAIL ORDER)
01T├ REA╠ TIM┼ CLOCK KIT╙ (see Article this issue) .. $ 25.00
SP01 SPEED MODULATOR (slows down BEE for games) .... $ 15.00
* DISK STORAGE *
5B85 DISK STORAGE BOX 5.25"
(Lockable, holds 100).......... $ 18.00
5B10 DISK LIBRARY BOX 5.25" (holds 10) ..............$ 3.00
3B40 DISK STORAGE BOX 3.5"
(Lockable, holds 40) .......... $ 18.00
All postal orders to be sent to MBUG AUSTRALIA SALES
P.O. BOX 157, NUNAWADING
VICTORIA 3131
T∩ avoiΣ delays¼á al∞ order≤ mus⌠ includσ cheque¼ posta∞ orde≥ 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 AVAILABLE FOR MEMBERS ONLY
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
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 :$7.50 Total Order $_________
Certified Mail add $1.00 Security Post add $5.00
MINIMUM POSTAL ORDER $10.00 MAY '87.
*** BAZAAR SALES *** BAZAAR SALES ***è