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