CP/M/CPM_CDROM.iso/mbug/mbug018.arc/1986MAY.CAT

Text File | 1979-12-31 | 64KB | 1,341 lines

.PL70
.PO0
.OP
.HE                    
MAY- THE  CATCHER -
1986  #
Thσ followinτ i≤ ß lis⌠ oµ thσ 1985/8╢ committeσ anΣ somσ oµ thσ peoplσ wh∩ ì
havσ offereΣ thei≥ assistance« Iµ therσ i≤ anythinτ yo⌡ requirσ o≥ an∙ hel≡ ì
yo⌡á caεá givσá us¼á pleasσ d∩ no⌠ hesitatσ t∩ contac⌠ an∙ onσá oµá us«á

              EXECUTIVE  

PRESIDENT                               ANDREW BARFOOT           758-4822
VICE-PRESIDENT                          MICK HOLZINGER           354-6742
SECRETARY                               AXEL JOSCHT              859-1541
TREASURER                               KEVIN CARR               233-4629
PUBLI├ OFFICE╥                          JOHN BUTTON              578-8145

                         COMMITTEE AND ASSISTANTS

Terry Murphy        369-4111            Graham Schultz           848-5485
John Buxton         758-5744            Peter Wagner             791-4675
Jim Lobley          758-9169            David Soutar             836-3661
Gran⌠ Fores⌠        874-872╕            Steveε Jepsoε             45-4226
Mike Thompson       82-5002             Robert Broomhead         546-3020


SERVICES  PROVIDED  BY  MBUG  AUSTRALIA 

EDITOR  A. BARFOOT. P.O. BOX 157 NUNAWADING 3131  758-4822
MEMBERSHIP SECRETARY J. LOBLEY.  P.O. BOX 157 NUNAWADING 3131  758-9169
MBUG DISKS AND TAPE LIBRARY G. SCHULTZ 36 CARINGAL Ave. DONCASTER 3108
PUBLIC DOMAIN (SIG/M) DISKS  P.O. BOX 45 CANTERBURY 3126
MODEM HIRE    GRAHAM SCHULTZ.      848-5485
BAZAAR MICK HOLZINGER  P.O. BOX 253 COBURG  3058
DISK FORMAT COPYING GRANT FOREST  874-8728  A.H. ONLY
RBBS SYSTEM OPERATORS AND PROGRAMMERS.  SYSOP  MIKE THOMPSON
REMOTE SYSOPS:  Ray Han. Grant Forest. Richard Collett.
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ε sepatatσ 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
should should not be typed in as part of the listing.
 
THE CATCHER is published by MBUG AUSTRALIA INCORPORATED
All copyrights are reserved by MBUG AUSTRALIA INCORPORATED èé    FRO═ TH┼ CHIE╞ MBU╟     FRO═ TH┼ CHIE╞ MBU╟     FRO═ TH┼ CHIE╞ MBUG

     Hell∩ t∩ al∞ ne≈ members«á ╔ sa∙ ß specia∞ hell∩ t∩ yo⌡ thi≤ issuσ fo≥ ì
ß couplσ oµ reasons«á Firs⌠ oµ al∞ a≤ ß courtes∙ anΣ secondly¼ becausσ iε ß ì
yea≥ o≥ s∩ onσ oµ yo⌡ migh⌠ bσ sittinτ typinτ thσ note≤ tha⌠ appea≥ oε thi≤ ì
pagσá oµ ou≥ newslette≥ and¼á witΦ tha⌠ iε mind¼á ╔ reminΣ no⌠ onl∙ thσ ne≈ ì
members¼á bu⌠ al∞ oµ you¼á tha⌠ yo⌡ arσ thσ backbonσ oµ thi≤ club«á Wσ havσ ì
donσá thσá seemingl∙ impossiblσ oµ late«á Iµ thosσ oµ yo⌡ wh∩ comσá t∩á thσ ì
meeting≤á eve≥á reaΣá thσ newsletter≤ froφá othe≥á club≤á (no⌠á necessaril∙ ì
Microbee)¼á yo⌡á wil∞á havσá noticeΣ oµ late¼á therσ i≤ ßá growinτá concerε ì
amongs⌠á thei≥ managemen⌠ committee≤ a≤ t∩ fallinτ membershi≡ anΣá lacδá oµ ì
attendancσá oµ member≤ a⌠ genera∞ meetings«á Othe≥ complaint≤ arσ emanatinτ ì
froφ editor≤ becausσ oµ thσ lacδ oµ materia∞ t∩ usσ iε thei≥ magazines«

     Thσá committeσá oµ thi≤ cluΓ i≤ takinτ ß positivσá approacΦá t∩á thesσ ì
problem≤á anΣ thi≤ i≤ reflecteΣ iε thσ botΦ thσ growtΦ ratσ anΣá attendancσ ì
a⌠ ou≥ monthl∙ meetings« Als∩ individua∞ member≤ arσ no≈ cominτ u≡ witΦ anΣ ì
implementinτ idea≤ oµ thei≥ own« Iε thσ pas⌠ fe≈ week≤ ╔ havσ beeε askeΣ iµ ì
ßá Pasca∞ grou≡ anΣ ß Dreamdisδ use≥ grou≡ coulΣ bσ formeΣ withiε thσá cluΓ ì
anΣá iε thi≤ issuσ therσ i≤ ß noticσ oµ ß Basiπ grou≡ beinτá formed«á Thesσ ì
wil∞á no⌠ becomσ separatσ group≤ bu⌠ wil∞ bσ aε integra∞ par⌠ oµ thσá club« ì
Thσá Pasca∞á anΣ Basiπ group≤ wil∞ havσ thei≥ timσ a⌠ thσ maiε meetinτá anΣ ì
thσá Dreamdisδ user≤ wil∞ mee⌠ witΦ u≤ a⌠ thσ CP/═ night«á Thosσá wh∩á joiε ì
thesσá group≤ wil∞ no⌠ finΣ themselve≤ lockeΣ int∩ theφ a≤ the∙ wil∞ bσ on- ì
goinτ providinτ yo⌡ usσ them«

     Thσá CP/═ o≥ "hackersó night«á Iµ yo⌡ arσ int∩á CP/M¼á Basic¼á Pascal¼ ì
dbaseI╔á o≥á jus⌠ abou⌠ an∙ compute≥ languagσ o≥ program¼á maybσá therσá i≤ ì
somethinτ ne≈ fo≥ you¼á o≥ someonσ waitinτ t∩ talδ t∩ yo⌡ a⌠ thesσá nights« ì
Besides¼á yo⌡á wil∞ alway≤ bσ firs⌠ amongs⌠ you≥ Microbeσ friend≤ witΦá thσ ì
newes⌠ oµ thσ Publiπ Domaiε softwarσ anΣ iµ yo⌡ don'⌠ likσ typinτ programs¼ ì
thi≤á i≤ wherσ ╔ ge⌠ mos⌠ oµ thσ materia∞ fo≥ thσ Catcher«á Therσ wa≤ abou⌠ ì
2░ computer≤ anΣ abou⌠ 3░ peoplσ a⌠ thσ las⌠ night«á Thi≤ i≤ ß fa≥ cr∙ froφ ì
thσ firs⌠ timσ ╔ hearΣ abou⌠ ß "hackersó night« Nobod∙ bothereΣ t∩ opeε thσ ì
hal∞á anΣ onl∙ onσ persoε turneΣ u≡ anyway«á Let≤ hopσ wσ caεá continuσá iε ì
thi≤á growtΦá anΣ co-operatioε anΣ continuσ t∩ builΣ thi≤ cluΓ int∩ onσá oµ ì
thσ bigges⌠ compute≥ use≥ group≤ iε Australia« Yo⌡ arσ AL╠ welcome«

     Thi≤á meetinτ wσ shoulΣ havσ demo≤ oµ ß Bee-Talker¼á ß Ligh⌠á Peεá anΣ ì
hopefull∙ ß wσ migh⌠ havσ ß specia∞ dem∩ froφ Microbeσ Systems«á Therσ wil∞ ì
als∩ bσ new≤ froφ Microbeσ System≤ abou⌠ thσ Onlinσ magazinσ anΣ ou≥ club«

     Thσá tapσá librar∙ no≈ ha≤ ┤ ne≈ program≤ fo≥ hirσ includinτá tw∩á ne≈ ì
adventurσ games«á Thi≤ i≤ als∩ takinτ timσ t∩ se⌠ up«á Iµ yo⌡ coulΣ assist¼ ì
pleasσ talδ t∩ Grahaφ or me o≥ reaΣ thσ ad÷ pagσ 6.

     Hopefull∙ b∙ now¼ al∞ thosσ peoplσ wh∩ havσ contributeΣ t∩ thσ Catche≥ ì
iε thσ las⌠ ╢ month≤ shoulΣ b∙ no≈ havσ beeε paid« Iµ not¼ seσ me«

     That≤á thσ gooΣ stuff¼á no≈ somσ bad«á AlthougΦ ╔ havσá madσá repeateΣ ì
mentioεá abou⌠ piracy¼á givinτ copie≤ oµ proprietar∙ softwarσ tha⌠ yo⌡ havσ ì
o≥ havσ no⌠ paiΣ fo≥ i≤ ILLEGAL«á Anyonσ breachinτ sucΦ copyright≤ a⌠ venuσ ì
operateΣá b∙á Mbuτá Aus⌠á Inπ ma∙ finΣ thei≥ disk≤á wil∞á bσá borroweΣá anΣ ì
returneΣá nex⌠ meetinτ FORMATTED«á Iµ yo⌡ don'⌠á understanΣá Formatted¼á i⌠ ì
mean≤ you≥ disδ wil∞ havσ nothinτ oε i⌠ wheε yo⌡ ge⌠ i⌠ back«

>ANDREW

DISCOUN╘ NUMBE╥ 897è     Softwarσ Change≤ oε thσ Bulletiε BoarΣ             Mikσ Thompson

Therσ havσ severa∞ softwarσ change≤ oε thσ bulletiε boarΣ recentl∙ anΣ morσ ì
arσ oε thσ way« Firstly¼ however¼ ß fe≈ note≤ oε hardwarσ problems« Somσ oµ ì
yo⌡ ma∙ havσ beeε loggeΣ ofµ thσ systeφ fo≥ n∩ apparen⌠ reason«á Thσ reasoε ì
i≤á tha⌠ thσ compute≥ crasheΣ wheneve≥ m∙ blo≈ heate≥ wa≤ oε fo≥ morσá thaε ì
2░á minute≤ o≥ so«á Thσ culpri⌠ wa≤ thσ ▒ am≡ powe≥ pacδ whicΦ ha≤ no≈ beeε ì
replaceΣ b∙ ß 1.╡ am≡ supply«á Fewe≥ peoplσ seeφ t∩ bσ hanginτ u≡ thσ phonσ ì
whilσ stil∞ loggeΣ oε a⌠ 120░ baud«á Howeve≥ therσ arσ stil∞ ß fe≈ case≤ oµ ì
this¼á s∩ ß ▓ hou≥ timσ limi⌠ wil∞ bσ imposeΣ soon«á Thi≤ wil∞ loτ yo⌡á ofµ ì
afte≥á ▓ hour≤ n∩ matte≥ wha⌠ yo⌡ arσ doinτ witΦ N╧ warningíá Thi≤ ste≡á i≤ ì
beinτá takeεá purel∙ t∩ sto≡ thσ systeφ froφ hanging«á ┴ bette≥ timσá limi⌠ ì
systeφ wil∞ bσ introduceΣ wheε ╔ ge⌠ time¼ a≤ i⌠ require≤ somσ fairl∙ majo≥ ì
softwarσ changes«

Herσá i≤ aε overvie≈ oµ thσ softwarσ change≤ madσ recently«á Extract≤á froφ ì
thσ ne≈ HEL╨ filσ arσ giveε belo≈ fo≥ reference.

We'vσá haΣ 120░ bauΣ uploadinτ availablσ fo≥ abou⌠ ╢ week≤á now¼á anΣá mos⌠ ì
peoplσá seemeΣá t∩á havσá problem≤ witΦ thσá flippinτá procedurσá anΣá werσ ì
subsequentl∙á loggeΣ off«á Iε vie≈ oµ thi≤ therσ i≤ no≈ ß ne≈ FLI╨á commanΣ ì
tha⌠á wil∞á allo≈ yo⌡ t∩ fli≡ t∩ 75/1200«á Yo⌡ theε usσ REC╓ iε thσá norma∞ ì
way«á Yo⌡á arσá strongl∙á adviseΣ t∩ fli≡ bacδ t∩ 1200/7╡á afte≥á yo⌡á havσ ì
finisheΣ uploading╗á doinτ ß DI╥ a⌠ 7╡ bauΣ woulΣ curσ thσ mos⌠ acutσá casσ ì
oµá insomniaíá REC╓ wil∞ allo≈ batcΦ modσ ver∙ soon¼á whicΦ shoulΣ pleasσ ß ì
numbe≥á oµá users«á Notσ tha⌠ thσ -├ optioε t∩ usσ CR├ erro≥á checkinτá no≈ ì
work≤ again.

SEN─á ha≤á beeε modifieΣ t∩ sho≈ thσ tota∞ transmissioε timσ oµá thσá file≤ ì
beinτá sen⌠á whicΦ shoulΣ enablσ yo⌡ t∩ plaε you≥ coffeσ break≤á witΦá morσ ì
confidence« ╔ havσ als∩ pu⌠ thσ CR├ calculatioε bacδ int∩ SEN─ anΣ REC╓ duσ ì
t∩ use≥ requests╗ however¼ i⌠ no≈ wait≤ ß fe≈ second≤ beforσ printinτ i⌠ s∩ ì
tha⌠á yo⌡á ge⌠á morσ timσ t∩ ge⌠ bacδ int∩ termina∞á mode«á Wheεá SEN─á ha≤ ì
finisheΣá i⌠ display≤ thσ tota∞ numbe≥ oµ transmissioεá errors«á Iµá you'rσ ì
usinτá TELCO═ 2.░ o≥ greate≥ theε thi≤ valuσ wil∞ bσ a⌠ leas⌠ one«á Thi≤ i≤ ì
becausσá TELCO═á alway≤á assume≤ tha⌠ i⌠ i≤ usinτ batcΦ modσá anΣá wheεá i⌠ ì
discover≤ tha⌠ batcΦ modσ i≤ no⌠ beinτ useΣ (afte≥ thσ firs⌠ blocδ ha≤ beeε ì
sent⌐ i⌠ request≤ tha⌠ thσ firs⌠ blocδ bσ sen⌠ again.

Thσá HEL╨á commanΣá ha≤á beeε rewritteε anΣ i≤ no≈á mucΦá bette≥á thaεá thσ ì
origina∞á one«á I⌠ allow≤ yo⌡ t∩ hi⌠ ^├ a⌠ an∙ timσ t∩ abort¼á whicΦ wa≤á ß ì
majo≥á failinτá oµ thσ original«á I⌠ i≤ ver∙ simila≥ t∩á thσá HEL╨á commanΣ ì
supplieΣ witΦ CP/M+« Seσ belo≈ fo≥ ß completσ description.

Extract≤ froφ HEL╨ file:

FLIPé           Syntax║   FLIP
Thσá FLI╨ commanΣ i≤ useΣ t∩ changσ bauΣ rates«á Iµ yo⌡ arσ usinτ 30░á bauΣ ì
theε yo⌡ caε als∩ fli≡ froφ originatσ modσ t∩ answe≥ mode« Iµ yo⌡ loggeΣ oε ì
a⌠á 120░á bauΣ anΣ yo⌡ wisΦ t∩ uploaΣ ß filσ t∩ thσ systeφ usinτ REC╓á theε ì
yo⌡á shoulΣ usσ FLI╨ t∩ changσ t∩ 75/120░ (ie¼á yo⌡ senΣ a⌠ 120░á bauΣá anΣ ì
receivσ a⌠ 30░ baud«     Oncσ FLI╨ i≤ ruε yo⌡ wil∞ bσ prompteΣ with:-

Command┐ (1,7,A,O,┐ o≥ ^C)

▒ -  flip≤ t∩ 1200/75«á Thi≤ woulΣ normall∙ bσ useΣ afte≥ yo⌡ havσ uploadeΣ ì
     ß filσ a⌠ 120░ baud« Iµ yo⌡ loggeΣ oε a⌠ 30░ bauΣ anΣ yo⌡ wisΦ t∩ fli≡ ì
     t∩ 120░ bauΣ theε usσ thi≤ command.
è╖á - flip≤ t∩ 75/1200«á Thi≤ i≤ onl∙ useΣ prio≥ t∩ uploadinτ ß filσá (usinτ ì
     RECV⌐ a⌠ 120░ baud« Yo⌡ shoulΣ fli≡ bacδ t∩ 1200/7╡ afte≥ thσ filσ ha≤ ì
     beeε uploaded«

┴ -  flip≤ t∩ 30░ bauΣ Answer« Iµ yo⌡ loggeΣ oε a⌠ 30░ bauΣ theε yo⌡ wil∞ bσ ì
     iεá originate«á Iµ yo⌡ arσ gettinτ lot≤ oµ transmissioε error≤ theε i⌠ ì
     migh⌠ bσ usefu∞ t∩ fli≡ t∩ answe≥ mode.

╧ -  flip≤ t∩ 30░ bauΣ Originate« Thi≤ i≤ thσ defaul⌠ modσ iµ yo⌡ loτ iε a⌠ ì
     30░ baud«á Iµ yo⌡ arσ havinτ transmissioε trouble≤ a⌠ 120░ bauΣ o≥ 30░ ì
     bauΣ answe≥ theε tr∙ flippinτ t∩ 30░ bauΣ originate.

FLI╨ ª BEEMODEM
Iµá yo⌡ arσ usinτ ß 1200/7╡ Beemodeφ theε al∞ tha⌠ i≤ requireΣ i≤ t∩ togglσ ì
thσá 300/120░ switcΦ oε thσ fron⌠ oµ thσ modeφ iµ flippinτ betweeε 30░á anΣ ì
1200/7╡á (o≥ 75/1200)«á Iµ flippinτ froφ 1200/7╡ t∩ 75/120░ theεá movσá thσ ì
ANSW/ORI╟á switcΦá t∩á thσá ANS╫ position«á Iµ flippinτá betweeεá 30░á bauΣ ì
originatσá anΣá 30░á +bauΣ answe≥ theε movσ thσá ANSW/ORI╟á switcΦá t∩á it≤ ì
appropriatσ position.

FLI╨ ª TELCOM
Iµ yo⌡ arσ usinτ TELCO═ theε yo⌡ mus⌠ ente≥ thσ commanΣ men⌡ b∙ typinτ ^ES├ ì
(contro∞ ESCape⌐ and¼ dependinτ oε whicΦ FLI╨ commanΣ you'rσ usinτ type:

     BAU─ R120░ T7╡      iµ flippinτ t∩ 1200/75
             or
     BAU─ R7╡ T120░      iµ flippinτ t∩ 75/1200
             or
     BAU─ 30░            iµ flippinτ froφ 1200/7╡ (o≥ 75/1200⌐ t∩ 300

HELPé      Syntax║   HEL╨ [topic[/subtopic[/subtopic...]]]
Thσá HEL╨ commanΣ provide≤ informatioε abou⌠ thi≤ system«á Wheε yo⌡á invokσ ì
HEL╨ yo⌡ arσ prompteΣ witΦ ß lis⌠ oµ topics«á EacΦ oµ thesσ topic≤ ma∙ havσ ì
sub-topic≤á oµ thei≥ owε anΣ eacΦ oµ thesσ sub-topic≤ ma∙ havσ furthe≥ sub-ì
topic≤ etc¼á thu≤ forminτ ß treσ structure«á An∙ topiπ o≥ sub-topiπ caεá bσ ì
explicitl∙á referenceΣá b∙á ßá patΦ expressioεá whicΦá consist≤á oµá topic≤ ì
separateΣá b∙á thσ » (slash⌐ character«á Seσ thσ example≤ fo≥ ho≈á thi≤á i≤ ì
done«á Notσ tha⌠ yo⌡ onl∙ havσ t∩ ke∙ i∩ a≤ mucΦ oµ thσ topiπ s∩ a≤ t∩ makσ ì
i⌠ distinc⌠ froφ othe≥ topics╗ thi≤ save≤ mucΦ typing.

Iµá yo⌡á arσ severa∞ level≤ dee≡ iε thσ hel≡ treσ anΣ yo⌡ wisΦ t∩á seσá thσ ì
previou≤ (parent⌐ topic¼á yo⌡ don'⌠ havσ t∩ specif∙ thσ wholσ path╗ insteaΣ ì
yo⌡á caε typσ iε .«á t∩ movσ onσ leve∞ u≡ thσ tree«á Notσ tha⌠ specifyinτ ß ì
topiπ tha⌠ ha≤ n∩ sub-topic≤ leave≤ yo⌡ a⌠ thσ samσ leve∞ iε thσ tree« Thi≤ ì
mean≤ tha⌠ yo⌡ don'⌠ havσ t∩ typσ .« t∩ vie≈ severa∞ sub-topic≤ oε thσ samσ ì
leve∞ (provided¼á oµ course¼á tha⌠ nonσ oµ thσ sub-topic≤ havσ furthe≥ sub-ì
topic≤ oµ thei≥ own).

Hittinτá thσá RETUR╬ ke∙ a⌠ thσ HELP╛ promp⌠ re-display≤ thσá curren⌠á hel≡ ì
topiπá (o≥á thσá previou≤ onσ iµ thσ topiπ jus⌠ reaΣ i≤ a⌠ ßá leaµá iεá thσ ì
tree).

PatΦ expression≤ arσ usuall∙ relativσ t∩ you≥ curren⌠ positioε iε thσ tree¼ ì
s∩ tha⌠ iµ yo⌡ typσ EXAMPLE╙ wheε yo⌡ nex⌠ seσ thσ HELP╛ prompt¼á yo⌡ woulΣ ì
bσ viewinτ ß topiπ relativσ t∩ thσ HEL╨ topic«á However¼á patΦá expression≤ ì
caεá bσ madσ absolutσ b∙ precedinτ thσ expressioε witΦ ß /«á Iµ yo⌡ d∩ thi≤ ì
theεá i⌠ wil∞ star⌠ thσ searcΦ froφ thσ roo⌠ oµ thσ hel≡ treσ (iσ thσá hel≡ ì
topic≤ yo⌡ firs⌠ seσ wheε yo⌡ typeΣ HEL╨ froφ thσ CP/═ commanΣ line).
èAnyonσ wh∩ ha≤ useΣ MS-DOS/PC-DO╙ witΦ sub-directorie≤ shoulΣ fee∞ quitσ a⌠ ì
homσ witΦ HELP.
Al∞á thi≤ ma∙ sounΣ ver∙ complicated¼á bu⌠ i⌠ i≤ iε fac⌠ extremel∙ eas∙á t∩ ì
use¼ anΣ fa≥ superio≥ t∩ thσ usua∞ CP/═ hel≡ programs.

HEL╨ EXAMPLESé

     HEL╨                       Displa∙ HEL╨ topic≤ availablσ oε system
     HEL╨ COMMAND╙              Hel≡ oε availablσ commands
     HEL╨ ├                     Samσ a≤ abovσ sincσ 'Cº i≤ unique
     HEL╨ C/HEL╨                Hel≡ oε usinτ HELP
     HEL╨ C/HELP/E╪             Example≤ oµ usinτ HEL╨ (ie¼ wha⌠ you're
     HEL╨ C/FLIP/TE╠            Hel≡ oε usinτ FLI╨ witΦ TELCOM
     HEL╨ C/FLIP/TEL/../BE┼     Hel≡ oε usinτ FLI╨ witΦ ß Beemodeφ (same
                                a≤ HEL╨ C/FLIP/BEE)

RECVé      Syntax║   REC╓ [-C▌ [<filename>]

REC╓ allow≤ yo⌡ t∩ senΣ onσ o≥ morσ file≤ t∩ thi≤ system

RECVé      Syntax║   REC╓ [-C▌ [<filename>]

REC╓ allow≤ yo⌡ t∩ senΣ onσ o≥ morσ file≤ t∩ thi≤ system« Iµ n∩ filenamσ i≤ ì
giveεá theεá REC╓ assume≤ yo⌡ arσ sendinτ file≤ iε batcΦá modσá (usinτá YA═ ì
batcΦá mode¼á no⌠ thσ batcΦ modσ implementeΣ b∙ somσ MODEM╖ programs)» Notσ ì
tha⌠ TELCO═ implement≤ botΦ form≤ oµ batcΦ mode«á Iµ ß filenamσ i≤ supplieΣ ì
theεá onσá filσ wil∞ bσ receiveΣ b∙ thσ giveε name«á Notσá tha⌠á al∞á file≤ ì
uploadeΣ wil∞ bσ placeΣ iε thσ UPLOAD║á director∙ area«á Wheε thσ syso≡ ha≤ ì
haΣá ß chancσ t∩ makσ surσ thσ filσ i≤ O╦ fo≥ distributioε thσ file(s⌐ wil∞ ì
bσ placeΣ iε thσ NEW║ director∙ wherσ the∙ caε bσ downloadeΣ b∙ othe≥ user≤ ì
oµ thσ system.

Thσá -├á optioεá cause≤á botΦ end≤ t∩ usσ CR├á erro≥á checkinτá insteaΣá iµ ì
CHECKSU═á erro≥á checking«á CR├ erro≥ checkinτ i≤ preferred¼á bu⌠á no⌠á al∞ ì
communication≤ program≤ implemen⌠ CR├ checkinτ (TELCO═ caε usσ either).

Iµ yo⌡ loggeΣ oε a⌠ 120░ bauΣ theε yo⌡ arσ strongl∙ adviseΣ t∩ usσ thσ FLI╨ ì
commanΣá t∩ fli≡ t∩ 75/120░ (usinτ thσ '7º option)«á Iµ yo⌡ don'⌠ theεá yo⌡ ì
wil∞ bσ uploadinτ thσ filσ a⌠ 7╡ baud!

SENDé      Syntax║   SEN─ [-B▌ <afn╛ ...

SEN─á i≤á useΣ t∩ downloaΣ ß filσ froφ thi≤ system«á Iµ ßá singlσá filσá i≤ ì
specifieΣ theε batcΦ modσ wil∞ no⌠ bσ used╗á however¼á ß singlσ filσ caε bσ ì
sen⌠á iε batcΦ modσ b∙ usinτ thσ -┬ option«á A⌠ present¼á onl∙ onσ filσ ma∙ ì
specified╗á yo⌡ canno⌠ usσ batcΦ modσ t∩ senΣ morσ thaε onσ file« Oncσ timσ ì
limit≤ arσ implementeΣ thσ ful∞ batcΦ modσ capabilit∙ wil∞ bσ enabled.

SEN─á firs⌠á check≤ tha⌠ al∞ file≤ specifieΣ exis⌠ anΣá arσá availablσá fo≥ ì
downloading«á Iµá al∞ i≤ O╦ thσ tota∞ transmissioε timσ i≤ displayeΣá alonτ ì
witΦ thσ bauΣ beinτ used« Afte≥ thi≤ SEN─ wil∞ display
     Sendinτ <filename>¼ nε blocks
            or
     Sendinτ iε batcΦ mode
Thi≤ i≤ you≥ signa∞ t∩ star⌠ receivinτ thσ file(s)«á Iµ you'rσ usinτ TELCO═ ì
theε use
     RE├            iµ sendinτ iε batcΦ mode
      or
     RE├ filenamσ   otherwise.è                       PASS DIRECTORY LIST TO BASIC
     Prograφ t∩ pas≤ ß director∙ listinτ t∩ BASIC« Thσ director∙ listinτ i≤ ì
useΣá t∩ creatσ ß BASI├ Men⌡ program«á Prograφ Execution«á Thσ defaul⌠á FC┬ ì
contain≤ thσ ambiguou≤ filσ reference«á Thi≤ i≤ useΣ witΦ CP/═ cal∞ number≤ ì
1╖á anΣá 1╕á t∩á ge⌠ thσ filσ name≤ oµ al∞á file≤á matchinτá thσá ambiguou≤ ì
reference«á Thσá filename≤á s∩ collecteΣ arσ returneΣ t∩ thσ BASI├á callinτ ì
program«á DeleteΣá file≤ arσ no⌠ returned«á Thσ filenamσ i≤ placeΣá iεá thσ ì
firs⌠ strinτ variablσ defined« I⌠ i≤ assumeΣ tha⌠ thi≤ variablσ ha≤ alread∙ ì
beeεá se⌠ u≡ a≤ ß strinτ oµ thσ righ⌠ length«á I⌠ i≤ als∩ assumeΣ tha⌠á thσ ì
BASI├ prograφ ha≤ placeΣ thσ ambiguous filename at address 5ch.

    .z80
main:
    push    af
    push    de
    push    hl
    push    bc
    push    bc    ;save BDOS call number
;            clear rest of FCB
    ld    de,ftype+3
    push    de        ;de
    pop    hl
    inc    de
    ld    bc,22
    ld    (hl),0
    ldir
;    set up buffer address
    ld    de,buffer
    ld    c,26
    call    bdos
    pop    bc        ;retrieve bdos call #
    jr    main3
;    get directory entry
main2:
    ld    c,17        ;get next entry
main3:
    ld    de,fcb
    call    bdos
    or    a        ;does file exist?
    jp    p,found        ;yes
    pop    bc
    ld    bc,-1        ;no, file doesn't exist
    jr    basretn        ;return to caller
found:
;            move entry to basic string
    ld    hl,buffer    ;point to fle buffer
    rlca            ;multiply A by 32
    rlca
    rlca
    rlca
    rlca
    ld    c,a
    ld    b,0
    add    hl,bc        ;point to entry in buffer
    ld    de,7f00h    ;move to table next entry
    ld    a,0e5h        ;check if file deleted
    cp    (hl)
    jr    z,main2        ;yes, try next entry
    inc    hl        ;skip user byteè    ld    b,11
stack1:
    ld    a,(hl)
    ld    (de),a
    inc    hl
    dec    de
    djnz    stack1
    pop    bc
    ld    bc,0        ;valid file found
basretn:
    pop    hl
    pop    de
    pop    af
    ret
ftype    equ    5ch+1+8
fcb    equ    5ch
bdos    equ    5
buffer    equ    $
    end

 LAST MEETING        LAST MEETING        LAST MEETING        LAST MEETING

     Thσ las⌠ meetinτ wa≤ wel∞ attendeΣ a≤ usual« Thσ chairmaε gavσ ß brieµ ì
rundowεá oεá what'≤ ne≈ iε thσ cluΓ anΣ wha⌠ thσ cluΓ i≤ u≡á to«á Therσá i≤ ì
nothinτ mucΦ ne≈ herσ t∩ report.

Iε  keepinτ u≡ witΦ thσ demonstration≤ tha⌠ werσ goinτ oε kep⌠ yo⌡ oε  you≥ ì
toes«  Therσ werσ threσ demo'≤ iε all«  (1)prin⌠ buffer«  (2⌐ thσ  bulletiε ì
board«  (3⌐ 512δ microbee«  Bu⌠ i⌠ seemeΣ likσ Murphy≤ La≈ woulΣ takσ over« ì
Unfortunatel∙á thσ prin⌠ buffe≥ dem∩ didn'⌠ happen¼á anΣ thσ grem- lin≤ haΣ ì
gotteεá int∩á thσ bulletiε board«á Iµ yo⌡ reall∙ wan⌠ t∩ seσá thσá BoarΣá ╔ ì
sugges⌠ tha⌠ yo⌡ comσ alonτ t∩ onσ oµ thσ hacker≤ meeting« A≤ fo≥ thσ prin⌠ ì
buffe≥á ╔ havσ hearΣ oµ ß fe≈ peoplσ wh∩ arσ makinτ theφ u≡ a⌠ thσá moment¼  ì
╔á  can'⌠ commen⌠ oε ho≈ thesσ prin⌠ buffer≤ arσ compareΣ agains⌠ ß spoole≥ ì
prograφ (disδ systems)¼ maybσ someonσ wil∞ le⌠ u≤ al∞ know.

Thσá dem∩á oε thσ 512δ microbeσ wa≤ ver∙ good«á Basicall∙ i⌠ i≤ ßá modifieΣ ì
128δ bee¼  wha⌠ ha≤ beeε donσ i≤ tha⌠ thσ raφ chip≤ havσ beeε replaceΣ witΦ ì
256δ  raφ chip≤ anΣ thσ bio≤ ha≤ beeε rσ writteε t∩ suit«  Thσ modificatioε ì
wa≤  donσ b∙ Pete≥ Broughtoε anΣ hσ saiΣ thσ moΣ cost≤ onl∙ $170«  Thσ  Beσ ì
theε  use≤ thσ addeΣ memor∙ a≤ ß memor∙ drive«

Tradinτá iε thσ  bazaa≥  wa≤ brisδ  bu⌠  thσ tapσ librar∙ wa≤ s∩ slo≈á somσ ì
peoplσ waiteΣ 3░ minute≤  anΣ werσ  onl∙ ╢ place'≤ froφ thσá front¼á  maybσ ì
tha⌠á thσá tapσá librar∙  need≤  ß hanΣ  o≥  ß  ne≈ datßá basσá tha⌠á work≤ ì
faster«   Til∞  nex⌠  meetinτ  regard≤       Malcolm Osborne


                            OOOOPPPSSsss.......

Pleasσá notσ -- oε pagσ 1▓ oµ thσ MarcΦ issuσ oµ Thσ Catche≥ wσ presenteΣ ß ì
MicroworlΣá Basiπá filσ t∩ conver⌠ Wordbeσ file≤ t∩á WordSta≥á files«á Thi≤ ì
listinτ ha≤ tw∩ (2⌐ mistakes« Firstl∙ linσ 19░ shoulΣ read:

00190 OPEN "O",7,N0$

Also line 340 the inverted commas should have no spaces between them.
The right way is "" and the wrong way (as printed) " " Sorry....... ED.
è                     MBUG AUSTRALIA INC. TAPE LIBRARY
                 36 Caringal Ave Doncaster 3108 MAY 1986.

     GAMES              GENERAL PROGRAMS          ADVENTURE GAMES

   J ASTEROIDS          * P ALGEBRA               ADVENTURE LAND
 I   BACGAMMON              AUST                  BLACK FRIDAY
     BRICKS                 COMPAT              * BRINEY DEEP
 I J CHOPPER                COMPOSER BEE        * SWAMP OF EVIL (EVIL)
   J COSMIC                 DECISION MAKER        FRANKENSTEIN
     DEFENDER               EDUPACK1              KIN
     DRAUGHTS               EDUPACK2              KUNG FU
     EMU JOUST              LCG/3D-PLOT           MISSION IMPOSSIBLE
   J GALAXY                 LEAGUE LADDERS        PIRATE
     GHOST MUNCHER          LOGO                  SCHMOO CITY
     GOBBLE/ASTRO           LUCKY DIP             SURVIVE
     GOLF                   MAD LIB
     HURKLE/CRICKET         MATHS RACE            UTILITY PROGRAMS
   J INVADERS             P MAZE4
     KILOPEDE               MORSE               I DEBUGER 16/32k
     KING KONG            I MULTI GRAPHER       I DISEMBLER 16/32k
     LOGIC DICE             PCG GENERATOR         HEXDUMP (inc. source)
     METEOR RESCUE          PCG TUTOR             LOADER v1.1/v1.3
 I J MISSILE                PILOT               I MEMORY DISPLAY 16/32k
   I RECORDS PROGRAM        PSYCHO              I SOURCE GENERATOR
     SKI SLALOM           * P SNOOPY              TRS-BEE/TAPE DOCTOR
     SQUARES/TRIANGLES      SPELLBOUND
     SUBTERRA
     TANKS                  Legend
 I   TARGET                 * = New Program this month
     TERMITE                I = Seperate Instructions Available
     UFO ATTACK             J = Option for Joystick control
                            P = Printer Required

LIBRARY RULES

1.  Library members must be financial members of MBUG AUSTRALIA INC.
2.  Loans are made for a maximum period of 1 calendar month.
3.  A maximum of 5 tapes per member per month can be lent.
4.  Hiring fee is $2 per tape per month.
5.  Loans can be arranged by mail through the above address.
6«á Postagσ withiε Australiß i≤ $▒ fo≥ ▒ o≥ ▓ tape≤ ª $1-5░ fo≥ │ t∩ ╡ tapes.
7.  PLEASE return any instructions supplied with tapes

            SITUATION VACANT

The Position:       Tape librarian.
Qualifications: 
Honesty, Time, Willingness to work. Plenty of room at home (for tapes)
Job description:    (Training given.)
Operatσ Tapσ Librar∙ a⌠ eacΦ Maiε Meetinτ Night«á Maintaiε existinτ Librar∙ ì
anΣ Librar∙ Database«á Increasσ Librar∙ Content≤ (mostl∙ supplieΣ fo≥ you)« ì
Preparσ anΣ answe≥ mai∞ orders«á AttenΣ monthl∙ committeσ meetings« Preparσ ì
Library list for publication (as above).
Renumeration:
Use Club's Disk Microbee if you don't have one of your own.
Applications to:
The President. Mbug Aust Inc. Interviews arranged if required.
Starting date:      June - July 1986 è.. NOTE TO EDITOR - ^PE = BEGIN UNDERLINE; ^PR = END
.. BY Graeme Young, 16 Hillingdon Cres Doncaster 3108, Ph 857 4302.
                 WORDSTAR PATCHES FOR THE C. ITOH PRINTER
                              by Graeme Young

Whilσá thσá C«á ItoΦ 851░ printe≥ i≤ ß ruggeΣ anΣ dependablσá machinσá witΦ ì
abovσá averagσá prin⌠á quality¼á i⌠ lack≤ superscriptinτá anΣá subscriptinτ ì
fonts«á  I⌠á doe≤á havσá ß Greeδ characte≥ se⌠ anΣ thi≤á caεá bσá useΣá fo≥ ì
mathematica∞á formulae╗á thi≤á characte≥ se⌠ als∩ include≤ superscrip⌠á anΣ ì
subscrip⌠ Arabiπ numbers«á  Thσ onl∙ wa∙ t∩ ge⌠ s/s-scriptinτ oµ letter≤ i≤ ì
t∩ causσ ß halµ line-feeΣ iε thσ appropriatσ directioε followeΣ b∙ ß returε ì
t∩á correc⌠ linσ position«á  I⌠ i≤ ver∙ trick∙ t∩ achievσ this¼á bu⌠ i⌠á i≤ ì
possiblσ iµ yo⌡ carr∙ ou⌠ thσ followinτ step≤ wheε installinτ Wordstar.

┴ littlσ playinτ arounΣ witΦ thσ printe≥ patche≤ i≤ necessary«á Thi≤ caε bσ ì
donσá b∙á runninτ WINSTALL.CO═ whicΦ i≤ provideΣ witΦ Wordstar«á  Thσá mos⌠ ì
importan⌠ poin⌠ t∩ appreciatσ i≤ tha⌠ yo⌡ shoulΣ no⌠ bσ misleΣ b∙ thσá namσ ì
giveε t∩ ß printe≥ contro∞ b∙ Wordstar╗á yo⌡ caε changσ i⌠ t∩ anythinτ elsσ ì
yo⌡á likσ anΣ i⌠ wil∞ functioε tha⌠ way«á  Bu⌠ ß warning¼á don'⌠ forge⌠á t∩ ì
notσá thσá ne≈á functioε fo≥ thσ redefineΣ printe≥ control!ùá  ╔á namσá thi≤ ì
specia∞ versioε oµ Wordsta≥ a≤ WSSUPERB.COM.

Printer initialization: Se⌠ t∩ 11Φ 1BΦ 24Φ 1BΦ 45Φ 0░ 0░ 0░ 0░ 0░ 00

Thi≤ put≤ thσ printe≥ iε selec⌠ state¼á pick≤ alphanumeriπ characters¼á anΣ ì
theεá select≤á elitσá (1▓ cpi⌐ pitcΦ a≤ thσ standarΣ pitch«á  Iµá yo⌡á wisΦ ì
anothe≥ standarΣ pitch¼á theε replacσ 1BΦ 45Φ witΦ thσ appropriatσ datßá a≤ ì
listeΣá iε thσ manual«á  Makσ surσ yo⌡ patcΦ standarΣ characte≥ pitcΦ t∩ bσ ì
thσ same¼ seσ below.

Printer deinitialization.  Set to 13h 00 00 00 00 00 00 00 00 00 00

Character Pitch:

Set the alternate character pitch to 1Bh 26h to get GREEK characters.
T∩ choosσ thσ Greeδ characte≥ se⌠ withiε thσ document¼ typσ ^P┴ (notσ yo⌡ ì
have redefined the alternate pitch command to mean alternate character set).

Thσá standarΣá characte≥ pitcΦ shoulΣ bσ 1BΦ 24Φ 1BΦ 45h«á  Thσ 1BΦ 24Φá i≤ ì
necessar∙á t∩á reselec⌠ alphanumeriπ characters«á  1BΦá 45Φá select≤á elitσ ì
pitch«  Iµ yo⌡ wisΦ anothe≥ pitcΦ theε makσ surσ i⌠ i≤ thσ samσ a≤ tha⌠ se⌠ ì
a⌠ printe≥ initialization.

Underlining:

Changσ thσ use≥ patche≤ ┼ anΣ ╥ (i.e« patche≤ #3⌐ t∩ thσ followinτ sincσ ì
Wordsta≥ underlininτ i≤ no⌠ correc⌠ fo≥ thσ C« ItoΦ printer.

Set ^PE to 1Bh 58h  = start underlining
and ^PR to 1Bh 59h  = stop underlining.

Superscripting and subscripting:

This is complicated. If you wish it, then first do the following.
     Carriage roll sequences - rollup 03h 1Bh 72h 0Ah  (^PT)
                             - rolldown 03h 1Bh 66h 0Ah  (^PV)
     User patch #1 - 1Bh 54h 30h 38h  (^PQ)
     User patch #2 - 1Bh 41h 1Bh 66h  (^PW)

     Alternate ribbon - 02h 1Bh 5Bh   (^PY start)
     Standard ribbon  - 02h 1Bh 5Dh   (^PY stop)èYou must then use the following commands to select s/s-scripting.
     START SUBSCRIPTING - ^PY^PQ^PV
     END       "        - ^PV^PW^PY

     START SUPERSCRIPTING - ^PY^PQ^PT
     END         "        - ^PT^PW^PY

Double and bold striking:

During install, indicate that your printer is a non-backspacing printer.

Variation≤á oµá thσá abovσ approacΦ wil∞ allo≈ selectioεá oµá thσá graphic≤ ì
character≤á oµ thσ C«á Itoh«á  Furthermore¼á thσ genera∞ principle≤ caεá bσ ì
applieΣ t∩ an∙ printe≥ whicΦ canno⌠ bσ readil∙ accesseΣ througΦ Wordstar.

                           ~~~~~~~~~~~~~~~~~~~~

                Convert BeeArtistic files into GRSAVE files

                           By David Downs (983)

     Fo≥ al∞ thosσ wh∩ purchaseΣ thσ BeeArtistiπ graphic≤ package¼á herσ i≤ ì
ßá basiπá prograφá t∩ conver⌠ .CO═ file≤ createΣ b∙ BeeArtistiπá int∩á .PI├ ì
file≤ tha⌠ caε bσ useΣ b∙ thσ GRLOA─ commanΣ froφ BASIC.

     T∩á usσá thσ program¼á simpl∙ ente≥ thσ namσ oµ thσá BeeArtistiπá filσ ì
(withou⌠á thσá .CO═ extension⌐ froφ ß director∙ oµ al∞ file≤ oεá thσá disk«  ì
Thσ prograφ wil∞ theε loaΣ thσ filσ int∩ memor∙ a⌠ ß poin⌠ iεá memory¼á anΣ ì
movσá firstl∙ thσ screen¼á theε thσ graphic≤ character≤ t∩ thei≥ respectivσ ì
locations«á  Thσá finisheΣá screeεá i≤ theε saveΣ t∩á disδá witΦá thσá samσ ì
filename¼á bu⌠ witΦ thσ .PI├ extension« File≤ caε theε bσ loadeΣ froφ basiπ ì
thu≤ :

          OPE╬ "Ió ¼ ╢ ¼ "FILENAME.PICó ║ GRLOA─ ╢ ║ CLOS┼ 6


00100 REM  ***************************************************  █▒┤╡▌
00110 REM  ***                                             ***  █▒┤╢▌
00120 REM  ***               COMPIC.MWB                    ***  █▒┤╖▌
00130 REM  ***                                             ***  █▒┤╕▌
00140 REM  ***    A program to convert .COM files created  ***  █▒┤╣▌
00150 REM  ***  by BEEARTISTIC into .PIC files as created  ***  █▒╡░▌
00160 REM  ***  under BASIC by the GRSAVE command.         ***  █▒╡▒▌
00161 REM  ***************************************************  █▒╡▓▌
00170 REM  █▒╡▓▌
00180 REM             By David Downs    13-04-86  █▒╡│▌
00190 REM  █▒╡┤▌
00200 CLS  █▒▒╢▌
00210 DIR  █▒▒┤▌
00220 PRINT  █░││▌
00230 INPUT"Enter filename (without extension)";A0$  █░╡╕▌
00240 A1$=A0$+".com"  █▒▓▓▌
00250 A2$=A0$+".pic"  █▒▓▒▌
00260 LOADM A1$ 4096  █▒▒░▌
00270 FOR I = 6272 TO 7296 : POKE 55168+I , PEEK(I) : NEXTI  █▓▓╣▌
00280 FOR I = 4224 TO 6271 : POKE 59264+I , PEEK(I) : NEXTI  █▓▒╕▌
00290 OPEN "o" , 6 , A2$  █▒││▌
00300 GRSAVE6 : CLOSE6  █▒▒╣▌
00310 RUN  █▒│╖▌è                        FOOTBALL OUTCOME PREDICTOR

                               Pau∞ Shannon

     Wheε ╔ starteΣ m∙ ne≈ teachinτ job¼á ╔ sooε discovereΣ tha⌠ somσ oµ m∙ ì
collegue≤ werσ runninτ ß "foot∙ pool"«  Thσ school'≤ compute≥ wa≤ ß regula≥ ì
participan⌠ iε thσ pool¼á anΣ man∙ oµ thσ othe≥ contestant≤ seemeΣ t∩ enjo∙ ì
comparinτá thei≥ succes≤ witΦ tha⌠ oµ thei≥ silicoε rival«á  Thσ computer'≤ ì
overal∞ succes≤ rate¼á ╔ migh⌠ add¼á wa≤ amazingl∙ closσ t∩ fift∙ pe≥ cent«  ì
Afte≥ severa∞ enquiries¼ ╔ learneΣ tha⌠ onσ oµ thσ poo∞ organiser≤ haΣ beeε ì
flippinτ ß coiε t∩ determinσ thσ "compute≥ predictions".

     ╔á coulΣá no⌠á le⌠á m∙ collegue≤ g∩ oεá predictinτá outcome≤á iεá thi≤ ì
primativσá way¼á s∩á ╔á pu⌠ togethe≥á thσá program¼á FOOTBALL.MWB«á  I⌠á i≤  ì
designeΣá t∩á producσá ß pre-gamσ predictioε oµá thσá weekend'≤á spheroida∞ ì
joviality«á  No⌠á onl∙ wil∞ i⌠ producσ ß ver∙ attractivσá anΣá entertaininτ ì
harΣá cop∙ oµ thσ results¼á i⌠ i≤ ablσ t∩ s∩ witΦ n∩ les≤ accurac∙ thaε thσ ì
coin.

00100 REM Football Predictions  █▒┤╡▌
00110 REM By Paul Shannon  █▒┤╢▌
00120 REM MBUG member 837  █▒┤╖▌
00130 CLS: PRINT TAB20;:UNDERLINE: PRINT "FOOTBALL PREDICTIONS":NORMAL  █░╡┤▌
00140 STRS(2000): DIM N1(12,2),C1(12,3),P1(8,2): REM TEAM NAME, NICKNAME,
      COMMENTS (3)  █░▓╢▌
00150 RESTORE 740: FOR I = 1 TO 12: FOR J = 1 TO 2: READ N1$(I,J):
      NEXT J:NEXT I: FOR I = 1 TO 12: FOR J = 1 TO 3: READ C1$(I,J):
      NEXT J:NEXT I  █▒▓╖▌
00160 GOSUB 990: FOR I=1 TO M: READ M1$: NEXT I  █░╡╣▌
00170 RESTORE 930:FOR I = 64048 TO 64079:READ J: POKE I,J:NEXT I:
      FOR I = 64080 TO 64095: POKE I,0:NEXT I  █░╣╢▌
00180 POKE 257,2:CLS: PRINT "Date: "D" "M1$Y\"Enter the first two letters
      of team name."  █▒▒╖▌
00190 CURS 960: PRINT "Press RETURN twice when ready to print a
      hard copy.";  █░╢╣▌
00200 CURS 52: PRINT "Acceptable":CURS 114: PRINT "Abbreviations:"  █░│▓▌
00210 FOR I = 1 TO 12:CURS 119+I*64:Z7$=N1$(I,1): PRINT Z7$(;1,2):
      NEXT I: POKE 220,111  █░┤┤▌
00220 IF N = 8 THEN 350 ELSE LET N = N + 1  █▓┤░▌
00230 CURS 0,N+3:INPUT""P1$(N,1);: L = LEN(P1$(N,1)): IF L=1:CURS 1,N+3:
      PRINT "  ":GOTO 230  █▒▒░▌
00240 IF L = 0 AND N = 1 THEN 230 ELSE IF L = 0:N = N - 1:GOTO 350  █░│░▌
00250 PRINT " v. ";  █░│╣▌
00260 INPUT""P1$(N,2);: IF LEN (P1$(N,2)) <2: CURS 1,N + 3: PRINT SPC 20:
      CURS 1,N+3: PRINT P1$(N,1)" v. ";:GOTO 260  █▓▒╡▌
00270 B1$ = P1$(N,1): B1$ = B1$(;1,2): FOR I = 1 TO 12: N2$ = N1$(I,1):
      IF B1$ = N2$(;1,2): P1$(N,1) = N1$(I,1): NEXT *I 300  █▓│╕▌
00280 NEXT I  █░│┤▌
00290 CURS 1,N+3: PRINT SPC20;: GOTO 230  █░╡▒▌
00300 B2$ = P1$(N,2): B2$ = B2$(;1,2): IF B1$ = B2$ THEN 290  █▓░│▌
00310 FOR I = 1 TO 12: N2$ = N1$(I,1): IF B2$ = N2$(;1,2): P1$(N,2) =
      N1$(I,1): NEXT *I 330  █▒▓╖▌
00320 NEXT I:GOTO 290  █░┤│▌
00330 CURS 1,N+3: PRINT P1$(N,1)" v. "P1$(N,2) SPC 20: GOTO 220  █▓╡│▌
00340 REM PREDICTIONS START HERE  █▒╡▒▌
00350 CURS 896: PRINT "Please insure that the  PRINT er is connected AND
      on line.";  █▒▓╡▌
00360 POKE 220,220:CURS 960: PRINT "Press SPACE BAR to  PRINT ."SPC32;  █▓│╣▌
00370 Z7$ = KEY: IF Z7$<>" " THEN 370 ELSE CLS: POKE 220,111  █░╢╡▌è00380 CLS:CURS 27,3:UNDERLINE: PRINT "COMPUTER":NORMAL: PRINT TAB21;:
      UNDERLINE: PRINT "FOOTBALL PREDICTIONS":NORMAL  █▓▒╕▌
00390 Y = Y + 1900  █▒▓╕▌
00400 D1$ = STR(D)+" " + M1$ + STR(Y): D1$ = D1$(;2,LEN(D1$)):
      L1 = FLT(LEN(D1$)): PRINT TAB(INT((64-L1)/2))D1$\  █░╡╢▌
00410 FOR I = 1 TO N: GOSUB 960: IF INT(RND*2) = 1 THEN 440  █▓┤╖▌
00420 FOR J = 1 TO 12: IF P1$(I,Q) = N1$(J,1): Z7$ = P1$(I,Q)+" will "
      +C1$(J,INT(RND*3+1)): NEXT *J 460  █░▒╖▌
00430 NEXT J  █░│▓▌
00440 FOR J = 1 TO 12: IF P1$(I,Q) = N1$(J,1): Z7$ = N1$(J,2)+" will "+
      C1$(J,INT(RND*3+1)): NEXT *J 460  █▓┤│▌
00450 NEXT J  █░│┤▌
00460 FOR J = 1 TO 12: IF P1$(I,R)=N1$(J,1): Z7$=Z7$+" " + N1$(J,R)+".":
      NEXT *J 480  █▓╡░▌
00470 NEXT J  █░│╢▌
00480 L1 = FLT(LEN(Z7$)): PRINT TAB(INT((65-L1)/2))Z7$  █░▓╡▌
00490 NEXT I  █░│╖▌
00500 CURS 0: PCG: FOR I = 1 TO 21: PRINT "#$%";: NEXT I  █▒░┤▌
00510 FOR I = 1 TO 14:CURS 1,I: PRINT "#$%": CURS 61,I: PRINT "#$%":
      NEXT I  █░╣▓▌
00520 FOR I = 1 TO 21: PRINT "#$%";: NEXT I: NORMAL  █▒╖╕▌
00530 POKE 257,0:OUTL#1:REM Parallel  PRINTer  █▓░╡▌
00540 REM Screen Dump  █▒╡│▌
00550 DATA  62,01,211,11  █▓┤╖▌
00560 DATA  96,105,14,128,229,6,8,203,34,126,161  █▒╖░▌
00570 DATA  40,2,203,194,35,16,245,122,205,69,128  █▓▒╡▌
00580 DATA  225,203,57,48,233  █░░╡▌
00590 DATA  62,0,211,11  █▓░▓▌
00600 DATA  201,-1  █▓░╡▌
00610 X = 336: RESTORE 550  █▒╣▓▌
00620 READ Y: IF Y = - 1 THEN 640  █▒┤╖▌
00630 POKE X,Y : X = X + 1: GOTO 620  █░╡▒▌
00640 L PRINT CHR(27);"A";CHR(8);  █▒╢╢▌
00650 FOR Y = 0 TO 15  █░╕▒▌
00660 FOR U = 0 TO 8 STEP 8  █▒┤╕▌
00670 L PRINT CHR(27);"K";CHR(0);CHR(2);  █░╖░▌
00680 FOR X = 0 TO 63: C = USR(336,61440 + U + 16 * PEEK(61440+Y*64+X)):
      NEXT X  █░╢│▌
00690 L PRINT CHR(10);  █░╢╢▌
00700 NEXT U  █░┤│▌
00710 NEXT Y  █░┤╕▌
00720 L PRINT CHR(27);"2";CHR(7);  █▒┤╣▌
00730 END  █▒▒│▌
00740 DATA "CARLTON","THE BLUES","COLLINGWOOD","THE MAGPIES","ESSENDON"  █▒╖╡▌
00750 DATA "THE BOMBERS","FITZROY","THE LIONS","FOOTSCRAY",
      "THE BULLDOGS"  █░╡╖▌
00760 DATA "GEELONG","THE CATS","HAWTHORN","THE HAWKS","MELBOURNE",
      "THE DEMONS"  █░╕▓▌
00770 DATA "NORTH MELBOURNE","THE KANGAROOS","RICHMOND","THE TIGERS"  █░░╣▌
00780 DATA "ST. KILDA","THE SAINTS","SYDNEY","THE SWANS"  █▒│▒▌
00790 DATA "shine over","sing the blues for","out class"  █▒▒╡▌
00800 DATA "claw","ruffle the feathers of","peck"  █▒╖▓▌
00810 DATA "destroy","blast","annihilate"  █░╕┤▌
00820 DATA "break the pride of","dismember","be kings over"  █▓╡┤▌
00830 DATA "bite the ankles of","snarl at","fight to the death over"  █▓▓▓▌
00840 DATA "scratch","purr to victory over","lap up"  █▒╕╕▌
00850 DATA "pick the eyes of","swoop down upon","fly past"  █▓▓╖▌
00860 DATA "create hell FOR ","breathe fire into","bedevil"  █▓┤▓▌
00870 DATA "hop all over","leap over","out pace"  █░╖▓▌è00880 DATA "mangle","kill","eat"  █▒╡▓▌
00890 DATA "rise to victory over","march over","pray over the graves of" █▒▓╢▌
00900 DATA "fly past","sail past","make ugly ducklings of"  █▓┤│▌
00910 DATA "January","February","March","April","May","June"  █▒╡╕▌
00920 DATA "July","August","September","October","November","December"  █▒┤┤▌
00930 DATA 7,29,50,50,100,100,196,200,200,200,200,200,100,100,57,15  █░╖░▌
00940 DATA 248,108,22,19,19,19,19,19,35,35,35,70,70,140,56,224  █▒╡░▌
00950 REM R AND OM NUMBER  █▒╡╕▌
00960 R=INT(RND*2+1): Q = 3 - R  █▒▓╕▌
00970 S=INT(RND*2+1): T = 3 - S: RETURN  █▒╢░▌
00980 REM **Date**  █▒╢▒▌
00990 CURS 461: PRINT "Enter the Date: DD/MM/YY":CURS 476  █▒│┤▌
01000 PRINT " ";:Z6$ = "" : FOR I = 1 TO 3: FOR J = 1 TO 2  █▒╡▓▌
01010 Z7$=KEY:IF Z7$< "0" OR Z7$> "9" THEN 1010  █▓░╡▌
01020 PRINT Z7$;: Z6$ = Z6$+Z7$: NEXT J  █▒╣┤▌
01030 IF I<3:Z6$=Z6$+"/": PRINT "/";  █▓╡│▌
01040 NEXT I  █░╖╖▌
01050 D=INT(VAL(Z6$(;1,2))):M=INT(VAL(Z6$(;4,5))):
      Y=INT(VAL(Z6$(;7,8)))  █▒╖░▌
01060 IF D>0 AND D<32 AND M>0 AND M<13 AND Y>80 AND Y<99:RETURN  █▓▒▓▌
01070 POKE 220,220:CURS 960: PRINT "INVALID DATE";:PLAY23;0,16:CURS 960:
      PRINT SPC20: POKE 220,111:GOTO 990  █▒┤╣▌



                          BEGINNERS  BASIC GROUP

     ╔ aφ interesteΣ iε forminτ ß smal∞ grou≡ oµ beginne≥ basiπ programmer≤ ì
t∩á ge⌠á togethe≥á eacΦ meetinτ night«á Thσ aiφ woulΣ bσá t∩á providσá somσ ì
instructioεá t∩á thosσ wh∩ wan⌠ it¼á anΣ t∩ exchangσ idea≤ anΣá method≤á oµ ì
programming«á ╔á aφ no⌠ aε exper⌠ programmer¼á bu⌠ havσ beeε programminτ m∙ ì
Microbeσ lonτ enougΦ no≈ t∩ bσ awarσ oµ man∙ oµ thσ traps«á ╔ wil∞ brinτ m∙ ì
BE┼ along¼á anΣ other≤ woulΣ bσ useful¼á althougΦ quitσ likel∙ mos⌠ oµá ou≥ ì
timσ wσ woulΣ usσ penci∞ anΣ paper.

     ╔á thinδ tha⌠ thσ likel∙ forma⌠ i≤ t∩ takσ ß subjec⌠ eacΦá month¼á anΣ ì
spenΣá halµá aεá hou≥ o≥ s∩ oε that¼á theε spenΣ anothe≥ halµá aεá hou≥á oε ì
genera∞á discussioεá anΣá problems«á ╔ sugges⌠ thσá followinτá a≤á possiblσ ì
topics:

Error handling      Menus               Data input and recording
Graphics            Variables           Using machine code

╔á hopσá t∩ ge⌠ somσ feedbacδ abou⌠ thi≤ ideß nex⌠á meeting¼á anΣá possibl∙ ì
star⌠á thσ followinτ one«á Belo≈ i≤ thσ onσ oµ thσ sort≤ oµ problem≤ wσ ma∙ ì
be able to help you with.

     ╔ happenneΣ oε ß curiou≤ littlσ buτ iε basiπ 6.2▓ recently«á I⌠ occur≤ ì
wheε tryinτ t∩ plo⌠ q,≤ t∩ p,s¼ o≥ similar¼ wheε thσ worΣ "STOPó i≤ formed« ì
Puttinτ ß spacσ beforσ T╧ overcome≤ thσ problem.

00100 CLS:HIRES
00110 P=10:Q=100:S=150
00111 REM   q,s-------p,s
00120 PLOT Q,STOP,S:rem     this doesn't work
00130 REM PLOT Q,S TOP,S:rem this one will
00150 END
                              Russell Crosser
è                          WORDBEE  MODIFICATIONS 1
;
;  Listing 1 which implements additional dot commands for
;  printing enhancements using Alpha-80 or similar.
;
    DEFR    16
LINE    EQU    0CC6EH    ;  Line space, Left margin, etc
HEAD    EQU    0CCE1H    ;  Page header
PAGE    EQU    0CCA9H    ;  Page number, length, gap
CRLF    EQU    0CD04H    ;  Line feed suppression (.ZN)
ES    EQU    0CD14H    ;  .ES
    ORG    0CBDCH    ;  Where the existing test routine is located
CJUST    CP    'J'    ;  .JY ?
    JR    Z,JUST
CNEW    CP    'N'    ;  .NP ?
    JR    Z,NEW
CLINE    CP    'L'    ;  .LS#xx, .LM#xx, .LL#xx ?
    JP    Z,LINE
; To add a .LH letterhead, amend line 210 to read JP Z,LHEAD - refer text
CHEAD    CP    'H'    ;  .HE ?
    JP    Z,HEAD
CPAGE    CP    'P'    ;  .PN#xx ?
    JP    Z,PAGE
CCRLF    CP    'Z'    ;  .ZN ?
    JP    Z,CRLF
CUNDR    CP    'U'    ;  Underline ?
    JR    Z,UNDR
CITAL    CP    'I'    ;  Italics ?
    JR    Z,ITAL
CEMPH    CP    'M'    ;  eMphasised ?
    JR    Z,EMPH
CDUBL    CP    'D'    ;  Double strike ?
    JR    Z,DUBL
;
    JP    CFORM    ;  Tests are continued at another location ( C039 )
;
    NOP        ;  a few spare bytes
    NOP
    NOP
CONTIN    POP    HL    ;  an unchanged part of the original program @ CC0E
    LD    (0521H),IY  ; put back pointer
    RET        ; to the normal printing routine
;
JUST    LD    A,(IY+2)    ;  Get the next char
    CP    'Y'        ; is it .JY ?
    JR    Z,JY        ; if yes
    XOR    A        ; else it must be .JN
JY      LD    (0512H),A   ; flag for Justify ( 0 if no )
    RET
; The justify routine has been shortened by deleting the test for .JN
; assuming it must be, if it was not a .JY
NEW    LD    A,(IY+2)  ; Get next char
    CP    'P'      ; .NP ?
    JR    NZ,CONTIN ; if no then the test failed
    JP    0CA0EH    ; the .NP routine has not changed
;
ITAL    LD    A,(IY+2)  ; Get next char
    LD    B,34H      ; ESC 34 turns italics on
è; The following short OUT routine sends ESC and the
; contents of B to the print routine if YES or else
; the B register is increased by 1 before sending
SOUT    CP    'Y'      ; is char 'Y' in register A ?
    JR    Z,PRINT   ; if yes
    INC    B      ; else increase B register
    JR    PRINT      ; and then send it
;
EMPH    LD    A,(IY+2)  ; Get next char
    LD    B,45H      ; eMphasised on is ESC 45
    JR    SOUT      ; use same routine as italics
;
DUBL    LD    A,(IY+2)  ; Get next char
    LD    B,47H       ; Double on is ESC 47
    JR    SOUT      ; as above, increases B for no
;
PRINT    LD    A,1BH      ; the ESC char
    CALL    0CD54H      ; actually send it to printer
    LD    A,B      ; ready to send contents of B
PRINT2    CALL    0CD54H      ; send that to printer too
    RET  ; printer codes have now been sent, continue
PRINT3    LD    B,C      ; if there are more codes to go
    JR    PRINT      ; send them too
;
BIG    LD    A,(IY+2)  ; Get next char
    LD    BC,5701H  ; ESC 57 1 for on, ESC 57 0 off
    JR    LOUT      ; a longer OUT routine below
;
UNDR    LD    A,(IY+2)  ; Get next char
    LD    BC,2D01H  ; ESC 2D 1 - on, ESC 2D 0 - off
;
; This longer OUT routine sends (if yes) ESC, contents
; of B, contents of C.   If no, C is decreased by 1.
;
LOUT    CP    'Y'      ; is it yes ?
    JR    Z,LPRINT  ; if yes, print ESC, (B), (C)
    DEC    C      ; must be no, decrease C
LPRINT    CALL    PRINT      ; print ESC, (B)
    LD    A,C      ; ready with next code
    JR    PRINT2      ; now print that too
;
    NOP
    NOP
    NOP
    NOP
;
;
;
    ORG    0C017    ; The start of 'Checking . . .
;
    CALL    0C1C8    ; switches on parallel port
    LD    A,2    ; but is no longer required
    LD    (00E3),A ; as parallel is now default.
;
; The next part is just a copy of C057 - C068 which has
; in effect been moved to C01F
;
    LD    HL,0500
    LD    A,(HL)è    CP    55
    JP    Z,0C1D5    ; Top of file
    LD    (HL),55
    LD    B,0E1
AGAIN    INC    HL
    LD    (HL),0
    DJNZ    AGAIN
    JP    0C069    ; which used to follow this
; a few NOPs to fill a hole
    NOP
    NOP
    NOP
    NOP
    NOP
;
CFORM    CP    'F'    ; Form feed ?
    JR    NZ,CCOND
    LD    A,0CH    ; FF character
    CALL    0CD54    ; send it to printer
    RET        ; finished
;
CCOND    CP    'C'    ; Condensed ?
    JR    Z,COND
CSUBP    CP    'S'    ; Subscript or Superscript ?
    JP    Z,SUBP
CES    CP    'E'    ; .ES command ?
    JP    Z,ES
CBIG    CP    'B'    ; Big (enlarged) ?
    JP    Z,BIG
; No more tests, so must have been a wrong command.
    JP    CONTIN    ; Continue on with printing
;
COND    LD    A,(IY+2)  ; Get next char
    CP    'Y'      ; is it .CY ?
    LD    A,0FH      ; it may be
    JR    Z,CONOUT  ; if it was
    LD    A,12      ; must be no
CONOUT    JP    0CD54 ; send char 0F for yes or 12 for no
    NOP
    NOP        ; a few more gaps
;
; Out of space so jump to another hole
;
    ORG    0C138    ; Where 'Are you sure' used to be
;
SUBP    LD    A,(IY+2)  ; Get next char
    LD    BC,5301      ; Subscript perhaps
    CP    'B'      ; is it ?
    JR    Z,SUB      ; if so
    CP    'P'      ; suPerscript ?
    JR    Z,SUPER      ; if correct
    LD    BC,4854      ; must be a cancellation
    CALL    PRINT      ; to send ESC (B)
    JP    PRINT3      ; to send ESC (C)
SUPER    DEC    C      ; change BC to 5300
SUB    JP    LPRINT      ; which sends ESC (B) (C)
; Note how the contents of BC vary for each condition.
;
    END          ; of listing 1è                         WORDBEE  MODIFICATIONS 2   

;  Listing 2 which enables the additional printer dot
;  commands to be utilised mid-line with a '\' trip.

    DEFR    16
UNDR    EQU    0CC5CH ;  Note the different EQU labels
ITAL    EQU    0CC2DH ;  compared to listing 1.  In each
EMPH    EQU    0CC39H ;  case the address jumps into the
DUBL    EQU    0CC40H ;  routine just after the command:
COND    EQU    0C05AH ;      LD    A,(IY+2)
BIG    EQU    0CC54H ;  If you study the code below,
SUBP    EQU    0C13BH ;  will see we load the A register
PRINT    EQU    0CD54H ;  before jumping to the address.
    ORG    0CA96H ;  All printing goes to here.

START    CP    '\'    ;  Is this char a slosh ?
    JP    NZ,PRINT;  If not, just print it.
    DEC    C    ;  Adjust line length
    LD    A,(HL)    ;  Get next char
    AND    0DFH    ;  Convert to upper case
    LD    (HL),A    ;  and put it back
    INC    HL    ;  Ready for next char
    PUSH    BC    ;  Save reg
    CALL    FIRST    ;  Test for each attribute
    POP    BC    ;  Restore reg
    RET    ; To program for next character to print.
    ORG    0DF28    ;  Where there is now space

;  Each possibility is tested until one is found:

FIRST    CP    'U'    ;  underline ?
    JR    NZ,NXT1    ;  if not underline
    LD    A,(547)    ;  get switch
    XOR    1H    ;  change switch pointer
    BIT    0,A    ;  test for on or off
    LD    (547),A    ;  save it again
    JR    Z,UNDOUT;  if 0, switch underline off
    LD    A,'Y'    ;  switch underline on
UNDOUT    JP    UNDR    ;  to where A is tested for 'Y'

NXT1    CP    'I'    ;  italics ?
    JR    NZ,NXT2    ;
    LD    A,(547)    ;  Each one is the same as above
    XOR    2H    ;
    BIT    1,A
    LD    (547),A
    JR    Z,ITOUT
    LD    A,'Y'
ITOUT    JP    ITAL
NXT2    CP    'M'    ;  emphasised ?
    JR    NZ,NXT3
    LD    A,(547)
    XOR    4H
    BIT    2,A
    LD    (547),A
    JR    Z,EMPOUT
    LD    A,'Y'
EMPOUT    JP    EMPHèNXT3    CP    'D'    ;  double ?
    JR    NZ,NXT4
    LD    A,(547)
    XOR    8H
    BIT    3,A
    LD    (547),A
    JR    Z,DBLOUT
    LD    A,'Y'
DBLOUT    JP    DUBL
NXT4    CP    'C'    ;  condensed ?
    JR    NZ,NXT5
    LD    A,(547)
    XOR    10H
    BIT    4,A
    LD    (547),A
    JR    Z,CONOUT
    LD    A,'Y'
CONOUT    JP    COND
NXT5    CP    'B'    ;  BIG ?
    JR    NZ,NXT6
    LD    A,(547)
    XOR    20H
    BIT    5,A
    LD    (547),A
    JR    Z,BIGOUT
    LD    A,'Y'
BIGOUT    JP    BIG
NXT6    CP    ']'    ;  new identifier for SUBscript !
    JR    NZ,NXT7
    LD    A,(547)
    XOR    40H
    BIT    6,A
    LD    (547),A
    JR    Z,SBPOUT
    LD    A,'B'

SBPOUT    JP    SUBP
NXT7    CP    '^'    ;  new ident for SUPERscript !
    JR    NZ,LAST    ; It was none of above, so . .
    LD    A,(547)
    XOR    80H
    BIT    7,A
    LD    (547),A
    JR    Z,SBPOUT
    LD    A,'P'
    JR    SBPOUT
LAST    POP    DE    ;  This routine restores all
    POP    BC    ;  pointers, registers, etc
    INC    C
    PUSH    BC
    PUSH    DE
    DEC    HL
    BIT    6,(HL)
    JR    NZ,OUT
    SET    5,(HL)
OUT    LD    A,'\'    ;  Back to where we started
    JP    PRINT

    ENDè     Thi≤ informatioε wa≤ madσ availablσ b∙ Microbeσ System≤ LimiteΣ a⌠ thσ ì
P.├á 8╢ iε Sydney«á I⌠ i≤ quitσ possiblσ tha⌠ thesσ ne≈ release≤ wil∞ bσ oε ì
show at the Melbourne P.C. 86 coming up soon. . ED.

                            Microbeσ Digi-Scan

     Thσ Microbeσ Digi-Scaε i≤ ß lo≈ cos⌠ digitize≥ whicΦ wil∞ bσ offereΣ ì
a≤á aεá upgradσ fo≥ ou≥ norma∞ DP-80¼á DP-10░ anΣ NL╤ do⌠ matri°á printers« ì
Thi≤á upgradσá caεá bσá performeΣ a⌠á an∙á M.S«á Centre«á I⌠á involve≤á thσ ì
installatioεá oµá ß mechanica∞ anΣ  circui⌠ modulσ ont∩ thσá printe≥á whicΦ ì
wil∞á allo≈ thσ printe≥ t∩ bσ flexiblσ enougΦ t∩ suppor⌠ ß higΦá resolutioε ì
infra-reΣ optica∞ scanne≥ iε placσ oµ thσ printe≥ heaΣ wheneve≥ thσ printe≥ ì
i≤ requireΣ t∩ bσ useΣ a≤ ß digitizer.

     Microbeσá Digi-Scaεá work≤á oε thσ `Wha⌠ yo⌡ seσá i≤á wha⌠á yo⌡á get!º ì
concept«á  Digitizinτ ß picturσ i≤ simple¼á al∞ yo⌡ havσ t∩ d∩ i≤ slidσ thσ ì
picturσ unde≥ thσ printe≥ carriagσ anΣ ruε thσ Digi-Scaε software« Thσ DigΘ ì
scaε ha≤ 3▓ intensit∙ levels¼ s∩ thσ use≥ caε adjus⌠ high/lo≈ contrast≤ anΣ ì
determinσá setting≤á oµ gre∙ scale≤ oε thσ picture«á Thesσ gre∙ scale≤á arσ ì
theεá translateΣá a≤ pattern≤ oε thσ Microbeσ screen«á  Thesσá image≤á wil∞ ì
appea≥ oε thσ screeε a≤ thσ Microbeσ Digi-Scaε scanninτ heaΣ glide≤ througΦ ì
thσ picture¼ thi≤ imagσ caε theε bσ saveΣ ont∩ disδ t∩ bσ editeΣ b∙ anothe≥ ì
graphic≤ edito≥ likσ Electriπ Paintbrush«

     Thσá extensivσá Digi-Scaεá softwarσ supplieΣ iεá thσá upgradσá packagσ ì
allow≤á user≤ t∩ adjus⌠ thσ vertica∞ squashinτ anΣ stretchinτ facto≥ oµ thσ ì
picture«á  │ level≤ oµ resolutioε (High¼ Mediuφ anΣ Low⌐ caε bσ adjusteΣ b∙ ì
thσá user«á Thi≤á wil∞á allo≈ thσ use≥ t∩ scaε differen⌠á sizσá image≤á anΣ ì
displa∙ tha⌠ informatioε oε thσ entirσ Microbeσ Premium screen«  Image≤ caε ì
theεá bσá saveΣ eithe≥ a≤ onσ filσ o≥ multiplσ image≤ bσ saveΣ oεá ßá file«  ì
Thσá purposσ oµ multiplσ file≤ i≤ t∩ displa∙ thosσ image≤ iε ß slidσá show«  ì
Naturally¼ adjustment≤ oµ high/lo≈ contrast≤ anΣ determintoε oµ gre∙ level≤ ì
caε bσ se⌠ iε thi≤ softwarσ itself.

     Thesσ image≤ caε theε bσ printeΣ bacδ oε paper«  Al∞ yo⌡ havσ t∩ d∩ i≤ ì
removσ thσ scanninτ heaΣ froφ thσ printe≥ anΣ instal∞ yo⌡ printe≥ heaΣ bacδ ì
on«

Thi≤ upgradσ ki⌠ consist≤ of:

¬   Installatioε oµ digitize≥ modulσ ont∩ printe≥ a⌠ an∙ M.S« Centre.
¬   ┴ HigΦ Resolutioε Infra-ReΣ Optica∞ Scanninτ head.
¬   Microbeσ Digi-Scaε softwarσ oε disk.
¬   Completσ Use≥ anΣ Genera∞ Informatioε Manual.

     Thσ price≤ arσ ye⌠ t∩ bσ determineΣ bu⌠ i⌠ shoulΣ bσ availablσ fo≥ ì
arounΣ $200« Require≤ singlσ disδ drivσ Microbeσ Premium witΦ 64δ memory.

                Microbeσ ChalkboarΣ anΣ Electriπ PaintbrusΦ

                           Microbeσ Chalkboard.

     Thσ Microbeσ ChalkboarΣ i≤ ß toucΦ sensitivσ drawinτ paΣ designeΣá fo≥ ì
graphiπá inpu⌠á anΣ fo≥ younτ childreε wh∩ canno⌠ usσ thσ keyboarΣá easily«  ì
Thσá paΣá provide≤á ß 30cφ ° 30cφ drawinτ areß anΣ i≤ caseΣá iεá tougΦá AB╙ ì
plastic«á  Thσ drawinτ areß i≤ designeΣ t∩ bσ covereΣ b∙ ß clip-iεá overla∙ ì
tha⌠á show≤á thσá positioεá oµ area≤ oε thσ paΣá useΣá t∩á contro∞á certaiε ì
function≤ oε thσ prograφ beinτ used«á  EacΦ prograφ fo≥ thσ chalkboarΣ wil∞ ì
comσ packageΣ witΦ aε overlay.è                            Electriπ Paintbrush

     Electriπá PaintbrusΦ i≤ aε onscreeε paintinτ packagσ fo≥ thσá Microbeσ ì
Premiumá serie≤á compute≥á witΦá a⌠á leas⌠ 64δ anΣá ßá singlσá disδá drive«  ì
Electriπ PaintbrusΦ provide≤ ß graphic≤ orienteΣ use≥ interfacσ witΦ "pull-ì
downó menu≤ anΣ on-screeε too∞ anΣ patterε selection«á  I⌠ i≤ simplσ t∩ usσ ì
anΣ powerful¼ providinτ sucΦ feature≤ as:-


¬    Ful∞ A┤ pagσ fo≥ drawing¼ oµ whicΦ ß smal∞ "windowó i≤ showε a⌠ once.
¬    FreehanΣ drawinτ witΦ ß penci∞ anΣ multiplσ brusΦ tools.
¬    Patterε selectioε fo≥ brusΦ drawinτ anΣ areß fill.
¬    Oval¼ rectanglσ anΣ linσ drawinτ tool≤ tha⌠ stretcΦ a≤ yo⌡ movσ ß      ì
     poin⌠ oε thσ chalkboarΣ fo≥ accuratσ positioning.
¬    Multiplσ erase≥ shapes.
¬    Cu⌠ anΣ pastσ facilit∙ witΦ invert¼ fli≡ anΣ rotate.
¬    Pixe∞ editinτ fo≥ finσ details.
¬    Tex⌠ labellinτ witΦ multiplσ typσ style.
¬    Picturσ filσ compatibilit∙ witΦ MacPain⌠  (cablσ requireΣ fo≥ linδ      ì
     betweeε MacintosΦ anΣ Microbee).


Pricinτ anΣ Availability

     Thσ Microbeσ ChalkboarΣ bundleΣ witΦ thσ Electriπ PaintbrusΦá softwarσ ì
wil∞á bσ priceΣ a⌠ arounΣ $15░ (exac⌠ pricσ subjec⌠ t∩ change⌐ anΣ wil∞á bσ ì
availablσ b∙ earl∙ Ma∙ througΦ al∞ Microbeσ outlets.


$$ FOR SALE $$ FOR SALE $$ FOR SALE $$

                   MITSUBISHI MF353┴  3.5" DISK DRIVES.

     I≤á anyonσ interesteΣ iε thσ purchasinτ oµ ß 3.5ó doublσ sideΣá doublσ ì
densit∙ disδ drive┐á Thσ drive≤ arσ branΣ ne≈ MitsubishΘ MF353┴ (lo≈ power⌐ ì
disδá drive≤ (▒ Meτ unformatted)«á Thσ price¼á iµ wσ caε ge⌠ aε orde≥ fo≥ ß ì
minimuφ oµ 1░ drives¼á i≤ $19▓ inc«á tax« Thσ purchasσ oµ thesσ drive≤ wil∞ ì
bσá donσ througΦ thσ cluΓ a≤ ß servicσ t∩ it≤ members«á Therσ i≤ n∩á profi⌠ ì
fo≥ thσ cluΓ o≥ myself« Wσ arσ intendinτ t∩ purchasσ drive≤ arounΣ thσ 15tΦ ì
o≥ 16tΦ oµ Ma∙ (afte≥ thσ nex⌠ cluΓ meeting)«á Thσ CATCH¼á yo⌡ neeΣ t∩á pa∙ ì
beforσ purchase« ╔ caε bσ contacteΣ eithe≥ a⌠ thσ nex⌠ cluΓ meetinτ o≥ a.h« ì
459-8765«           RoΣ Egan.

$$ FOR SALE $$ FOR SALE $$ FOR SALE $$

Half-megabytσá (512k⌐ upgradσ fo≥ standarΣ 128δ Microbees«á Imaginσ ßá 414δ ì
memor∙ disk¼á o≥ beinτ ablσ t∩ usσ thσ compute≥ witΦ n∩ disk≤ a⌠ all!íá Seσ ì
mσ a⌠ thσ meeting≤ o≥ CONTAC╘ Pete≥ Broughtoε 347-8114(A/H⌐ COS╘ onl∙ $170.

$$ FOR SALE $$ FOR SALE $$ FOR SALE $$

?? HELP   ??   HELP    ??    HELP    ??
DBaseII. (2.41)  In a 128k system
Q1.  How do you change the cursor shape/format. How do you make it flash?
Q2.  How can you default to uppercase by POKE X,Y
     ie. Is there an appropriate memory location in DBaseII.
L. DUNN   792 - 2038 (a/h)     797 - 4968 (b/h)

?? HELP   ??   HELP    ??    HELP    ??è                VIATEL without Upgrade   by PETER BROUGHTON

Microbeσá viate∞á softwarσá caεá bσ useΣ oε ß 'beσ withou⌠ aεá U/╟á iµá thσ ì
followinτ mod≤ arσ made« Thσ VIATE╠ displa∙ look≤ ß bi⌠ smal∞ iε thσ middlσ ì
oµ thσ screen

A>ddt viatel.com              |    1420 35 6b
DDT VERS 2.2                  |    1421 28
NEXT  PC                      |    1422 2B 59
1500 0100                     |    1423 37.
-s1420                        |    -g0
                              |    A>save 20 viateln.com

?? HELP   ??  DREAMDISK  ??    HELP  ??

Q1.  Could someone tell me how to copy an eprom from my ETI668 to disk?
Q2«  Caε anyonσ suppl∙ mσ witΦ ß Publiπ Domaiε Prograφ tha⌠ wil∞ le⌠ mσ se⌠ ì
     bauΣá rates┐á ╔ wan⌠ t∩ communicatσ witΦ ß litlσ biτ board¼á usinτ thσ ì
     (Dreamdisk) Beσ a≤ ß terminal?

                 Contact R. Shepherd. Phone (A/H) 401-3072

Q. Has anyone Assembled & implemented ZCPR 3?   Please call the Sysop

?? HELP   ??  DREAMDISK  ??    HELP  ??

                   TAPE LIBRARY SECURITY DEPOSIT REFUNDS

A≤á oµá 1s⌠ MarcΦ 198╢ tapσ securit∙ deposit≤ ended«á Thosσ peoplσá wishinτ ì
refund≤ mus⌠ appl∙ oε thσ followinτ form« Thσ refunΣ wil∞ bσ iε thσ forφ oµ ì
ßá credi⌠ notσ tha⌠ ma∙ bσ useΣ t∩ hirσ  morσá tapes«á Credi⌠á application≤ ì
wil∞á no⌠á bσ accepteΣ afte≥ 25tΦ JUN┼ 1986«á Thσ followinτ forφ i≤á t∩á bσ ì
validateΣá b∙á thσ membershi≡ secretar∙ o≥ treasure≥ beforσ 25tΦ JUN┼á 198╢ ì
anΣ wil∞ bσ availablσ fo≥ tapσ hirinτ purpose≤ unti∞ 30tΦ JUN┼ 1987.

Thesσá credi⌠á note≤ wil∞ allo≈ yo⌡ t∩ hirσ ß tota∞ oµ fivσ (5⌐ tape≤á froφ ì
thσ librar∙ oε tw∩ separatσ occasions«

    CREDIT APPLICATION FORM

NAME.........................      |         NAME.........................
                                   |
MEMBER NUMBER................      |         MEMBER NUMBER................
                                   |
RECEIPT NUMBER...............      |         RECEIPT NUMBER...............
                                   |
DATE OF CREDIT...............      |         DATE OF CREDIT...............
                                   |
AUTHORIZED...................      |         AUTHORIZED...................
                                   |
DATE OF HIRE.................      |         DATE OF HIRE.................
                                   |
NUMBER OF TAPES...2....3.....      |         NUMBER OF TAPES...2....3.....
                                   |
TAPE LIBRARIAN...............      |         TAPE LIBRARIAN...............

Wheε fillinτ ou⌠ thi≤ forφ pleasσ inser⌠ onl∙ you≥ NAME¼á MEMBE╥ NUMBE╥ anΣ ì
TAP┼ RECEIP╘ NUMBE╥ iµ known« Iµ yo⌡ wisΦ thσ credi⌠ notσ t∩ bσ returneΣ b∙ ì
                 mail please supply an envelope and stamp.è*** BAZAAR SALES *** BAZAAR SALES *** 


      CODE DESCRIPTION                                  PRICE     CODE DESCRIPTION                                  PRICE
                 "The Catcher"
      BC02 Volume 2 (Oct.83-Sept.84)                    $15.00    CS30 Blank C-30 Cassettes                         $ 1.50
      BC03 Volume 3 (Oct.84-Sept.85)                    $15.00    CB30 Blank C-30 Cassettes (20 per box)            $25.00
      TC01 Back Issues (single)                         $ 1.50    DDS5 Blank 5.25" Disks (Xidex DSDD)               $ 4.00
      TC02 Back Issues (Vol 2 Nos. 6/7)                 $ 3.00    DDB5 Blank 5.25" Disks (10 per box)               $35.00
                                                                  SDS│ Blanδ 3.5ó Disk≤ (FUJ╔ SSDD⌐                 $ 7.00
      WCO┤á WILDCARD╙á ┤                                $13.0░á   SDB│áBlanδ 3.5ó Disk≤ (1░ pe≥ box⌐                $60.00
      BB0▒á Basiπá fo≥á Beginner≤ (D.Kenny⌐á            $15.0░á   SDB5 Blank 5.25" Disks(Precision SSDD)Box of 10   $22.00
      DC01 Dust Covers for 'BEE                         $ 6.00
      MB0▒ Magazinσ Binder≤ (fo≥ onlinσ etc.⌐           ñ 7.0░    DB3╢ Disδ Storagσ Bo° 3.5ó (Lockable¼ hold≤ 60⌐   $25.00
      PR8░ Carboε Printe≥ Ribboε                                  DB3┤ Disδ Storagσ Bo° 3.╡  (hold≤ 35⌐             $18.00
                (suit xyz.80/100 printers)              $ 8.00    DB51 Disk Storage Box 5.25" (Lockable, holds 100) $18.00
    **PP05 500 sheets cont. printer paper                         DB57 Disk Storage Box 5.25" (holds 70)            $15.00
            (240mm wide, micro-perforations,2.5Kg)      $11.00    DB51 Disk Library Box 5.25" (holds 10)            $ 3.00
    **CP40 400 sheets four colours as PP05 (2.0Kg)      $12.00    DB5R Rubycliff Library Box (holds 10)             $ 4.00

      BA01 BeeArtistic (Graphic S/W)                    $45.00    FP01 Flashprint (with Flashkey)                   $45.00
      GS0▒ Bunyi≡á Adventurσá  }            Tapσá       $25.0░á   GJ0▒ Joysticδ                                     $42.00
      GS0▓áGrotniδá War≤       ²á           3.5ó        $27.0░á   WHM▒ Write-Hand-Man                               $38.00
      GS0│áFli≡áá              }            5.25"       $23.00    SS01 Spread Sheet                                 $34.00
      MLP1 Mailing Label Processor                      $34.00    KSF1 Keyed Sequential Files                       $32.00
      GM01 Menus                                        $34.00    WS01 Window System                                $30.00
      SP01 Spooler                                      $40.00    SC01 Spelling Checker                             $26.00
      CW01 Crossword Game                               $26.00

             When ordering disks PLEASE specify 3.5" or 5.25"

       ** not normally available for postal purchase
      All postal orders to be sent to MBUG AUSTRALIA SALES
                                      P.O. BOX 253, COBURG
                                      VICTORIA 3058
   To avoid delays, all orders must include cheque, postal order or
   Bankcard authorization for the total amount(inc. postal & handling
   charges). Allow 14 days for the return of goods, or pick-up at the
   next meeting.

                 Goods are only available to club members
  - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
   Please charge my Bankcard/Visa No. ___ __ ___ ______

   Expiry Date __/__/____               Signature_________________
   Members Name.__________________________________ M/ship No._____
   Address._______________________________________________________
   Code  Item                      Quantity    Price    Total Cost
   ____  ________________________  ________    _____    __________
   ____  ________________________  ________    _____    __________
   ____  ________________________  ________    _____    __________
   Postal Fees (within Aust.)       Sub-Totals Items     $_________
   $10 to $20 order    :$2.50  Postage & Handling Fee   $_________
   $20 to $80 order    :$5.00
   greater than $80    :P.O.A.             Total Order    $_________

   Certified Mail add $0.90              Security Post  add $4.50
                        MINIMUM POSTAL ORDER $10.00

*** BAZAAR SALES *** BAZAAR SALES ***è     THE MEMBERSHIP SECRETARY                          #
     MBUG AUSTRALIA INCORPORATED.
     P.O. BOX 157
     NUNAWADING. Victoria. 3131.

                        PLEASE COMPLETE ENTIRE FORM 
All  applications and renewals  PLEASE COMPLETE  the  NAME AND ADDRESS FORM
         (Unless renewing (ATTATCHING LABEL BELOW) and NO changes)
__________________________________________________________________________
|                                                                         |
|        NAME:______________________________________________________      |
|                                                                         |
|        ADDRESS:___________________________________________________      |
|                                                                         |
|        POST CODE:___________      TELEPHONE:______________________      |
|                                                                         |
|        DO YOU HAVE A MODEM:____   TYPE OF COMPUTER:_______________      |
|                                                                         |
|        WHERE DID YOU HEAR ABOUT MBUG:____________________________       |
|_________________________________________________________________________|
                                       |
                                   are you a
                                       |
          .-------- yes -------<-- NEW MEMBER --------- no --.
          |                                                  |
          |                                     .____________|___________.
          |                                     |           if           |
          |<--- Member No._____<--- yes ---<----|    <-- RENEWAL         |
          |                                     |                        |
          |                                     -------------------------|
          |                                                  |
     YEARLY FEES                                           else
          |                                                  |
RENEWAL OF MEMBERSHIP          [ ]---------> .----------------------------.
FULL MEMBERSHIP     @  $20.00  [ ]           |  MEMBERSHIP RENEWAL        |
(includes schools & businesses)              |  OR CHANGE OF ADDRESS      |
COUNTRY             @  $20.00  [ ]           |                            |
OVERSEAS            @  P.O.A.  [ ]           |-- --- --- --- --- --- ---  |
STUDENT (FULL TIME) @  $15.00  [ ]           | attatch old mailing label  |
                                |            |                            |
                                |            |         HERE               |
                                |            ------------------------------
                                |                            |
                                |                            |
                               PLEASE FILL IN PAYMENT FORM BELOW

╔ DESIR┼ T╧ BECOM┼ ┴ MEMBE╥ O╞ MBU╟ AUSTRALI┴ INCORPORATED¼ AN─  AGRE┼
T╧ B┼ BOUN─ B┘ TH┼ RULE╙ O╞ TH┼ ASSOCIATIO╬ FO╥ TH┼ TIM┼ BEIN╟ I╬ FORCE.

                 SIGNATURE: _____________________ DATE: ________

---------------------------------------------------------------------------
Please find enclosed my remittance of $_____ Being cheque/money order, or,

Charge my Bankcard / Visa          No.____ ____ ____ ________

Expiry Date __/__/____             Signature.................

                         #                  /    /