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
/
MBUG012.ARC
/
MARCH86.CAT
< prev
next >
Wrap
Text File
|
1979-12-31
|
70KB
|
1,341 lines
.pl70
.po0
.OP
.HE# ---- T H E C A T C H E R ---- #
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 (059) 96-5957
Jim Lobley 758-9169 David Soutar 836-3661
Gran⌠ Fores⌠ 874-872╕ Steveε Jepsoε 45-4226
Mike Thompson 82-5002 Robert Broomhead 546-3020
Raymond Han Richard Collett
Wal Hansen
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
PUBLIC DOMAIN DISKS D. SOUTAR. P.O. BOX 45 CANTERBURY 3126
TAPE LIBRARY P.O. BOX 75 AVONDALE HEIGHTS Vic. 3034
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╞ MBU╟
TH┼ BULLETI╬ BOAR─ PHON┼ NUMBE╥ I╙ CHANGIN╟ T╧ 82-157▒ A╙ O╞ 1s⌠ MARCH.
Seσ pagσ 1╢ fo≥ morσ details.
╔á woulΣ likσ t∩ thanδ RaymonΣ Haε fo≥ explaininτ thσ working≤ oµá thσ ì
ne≈á Microbee«á ╔á gues≤ abou⌠ 10░ peoplσ fireΣ question≤ a⌠ Ra∙á froφá al∞ ì
direction≤ anΣ hσ didn'⌠ wil⌠ unde≥ thσ pressure«
Wσá havσ ordereΣ 2░ prin⌠ spooler/buffer≤ anΣ thesσ wil∞ bσ oε salσ iε ì
thσ Bazaar« ┴ full∙ buil⌠ ki⌠ wil∞ bσ demonstrateΣ agaiε (workinτ properly⌐ ì
thi≤ month«á The∙ arσ availablσ iε tw∩ forms« 1¼ a≤ ß ki⌠ completσ witΦ al∞ ì
thσ chip≤ etc«á needeΣ t∩ makσ i⌠ go¼á (n∩ powe≥ supply⌐ $80.00╗á anΣ 2¼ a≤ ì
thσ ki⌠ onl∙ $38.00«á Wσ wil∞ bσ supplyinτ part≤ fo≥ thσ kit≤ fo≥ thosσ wh∩ ì
woulΣá likσ t∩ bu∙ them«á (A⌠ leas⌠ ╕ alread∙ sold)«á Tota∞ cos⌠ t∩á anyonσ ì
buildinτ thσ ki⌠ shoulΣ bσ unde≥ $11░ fo≥ 64δ version« Seσ revie≈ pagσ 8.
Thi≤á meetinτ wσ shoulΣ havσ thσ dem∩ oε thσ 1╢ bi⌠ adapto≥ tha⌠á let≤ ì
you≥á BE┼á ruε MS-DO╙ anΣ othe≥ 1╢ bi⌠ programs«á Fo≥ morσá informatioεá oε ì
thesσ board≤ seσ thσ BAZAA╥ RAMBLING╙ las⌠ month«á Als∩ wσ arσ stil∞ tryinτ ì
t∩á ge⌠á thσá RTT┘á dem∩ going«á Iµá an∙á Hams¼á Amateur≤á o≥á other≤á havσ ì
experimenteΣ iε thi≤ sor⌠ oµ thinτ coulΣ yo⌡ pleasσ contac⌠ Keviε Carr«
You≥ membershi≡ card≤ arσ iε thσ envelopσ witΦ thi≤ issue«á Iµ yo⌡ arσ ì
entitleΣá t∩á ß carΣ b∙ wa∙ oµ renewa∞ o≥ ne≈ membershi≡ (joineΣá prio≥á t∩ ì
Januar∙ thi≤ year)¼ you≥ carΣ shoulΣ bσ iε thσ envelope« Iµ yo⌡ haven'⌠ go⌠ ì
you≥á carΣá anΣ believσ yo⌡ arσ entitleΣ t∩ one¼á thσ persoε t∩ contac⌠á i≤ ì
DaviΣ Soutar.
A≤ oµ 1s⌠ MarcΦ 198╢ tapσ securit∙ deposit≤ requirement≤ wil∞ end« Thσ ì
probleφá encountereΣá i≤ thσ settinτ asidσ oµ thσ fund≤ fo≥á re-paymen⌠á a≤ ì
member≤á leavσá o≥ reques⌠ thei≥ deposit≤ refunded«á Thosσá peoplσá wishinτ ì
refund≤ mus⌠ appl∙ oε thσ forφ founΣ oε pagσ 2▓ thi≤ issue« Thσ refunΣ wil∞ ì
bσ iε thσ forφ oµ ß credi⌠ notσ tha⌠ ma∙ bσ useΣ t∩ hirσ morσá tapes«á Ne≈ ì
(LARGER⌐ tapσ listinτ iε thi≤ issue« Credi⌠ application≤ wil∞ appea≥ iε al∞ ì
issue≤á oµ thσ Catche≥ unti∞ Junσ bu⌠ wil∞ no⌠ bσ accepteΣ afte≥ 25tΦá JUN┼ ì
1986«á Al∞á money≤á remaininτá afte≥á tha⌠á datσá wil∞á bσá transferreΣá t∩ ì
consolidateΣ revenue.
Anothe≥ changσ t∩ thσ runninτ oµ thσ cluΓ wil∞ bσ ß changσ oµ cos⌠ fo≥ ì
membership«á A≤á oµ 1s⌠ Apri∞ 198╢ therσ wil∞ bσ onl∙ tw∩ membershi≡ types« ì
Thσá firs⌠á beinτ ß ful∞ membershi≡ anΣ thσ seconΣ wil∞ bσá fo≥á ful∞á timσ ì
students«á Thσ committeσ ha≤ founΣ i⌠ needeΣ t∩ d∩ thi≤ becausσ oµ problem≤ ì
encountereΣ witΦ thσ cluΓ constitutioε anΣ thσ type≤ oµ membership≤ i⌠ (thσ ì
constitution⌐ allows«á Thσ problem≤ encountereΣ arσ to∩ involveΣ t∩ explaiε ì
iε thi≤ shor⌠ space« Anothe≥ facto≥ i≤ thσ cost≤ oµ mailinτ newsletters.
Othe≥á new≤á t∩ notσ i≤ tha⌠ wσ wil∞ bσ havinτ ß dem∩ oµ ß ne≈á colou≥ ì
Microbeσá "PREMIUMó oε meetinτ nigh⌠ MarcΦ o≥ April«á Thi≤ depend≤á oεá thσ ì
Deepdeeε sho≡ havinτ stock«
Seσ yo⌡ al∞ a⌠ thσ meetinτ
>ANDREW
DISCOUN╘ NUMBE╥ 85╣
é FRO═ TH┼ CHIE╞ MBU╟ FRO═ TH┼ CHIE╞ MBU╟ FRO═ TH┼ CHIE╞ MBU╟ è MBUG TALKER - MORE SOFTWARE Mark Bishop
===========================
Thσá Catche≥á issuσ Jul∙ 198╡ pagσ │ showeΣ ho≈ t∩ builΣ ß $3░á speecΦ ì
synthesise≥á fo≥ you≥ 'Bee«á Thi≤ articlσ als∩ presenteΣ ß shor⌠ M╫á Basiπ ì
prograφá t∩á composσ words«á Thσ prograφ belo≈ ha≤ ß dictionar∙á t∩á savσ ì
thesσ word≤ anΣ quitσ ß fe≈ other≤ listeΣ below«
Thσá prograφ read≤ thσ datß int∩ arrays¼á theε ask≤ yo⌡ t∩ typσá iεá ß ì
sentence«á Thσá individua∞ word≤ oµ thσ sentencσ arσ theε binar∙á searcheΣ ì
froφá thσ array¼á anΣ addeΣ t∩ forφ ß strinτ whicΦ i≤ theεá spoken«á Pres≤ ì
<ESC╛á t∩á ente≥á ß ne≈ sentence¼á <P╛ t∩ LPRIN╘ sentencσá anΣá ASCI╔á datß ì
equivalent¼á o≥á an∙á othe≥ ke∙ t∩ repea⌠ thσ olΣ sentence«á ProvideΣá thσ ì
word≤á arσ iε thσ dictionary¼á yo⌡ kno≈ havσ text-to-speecΦá software«á Thσ ì
<P>rin⌠ functioε give≤ yo⌡ thσ datß t∩ adΣ int∩ othe≥ programs«á Iµ ß worΣ ì
i≤ no⌠ iε thσ dictionary¼ i⌠ i≤ replaceΣ b∙ spaces¼ whicΦ arσ 'spokenº a≤ ß ì
suitablσ sound.
Wheε addinτ ne≈ datß pu⌠ ▒ datß iteφ pe≥ line¼ anΣ iε ASCI╔ order« ie« ì
1,11,15,2,20,2▒ etc«á Thσ prograφ i≤ wel∞ erro≥ trappeΣ t∩ tel∞ yo⌡ iµá thσ ì
datß orde≥ i≤ incorrect« Thσ prograφ i≤ oε thσ Catche≥ Bulletiε Board.
0100 REM MBUG TALKER PHRASE DICTIONARY [▒┤╡▌
0110 REM by Mark Bishop 22.7.85 [▒┤╢▌
0120 REM [▒┤╖▌
0130 GOSUB 330: REM print title [▓▓╕▌
0140 GOSUB 370: REM init. & read data into arrays R0$, R1$ [▓││▌
0150 IF Q0$="N" THEN GOTO 300: REM error - not ascii order [▓░╢▌
0160 GOSUB 470: GOTO 180: REM title 2nd part [▓┤╕▌
0170 CLS:CURS 15,5:PRINT"What would you like me to say next ?" [░╢╕▌
0180 GOSUB 520: REM enter phrase to speak [▓│┤▌
0190 GOSUB 590: REM search array for allophone ASCII code [▓┤▓▌
0200 PRINT W0$: LPRINT A0$;:REM print and speak phrase [▓│▒▌
0210 REM select, edit, print or speak option [▒┤╖▌
0220 POKE 257,0: REM lower case input [▓┤╖▌
0230 K0$=KEY$: IF K0$="" THEN 220 [░┤▓▌
0240 IF K0$=CHR$(27) THEN 170 [▒│▒▌
0250 IF K0$="P" OR K0$="p" THEN GOSUB 760: GOTO 230: REM print [░╡│▌
0260 GOTO 200: REM speak [▒╡╖▌
0270 REM error routines [▒╡│▌
0280 LPRINT "@LKBI^QCGGg@s@";:POKE 257,0: GOTO 170: REM error [▒╡░▌
0290 PRINT TAB(15) "Data line #";Z+1;: GOTO 310 [▒┤╢▌
0300 PRINT "'";R0$(I-1);"' & '";R0$(I);"' NOT in ASCII order"; [░│▓▌
0310 PRINT " - DATA statement error";:LPRINT "aXXAQsCwAQTAQPGKQCGGg@s@";:
END [▓░╖▌
0320 REM print title [▒┤╣▌
0330 CLS: UNDERLINE [░╕╕▌
0340 CURS 15,1: PRINT "MBUG TALKER PHRASE DICTIONARY" [░╖│▌
0350 NORMAL: RETURN [▒▓│▌
0360 REM init. & read data into arrays R0$, R1$ [▒╡│▌
0370 ON ERROR GOTO 290: REM data statement error [▓░╖▌
0380 CURS 15,4: PRINT "reading dictionary . . . . ." [▒▓╖▌
0390 READ F0$,F1$: Z=Z+1: IF F0$<>"dataend" THEN 390 [▒▓╡▌
0400 ON ERROR GOTO 300: Z=Z-1: RESTORE: REM due 'dataend' [▒╢╕▌
0410 OUTL#1: DIM R0(Z),R1(Z):STRS (10000): R0$(0)="": Q0$="Y" [░┤│▌
0420 REM for 16k systems change to STRS(5000) [▒╡░▌
0430 FOR I=1 TO Z: READ R0$(I):READ R1$(I) [░╣╡▌
0440 IF R0$(I)=< R0$(I-1) THEN LET Q0$="N" :NEXT*I RETURN:
REM error, data not in ascii order [░▒▓▌è0450 NEXT I: RETURN [░╡╣▌
0460 REM title part 2 [▒╡┤▌
0470 CURS 15,4: PRINT "Hello, I am your Microbee talker !" [▒╡│▌
0480 LPRINT"@[GmuDDFBZPBYzDPFABHguA?SBMWWAisDDD@"; [░╣╖▌
0490 CURS 15,5: PRINT "What would you like me to say ?" [▓│╕▌
0500 LPRINT"@pXMp^adY-MFiPSDM-wT@";: RETURN [░▓╣▌
0510 REM enter phrase to speak [▒╡░▌
0520 CURS 5,15: PRINT"lowercase input only please,"; [░╢▓▌
0530 PRINT " separate groups by 1 space" [▓▒┤▌
0540 CURS 0,9: INPUT "";W0$: IF W0$="" THEN 540 [░▓╕▌
0550 CLS: CURS 15,5: PRINT "searching dictionary . . . ." [░░╖▌
0560 RETURN [▒▓│▌
0570 REM search array for allophone ASCII code [▒╡╢▌
0580 ON ERROR GOTO 280: REM input error [▓░╣▌
0590 A=1: B=0: W0$=W0$+" ": A0$="" [▒╣┤▌
0600 C=B: B=SEARCH(W0$," ",A) [▒╢░▌
0610 IF B=0 THEN 670: REM end of phrase [▓▒╣▌
0620 A=A+1: W1$=W0$(;C+1,B-1): REM W1$=word to search for [▒╖╕▌
0630 GOSUB 690: REM search array R0$(?) for W1$ [▓┤▓▌
0640 ON ERROR GOTO 280: REM input error [▓░╢▌
0650 IF Q0$="Y" THEN LET A0$=A0$+R1$(N)+"C": GOTO 600:
REM A0$=ASCII of word [▒│╕▌
0660 IF Q0$="N" THEN LET A0$=A0$+" ": GOTO 600:
REM no word, add 'blank' [▓░┤▌
0670 A0$="@"+A0$+"@": CLS: RETURN: REM add pause phrase ends [▓▒░▌
0680 REM Binary search S/R for word in array R0$(?) [▒╡╕▌
0690 L=1: H=Z: N=0: REM l=lowest array #, H=highest, N=now [▒╢▒▌
0700 P=N: N=(L+H)/2: REM previous=now, now=(low+high)/2 [▓▓╢▌
0710 IF R0$(N)=W1$ THEN LET Q0$="Y": RETURN: REM found [░╢░▌
0720 IF R0$(N)<W1$ THEN LET L=N+1 ELSE LET H=N-1 [▓▒╣▌
0730 IF P<>N THEN GOTO 700: REM keep looking [▒▓▓▌
0740 Q0$="N": RETURN :REM not found [░╣╣▌
0750 REM print phrase and allophone ASCII equivalent [▒╡╢▌
0760 CLS:OUT#1 ON: REM change to OUT#5 for serial printer [▓▓░▌
0770 PRINT "PHRASE:": PRINT W0$: PRINT [▒╢╡▌
0780 PRINT "ASCII:": PRINT A0$: PRINT [░╡┤▌
0790 PRINT: PRINT: PRINT: OUT#1 OFF: RETURN [░╡┤▌
0800 REM [▒╡▓▌
1000 REM first data items MUST be in ASCII/alphabetical order [▒╣│▌
1010 REM and in LOWERCASE. Word then ASCII equivalent [▒╣┤▌
1020 DATA ".","IEKQ" [▓││▌
1030 DATA "0","fSgu" [▓┤╖▌
1040 DATA "1","pOK" [▒╖┤▌
1050 DATA "10","MGK" [▓▒▓▌
1060 DATA "11","SmGctK" [▒╣▓▌
***¬ T╧ SAV┼ SPACE¼ TH┼ BALANC┼ O╞ TH┼ DAT┴ I╙ LISTE─ I╬ THI╙ FOR═.***¬
ENTER IN SAME FORMAT AS ABOVE, 1 DATA ITEM PER LINE
"12"¼"MnG~Ac"á "13"¼"]sMSK" "14"¼"hWgMSK" "15"¼"hLhMSK"
"16"¼"wLiwMSK"á "17"¼"wwGGcLKMSK"á "18"¼"TQMSK" "19"¼"xFKMSK"
"2"¼"M--"á "20"¼"MnGKMS" "21"¼"MnGKMS@pOK" "22"¼"MnGKMS@M--"
"23"¼"MnGKMS@vgS" á"24"¼"MnGKMS@hWWg" á"25"¼"MnGKMS@hFc"
"26"¼"MnGKMS@wLiw" á"27"¼"MnGKMS@wwGGcLK" á"28"¼"MnGKMS@TQ"
"29"¼"MnGKMS@xFK"á "3"¼"vgS"á "30","]sMS"á "31"¼"]sMS@pOK"
"32"¼"]sMS@M--"á "33"¼"]sMS@vgS"á "34"¼"]sMS@hWWg"
"35"¼"]sMS@hFc" "36"¼"]sMS@wLiw"á "37"¼"]sMS@wwGGcLK"á
"38"¼"]sMS@TQ"á "39"¼"]sMS@xFK"á "4"¼"hWWg"á "40"¼"hWgMS"á
"41"¼"hWgMS@pOK" "42"¼"hWgMS@M--"á "43"¼"hWgMS@vgS"á è"44"¼"hWgMS@hWWg" "45"¼"hWgMS@hFc" "46"¼"hWgMS@wLiw"
"47"¼"hWgMS@wwGGcLK" "48"¼"hWgMS@TQ"á "49"¼"hWgMS@xFK"á
"5"¼"hFc"á "50"¼"hLhMS" "51"¼"hLhMS@pOK" "52"¼"hLhMS@M--"
"53"¼"hLhMS@vgS" "54"¼"hLhMS@hWWg" "55"¼"hLhMS@hFc"
"56"¼"hLhMS@wLiw" "57"¼"hLhMS@wwGGcLK"á "58"¼"hLhMS@TQ"
"59"¼"hLhMS@xFK"á "6"¼"wLiw"á "60"¼"wLiwMS" "61"¼"wLiwMS@pOK"
"62"¼"wLiwMS@M--"áá"63"¼"wLiwMS@vgS"á "64"¼"wLiwMS@hWWg"
"65"¼"wLiwMS@hFc" "66"¼"wLiwMS@wLiw"á "67"¼"wLiwMS@wwGGcLK"
"68"¼"wLiwMS@TQ"á "69"¼"wLiwMS@xFK"á "7"¼"wwGGcLK"
"70"¼"wwGGcLKMS" "8"¼"TQ" "9"¼"xFK" "a"¼"T" "alarm"¼"Om{P"
"alex"¼"ZmGiw" "alexandra"¼"ZmGiwZKUgO" "all"¼"WWm"á "am"¼"ZP"
"amateur"¼"ZPZQqs"á "an"¼"ZK" "and"¼"ZKU" "april"¼"TAINLm"
"are"¼"{" "at"¼"ZM" "august"¼"W}bOwQ"á "b"¼"?S"
"baby"¼"A?TA?S" "bath"¼"?Tv" "bather"¼"?Tvs" "bathing"¼"?TvLl"
"be"¼"?S" "becky"¼"?GiS" "bee"¼"?S" "beer"¼"?|"á "beth"¼"A?G]"
"birthday"¼"A?s]AaGT"á "bite"¼"A?FCQ"á "bites"¼"A?FCQk"
"blank"¼"A?mZKBi" "bob"¼"A?XXA?"á "bread"¼"\gGG@U"á
"brett"¼"A?gGCQ" "brother"¼"A?gO]s"á "buy"¼"?XF"á "by"¼"?XF"
"byte"¼"A?FCQ"á "bytes"¼"A?FCQk"á "c"¼"wwS"á
"calender"¼"jZZmGKAas" "calling"¼"HW~Ll" "cat"¼"jZBM"
"catkin"¼"jZBMjLK"á "check"¼"rGGBi" "checked"¼"rGGBiM"
"checker"¼"rGGBjs"á "checkers"¼"rGGBjsk" "checking"¼"rGGBjLl"
"checks"¼"rGGBjw" "clock"¼"jmXXBi" "close"¼"jmuww"á
"clown"¼"jm`K" "collide"¼"HOmFU" "computer"¼"jOPIqVQs"
"cookie"¼"H^jS"á "correct"¼"jtGGAiAQ" "corrected"¼"jtGGAiAMLAU"
"correcting"¼"jtGGAiAMLl" "corrects"¼"jtGGAiAQw" "crane"¼"HgTK"
"crown"¼"jg`K"á "d"¼"aS" "daniel"¼"aZK@L@G~" "darren"¼"AaogK"
"data"¼"aXXAQs"á "date"¼"aTBM" "daughter"¼"aWMs" "day"¼"AaT"
"december"¼"US@wGp\s" "dennis","aGKLw" "disk"¼"aLwwi"
"divided"¼"aLcFAaLAU" "do"¼"CaV-"á "drive"¼"agFv"
"drives"¼"agFvk" "e"¼"S"á "east"¼"SwQ"á "eight"¼"TQ"
"eighteen"¼"TQMSK" "eighty"¼"TQMS" "eleven"¼"SmGctK"
"emergency"¼"SPsJGKwS"á "engagement"¼"GG@KdTAJPGGKABM"
"engages"¼"GG@KdTAJLk" "engaging"¼"GG@KdTAJLl"
"enrage"¼"GKNTAJ" "enraged"¼"GKNTAJAU" "enrages"¼"GKNTAJLk"
"enraging"¼"GKNTAJLl" "error"¼"GGg@s"á "extent"¼"GjwMGGKM"
"exterminate"¼"GiwMsPLxTM" "f"¼"GGhh"á "father"¼"h{Rs"
"february"¼"hG\@Y_tS" "fifteen"¼"hLhMSK" "fifty"¼"hLhMS"
"fir"¼"ht" "five"¼"hFc"á "fool"¼"h^^m"á "fools"¼"h^^mf"
"force"¼"hzww" "four"¼"hWWg"á "fourteen"¼"hWgMSK"á
"forty"¼"hWgMS" "freeze"¼"hhNSk" "freezer"¼"hhNSks"
"freezers"¼"hhNSksk"á "friday"¼"hgFAaT" "from"¼"hgXP"
"frozen"¼"hhNukGK" "g"¼"JS" "gemini"¼"JGPLxF" "glenn"¼"AbmGl"
"h"¼"TABr" "happy"¼"yZIS"á "has"¼"[[Zk"á "have"¼"[[Zc"
"hello"¼"[Gmu" "hertz"¼"yytQk" "how"¼"y`"
"hundred"¼"yOOKAagLL@U"á "i"¼"F" "idiot"¼"LAaLLLOQ"á "in"¼"LK"
"input"¼"LKBI^Q" "is"¼"Lk" "it"¼"LCQ" "j"¼"JGT"
"january"¼"JZK_qtS"á "john"¼"JXK" "julie"¼"Jq~S" "july"¼"J_mF"
"june"¼"J_K" "k"¼"jGT" "karen"¼"jZg@GK"á "kilo"¼"jLmu"
"know"¼"xu"á "kristy"¼"HgLwQS" "l"¼"GG~" "live"¼"mlc"
"m"¼"GGP"á "march"¼"P{r" "mark"¼"P{i" "may"¼"PT"
"mega"¼"PGdO"á "memory"¼"PGPXgS"á "mhz"¼"PGdOyytQk"
"microbee"¼"PFABHguA?S"á "microbug"¼"PFABHgu@?WWb"
"minute"¼"PLKLBM"á "minutes"¼"PLKLBMk"á "modem"¼"PuAaGP"
"monday"¼"POOKAaT"á "month"¼"POK]]" "mother"¼"POvs" "my"¼"PF"
"n"¼"GGK"á "name"¼"xTP"á "naughty"¼"xWWBQS" "nine"¼"xFK"
"nineteen"¼"xFKMSK"á "ninety"¼"xFKMS" "no"¼"xu"
"november"¼"xu@cGP\s"á "o"¼"u"á "october"¼"Xi@Qu\s"á "of"¼"Xc"
"on"¼"XK" "one"¼"pOK" "or"¼"z" "our"¼"`s" "p"¼"IS" è"past"¼"I{wM" "penelope"¼"ABIGKGmuIS" "penny"¼"ABIGKS"
"point"¼"IEKQ"á "q"¼"jq_" "r"¼"{" "ram"¼"gAZZP"
"rebecca"¼"Ns?GBH{" "ross"¼"NXww" "s"¼"GGww"
"saturday"¼"wwZBMsaT" "september"¼"wGIQGP\s"á "seven"¼"wwGGcLK"
"seventeen"¼"wwGGcLKMSK" "seventy"¼"wwGGcLKMS"
"sister"¼"wwLwMs" "six"¼"wLiw" "sixteen"¼"wLiwMSK"á
"sixty"¼"wLiwMS" "son"¼"wOK" "sound"¼"w`KU" "south"¼"ww`]"
"space"¼"wITw"á "statement"¼"wAQTAQPGKQ" "sunday"¼"wwOOKBaT"
"suzanne"¼"w-kZZK" "t"¼"MS" "talker"¼"MWWAis"
"television"¼"MGmLcLwLXK" "ten"¼"MGK" "test"¼"MGwAQ"
"testing"¼"MGwAQLl"á "the"¼"vX"á "their"¼"]GGGo" "there"¼"]GGGo"
"thirteen"¼"]sMSK"á "thirty"¼"]sMS" "this"¼"RLw"
"thousand"¼"]`kZKU"á "three"¼"vgS"á "thursday"¼"]tkAaT"á
"tim"¼"M\P" "time"¼"MFP" "to"¼"M--" "today"¼"M-aT"
"tuesday"¼"MqkAaT"á "twelve"¼"MnG~Ac" "twenty"¼"MnGKMS"
"two"¼"M--" "u"¼"q_" "v"¼"cS"á "vision"¼"cLfLLXK"á "w"¼"aOA?~_"
"want"¼"nXKBQ" "wednesday"¼"nGGKkAaT" "what"¼"pXBQ"á
"who"¼"yy^-" "with"¼"nLv" "x"¼"GGBiww"á "y"¼"nF" "year"¼"Y|"
"yes"¼"YGww" "you"¼"Y_"á "your"¼"Yz"á "z"¼"kGBU" "zero"¼"fSgu"
**** NOW ADD THESE LINES AT THE END OF THE LISTING ****
04110 DATA "dataend","zzzz"
04120 REM data line "dataend","zzzz" must be last data line
04130 END OF PROGRAM LISTING
CONTINUOUS AUTO DIAL
By Bradley BOUCHAUD
Thi≤á i≤ ß simplσ modificatioε t∩ ß 300¼á 1200/75bΣ modeφ witΦ thσ ET╔ ì
Experimenta∞á Beσá diale≥á projec⌠á froφ Jul∙á 198╡á t∩á enablσá continuou≤ ì
dialinτá tha⌠á i≤á requireΣá i≤ fo≥ yo⌡ i≤ t∩á removσá resisto≥á R1│á (thi≤ ì
resisto≥á i≤á easil∙á founΣá a≤ i⌠ i≤ thσ closes⌠á resisto≥á t∩á thσá RS23▓ ì
connection≤ cominτ froφ thσ Bee⌐ whicΦ tie≤ thσ CT╙ linσ (markeΣ P/U⌐ high¼ ì
theεá instal∞á ß ne≈ resisto≥ approximatel∙ 2.2╦ ohm≤ betweeε thσ CT╙á linσ ì
anΣá GND¼á thi≤ i≤ probabl∙ bes⌠ soldereΣ t∩ thσ tracδ sidσ oµá thσá board« ì
Nex⌠á connec⌠ aε insulateΣ wirσ linδ betweeε thσ CT╙ linσ anΣ thσ +vσá sidσ ì
oµ thσ C.D« led.
That'≤á i⌠á excep⌠ fo≥ testing«á Connec⌠ thσ modeφ t∩ you≥á Bee¼á boo⌠ ì
Telcoφ anΣ typσ iε (e.g«á Mbuτ RBB╙ >dialú 873573┤ Return⌐ anΣ watcΦ Telcoφ ì
g∩á t∩ work«á DIALIN╟ numbe≥ appear≤ oε thσ to≡ linσ theεá WAITIN╟á appear≤ ì
whilσ thσ systeφ i≤ waitinτ fo≥ ß carrier« Iµ n∩ carrie≥ i≤ detecteΣ withiε ì
approximatel∙á 2░ second≤ theε thσ modeφ wil∞ hangu≡ anΣ re-dia∞ agaiεá anΣ ì
agaiεá unti∞á thσá modeφ detect≤ ß carrier«á Wheε ßá carrie≥á i≤á detected¼ ì
ANSWERE─á appear≤á oε thσ to≡ linσ a≤ wel∞ a≤ ß bee≡ beinτ produceΣ b∙á thσ ì
speaker«á Yo⌡á arσ theε returneΣ t∩ thσ norma∞ commanΣ linσ s∩ yo⌡á caεá g∩ ì
into full duplex as normal.
PLEASE NOTE NEW NEW RBBS NUMBER
AS OF 1st MARCH OUR NEW NUMBER IS
(03) 82 - 1571
è CBIOS and TELCOM 2.0
By Rod EGAN
Whils⌠á writinτá ß CBIO╙ fo≥ m∙ versioε oµ thσ MicroBE┼ disδ systeφá ╔ ì
discovereΣ ß particula≥ requiremen⌠ oµ Telcoφ (2.0⌐ iε regarΣ oµ thσá CBIO╙ ì
code.
Iµá yo⌡ looδ a⌠ thσ CBIO╙ tha⌠ i≤ supplieΣ witΦ thσ BE┼ (56k⌐ yo⌡ wil∞ ì
finΣ tha⌠ a⌠ thσ beginninτ oµ thσ bio≤ i≤ thσ followinτ codσ anΣ data:-
bio≤ star⌠ --╛ norma∞ jum≡ tablσ fo≥ cpm
--> end of jump table. N.B. this is the only segment
of CBIOS that cpm must
know the absolute address
of. You can put the rest
your code in any order
at all.
bios_type --> defb 01 this byte is checked by TELCOM
(2.0) to check for CBIOS of the
correct version.
crtc_table --> start of crtc table this is the normal crtc default
table and is used by TELCOM(2.0)
and CONFIG.
crtc_end --> end of crtc table
TELCO═á (2.0⌐ replace≤ thσ consolσ jum≡ vector≤ witΦ it≤ owεá interna∞ ì
vectors¼á (thi≤á i≤á ho≈ thσ 'REMOTEº commanΣ works)«á I⌠ theεá check≤á thσ ì
bios_typσ valuσ anΣ iµ thi≤ i≤ correc⌠ i⌠ copie≤ thσ crtπ tablσ fo≥ it≤ owε ì
use«á TELCO═ (2.0⌐ use≤ thσ crtπ tablσ t∩ providσ thσ statu≤ linσ oε to≡ oµ ì
thσ screeε b∙ adjustinτ thσ numbe≥ oµ line≤ displayeΣ registe≥ anΣá loadinτ ì
thσ value≤ bacδ int∩ thσ crtπ chip«á Iµ you≥ CBIO╙ doesn'⌠ havσ thi≤ forma⌠ ì
theε TELCO═ (2.0⌐ wil∞ d∩ ver∙ strangσ thing≤ a≤ i⌠ trie≤ t∩ initialize.
╔á don'⌠á kno≈ wha⌠ thσ lates⌠ version≤ oµ TELCO═ (>2.0⌐ d∩ wheεá the∙ ì
exit¼á bu⌠á unles≤á yo⌡ arσ usinτ thσ 'REMOTEº functioε d∩ ß colΣá boo⌠á oε ì
exitinτ TELCO═ (2.0)« Thσ reasoε fo≥ thi≤ i≤ tha⌠ thσ interrup⌠ vector≤ arσ ì
rese⌠á b∙á TELCO═ (2.0⌐ anΣ placeΣ iε thσ to≡ areß oµ thσ TP┴ anΣá arσá no⌠ ì
restoreΣá oεá exit«á Iµ yo⌡ theε loaΣ ß largσ prograφ int∩ thσ TP┴á anΣá i⌠ ì
overwrite≤á thesσ interrup⌠ vector≤ theε thσ nex⌠ interrup⌠ t∩á thσá systeφ ì
caε (will⌐ causσ unpredictablσ results.
╔ havσ disassemblσ botΦ thσ A╘ boo⌠ roφ (95%⌐ anΣ TELCO═ (2.0⌐ (60%)«
Iµá anyonσ woulΣ likσ t∩ seσ thesσ the∙ caε contac⌠ mσ oε 459-876╡á (a.h.)« ì
╔ wil∞á no⌠á bσ uploadinτ thesσ t∩ thσ RBBS. áHINZ
$ FOR SALE $$ FOR SALE $$ FOR SALE $
Microbeσ Serie≤ I╔ upgradeΣ t∩ 32k«á Include≤ 30/4░ programs¼á converteΣ T╓ ì
monitor, Cassette deck, Small printer 3", Usual books and instructions.
$500.00 o.n.o. Phone Mick ELLIS A/H 232-6258 or Bill RYLE A/H 232-3948
$ FOR SALE $$ FOR SALE $$ FOR SALE $
èæ REVIEW OF PBUF╞ PRINTER BUFFER
B∙ Stepheε Jepson
╔á havσ jus⌠ finisheΣ buildinτ Doε McKenzie'≤ Prin⌠ Buffe≥ (PBUFF⌐ anΣ ì
╔á founΣ i⌠ s∩ good¼á ╔ though⌠ ╔ shoulΣ tel∞ yo⌡ al∞ abou⌠ thi≤á wonderfu∞ ì
littlσ board.
Firs⌠á oµ al¼á somσ oµ yo⌡ arσ sayinτ tha⌠ yo⌡ alread∙ havσ ßá printe≥ ì
buffe≥ buil⌠ int∩ you≥ printers«á Well¼á thi≤ ma∙ bσ so¼ bu⌠ i⌠ ma∙ bσ onl∙ ì
bσá abou⌠á 1δá (102┤ characters⌐ anΣ fo≥ mos⌠ printinτ use≤á thi≤á i≤á ver∙ ì
small« PBUF╞ caε bσ madσ u≡ a≤ 64δ o≥ ß 256δ unit.
Thσ 64δ versioε caε bσ configureΣ fo≥ 8¼á 16¼ 3▓ o≥ 64δ usinτ 416┤ (o≥ ì
4864⌐á (64k⌐á dynamiπá RA═á chip≤ (thσ samσ a≤ iεá thσá 128╦á anΣá C.I.A.B« ì
Microbees«á Thσ 256δ versioε use≤ eigh⌠ (8⌐ 4125╢ (256k⌐ RA═ chip≤ anΣá caε ì
onl∙á bσá useΣá a≤á ßá 256δá unit¼áá nothinτá smaller«á The∙á botΦá havσá ß ì
single/multiplσá cop∙ facility¼á Hexadecima∞ outpu⌠ mode¼á DATA/STATU╙ LED¼ ì
extensivσ RO═ diagnostiπ routine≤ anΣ softwarσ pausσ (doublσ backslash)«
Thσ softwarσ pausσ ma∙ bσ thσ onl∙ hitcΦ fo≥ Microbeσ owners« Wheε yo⌡ ì
d∩á ß screeε dum≡ thσ doublσ backslasΦ coulΣ bσ sen⌠ t∩ thσá printer«á Thi≤ ì
wil∞á causσ thσ buffe≥ t∩ sto≡ printing¼á iε turn¼á makinτ ß mes≤á oµá you≥ ì
graphics«á Don'⌠ sa∙ yo⌡ won'⌠ bu∙ onσ jus⌠ yet¼ becausσ Doε ha≤ buil⌠ iε ß ì
disablσá fo≥ thσ pausσ t∩ allo≈ thσ doublσ backslasΦ t∩ bσ printed«á Bewarσ ì
oµ thi≤ iµ yo⌡ arσ printinτ graphics.
Iµ yo⌡ arσ ß heav∙ use≥ oµ you≥ printer¼á Thσ tablσ belo≈ ma∙ givσ yo⌡ ì
somσ ideß oµ ho≈ usefu∞ ß bigge≥ printe≥ buffe≥ woulΣ be.
LengtΦ oµ Filσ Compute≥ t∩ Buffe≥ Buffe≥ t∩ Printer
~~~~~~~~~~~~~■ ~~~~~~~~~~~~~~~~~■ ~~~~~~~~~~~~~~~~~
30δ 16.┤ seπ ╢ miε 1▒ sec
16δ 8.▒ seπ ┤ miε 0╡ sec
8δ 3.╢ seπ ▒ miε 2╢ sec
Beeartistiπ
screeε dum≡ 10.╖ seπ ▓ miε 4╡ sec
Note«á Thesσá arσá onl∙ rougΦ time≤ oε onσ ofµá prints«á The∙á wil∞á diffe≥ì
dependinτ oε thσ contex⌠ oµ thσ file.
Oncσá thσá filσ ha≤ beeε sen⌠ t∩ PBUF╞ you≥ compute≥ i≤ releaseΣá froφ ì
printing¼ whicΦ let≤ yo⌡ ge⌠ oε witΦ somethinτ elsσ whilσ PBUF╞ i≤ printinτ ì
you≥ file.
╔á madσá ß 64δ versioε whicΦ tooδ mσ abou⌠ 1▓ hour≤ t∩á construc⌠á thσ ì
completσá uni⌠ iε ß box«á Therσ arσ 3▓ link≤ oε thσ boarΣ tha⌠ takσ ßá lonτ ì
tinσ t∩ pu⌠ in¼á thσ res⌠ i≤ prett∙ simplσ iµ yo⌡ follo≈ thσá instructions« ì
Iµá yo⌡ caε solde≥ witΦ confidence¼á theε thi≤ ki⌠ i≤ no⌠ to∩ harΣ t∩ make« ì
Iµá yo⌡á socke⌠ al∞ thσ IC'╙ anΣ makσ surσ thσ joint≤ arσá good¼á theεá thσ ì
buffe≥ shoulΣ worδ thσ firs⌠ time«á Therσ arσ n∩ mark≤ oε thσ boarΣ s∩ carσ ì
MUS╘ bσ takeε wheε addinτ thσ links.
Price≤á arσá $80.0░ fo≥ thσ completσ ki⌠ (64δ only⌐ o≥ $38.0░ fo≥á thσ ì
board¼á Eproφá anΣ crysta∞ (botΦ witΦ instructions)«á Comparσ thesσá price≤ ì
witΦá ß 64δ read∙ madσ commercia∞ uni⌠ fo≥ $350.0░ t∩ $700.00«á Considerinτ ì
this¼ i⌠ i≤ aε excellen⌠ buy.è BABY . MWB
00001 REM ____ Baby Bounce ____ by A.Laughton ____ 10/1/85 ____ █░┤╣▌
00002 CLS:POKE 220,84:POKE 140,1:POKE 162,30:POKE 163,128:GOSUB 17:
FOR X=64528 TO 64528+9*16-1:READ A:POKE X,A:NEXT X █▓▒│▌
00003 DATA 0,0,0,0,112,248,113,34,116,248,248,248,112,96,96,120,0,0,0,
0,14,31,142,68,46,31,31,31,14,6,6,30,60,66,165,129,90,60,153,102,
66,129,129,153,129,126,36,231 █▒┤╕▌
00004 DATA 0,0,0,192,255,255,192,0,0,0,0,0,0,0,0,0,0,0,0,0,255,255,0,0,
0,0,0,0,0,0,0,0,0,0,0,3,255,255,3,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0 █▒│╢▌
00005 DATA 170,85,170,85,170,85,170,85,170,85,170,85,170,85,170,85,231,36,
126,129,153,129,129,66,102,153,60,90,129,165,66,60 █░╢╡▌
00006 CURS 16,13:PRINT"Press any key to play or Q to quit."; █▓│╖▌
00007 D=PEEK(258):IF D=255 THEN FOR X=0 TO 7:NEXT X:CURS 22,13:
PRINT[A7 32];:CURS 41,13:PRINT" ";:GOTO 6 ELSE IF D=17 THEN NORMAL:
CLS:PLAY 23:POKE 220,111:NEW:END ELSE CLS:Q=11:C=62:S=0:PCG:
GOSUB 19 █▒╡┤▌
00008 PLAY 0,4:T=2:Y0=RND*5+1:C=C+1:IF C>72 THEN 14 █░╡╕▌
00009 FOR T0=4.7 TO 6.3STEP.13:X=10+INT(55*COS(T0)/Y0):GOSUB 13:CURS C:
PRINT"G":CURS X,T:PRINT"C":GOSUB 13:CURS X,T:PRINT"G":GOSUB 13:
T=T+1:NEXT T0 █░╡╣▌
00010 IF X>Q+1 AND X<Q+6 THEN 12 ELSE CURS X,T:PRINT"I":GOSUB 13:
NORMAL █▒┤╡▌
00011 CURS X-4, T-2 :PRINT"O U C H !":PCG:PLAY 0,4:CURS X,T:PRINT"G":
CURS X-4, T-2 :PRINT"GGGGGGGGG":FOR I=20 TO 16 STEP -1:GOSUB 13:
PLAY I:GOSUB 13:NEXT I:GOTO 8 █▓│╣▌
00012 S=S+1: FOR T0=3.14 TO 6.3 STEP .35:X=X+INT(5*COS(T0))+5:GOSUB 13:
IF X>62 THEN NEXT *T0 8 ELSE CURS X,T-1:PRINT"C":T=T-1:GOSUB 13:
CURS X,T:PRINT"G":GOSUB 13:NEXT T0:PLAY 0,4:GOTO 8 █▒│░▌
00013 IF PEEK(258)=44 AND Q>11:Q=Q-1:CURS Q,15:PRINT"GADEEFBG";:
RETURN ELSE IF PEEK(258)=46 AND Q<56:Q=Q+1:CURS Q,15:
PRINT"GADEEFBG";:RETURN ELSE CURS Q,15:PRINT"GADEEFBG";:
RETURN █░┤░▌
00014 NORMAL:CURS 25,5:PRINT"It's all over !":SPEED 200:IF S=10 THEN
CURS 21,9:PRINT"You saved all 10 babies.":CURS 16,11:
PRINT"C O N G R A T U L A T I O N S !!":SPEED 0:GOTO 6 █░╡▒▌
00015 IF S=0 THEN CURS 12,9:PRINT"You didn't save any babies. I suggest
you try again.":SPEED 0:GOTO 6 ELSE IF S=1:A1$="y." ELSE
LET A1$="ies." █▒▒╢▌
00016 CURS 21,9:PRINT"You only saved"S" bab"A1$:IF S=8ORS=9 THEN
CURS 13,11:PRINT"That's great ! However you still missed"10-FLT(S):
SPEED 0:GOTO 6 ELSE SPEED 0:GOTO 6 █░╡╡▌
00017 PRINT\[A21 95]"B A B Y B O U N C E"[A21 95]\\" In this game you
have to stop the BABIES from hitting the ground as they fall
from the burning building." █░░╖▌
00018 PRINT\" There are 10 Babies to bounce and your bouncer is controlled
by using :"\TAB12"< to move LEFT"\TAB12"> to move RIGHT":
RETURN █░▒┤▌
00019 PRINT\"CCCCCCCCCC":FOR X=1 TO 6:PRINT"HHHHHHHHHH"\"HHGGHHGGHH":
NEXT X:PRINT"HHHHHHHHHH":FOR X=1 TO 63:PRINT"H";:NEXT X:RETURN █░╕┤▌
$ FOR SALE $$ FOR SALE $$ FOR SALE $
IB═ P├ Compatable«á 640δ Ram¼á ▓ ° 4░ tracδ drives¼ Colou≥ graphic≤ card¼ ▓ ì
serial & 1 parallel port and clock. $1350.00
20 meg Hard Disk & Controller $1200.00. Phone John 758-5744
$ FOR SALE $$ FOR SALE $$ FOR SALE $è MBUG AUSTRALIA INC. TAPE LIBRARY
P.O. BOX 75, AVONDALE HEIGHTS 3034 MARCH 1986.
GAMES GENERAL PROGRAMS ADVENTURE GAMES
J ASTEROIDS AUST ADVENTURE LAND
I BACGAMMON CHPLUS BLACK FRIDAY
BRICKS COMPAT COLDITZ
CAMEL COMPOSER BEE FRANKENSTEIN
CHASE/WUMPUS1 DECISION MAKER KIN
I CHESS DOMESTIC ACCOUNTS KUNG FU
I J CHOPPER EDUPACK1 MATHS ADVENTURE
CONCENTRATION EDUPACK2 MISSION IMPOSSIBLE
J COSMIC LCG/3D-PLOT PIRATE
DEFENDER LEAGUE LADDERS SCHMOO CITY
DRAUGHTS LOGO SURVIVE
EMU JOUST LUCKY DIP WUMPUS2
J GALAXY MAD LIB
GHOST MUNCHER MATHS RACE
GOBBLE/ASTRO * P MAZE4 UTILITY PROGRAMS
GOLF * MORSE
HURKLE/CRICKET I MULTI GRAPHER I DEBUGER 16/32k
J INVADERS PCG GENERATOR I DISEMBLER 16/32k
KILOPEDE PCG TUTOR ESKEY 16/32k
KING KONG PILOT HEXDUMP (inc. source)
LOGIC DICE PSYCHO LOADER v1.1/v1.3
METEOR RESCUE I RECORDS PROGRAM I MEMORY DISPLAY 16/32k
I J MISSILE SPELLBOUND I SOURCE GENERATOR
J ROBOTMAN TYPING/SOLITAIRE TRS-BEE/TAPE DOCTOR
SKI SLALOM
SQUARES/TRIANGLES
SUBTERRA
TANKS
I TARGET
TERMITE
TIC-TAC-TOE/FOUR
UFO ATTACK
I ZTREK Legend
* = New Program this month
I = Seperate Instructions Available
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. Tapes may be reserved.
8. Reservations will only be held until the next 2nd Wednesday meeting.
9. PLEASE return instructions with tapes
DIS╦á OWNERS¼á don'⌠ forge⌠ yo⌡ to∩ caε usσ thesσ tape≤ b∙ usinτ TDCOP┘á o≥ ì
thσ command≤ CLOA─ anΣ CSAV┼ froφ BASI├ oε you≥ standarΣ Microbee«á Thσ ReΣ ì
anΣá Bluσ cable≤ oε thσ looφ tha⌠ connec⌠ you≥ Beσ t∩ thσ monoto≥ arσ lead≤ ì
t∩ pluτ you≥ tapσ recorde≥ into.è..Writteε b∙ Graemσ Young,1╢ Hillingdoε Cres.¼ Doncaste≥ anΣ submitteΣ fo≥
.« publicatioε iε thσ Catche≥ anΣ P├ Update.
TRANSFERRIN╟ FILE╙ MS-DO╙ AN─ CP/M-80
by Graemσ P« Young
M∙ homσ compute≥ i≤ ß Microbee«á However¼á thσ gooΣ olΣ Beσ simpl∙ wa≤ ì
no⌠á adequatσá a⌠á m∙ placσ oµ employment«á Thi≤ wa≤á ßá poin⌠á fo≥á grea⌠ ì
frustratioεá wheεá ╔á realiseΣ tha⌠ ╔ haΣ man∙ tex⌠ anΣ datß file≤á oεá thσ ì
Microbeσ whicΦ ╔ needeΣ t∩ usσ oε thσ IBM« Therσ werσ to∩ man∙ t∩ transfe≥ ì
vißá modem¼á anΣ iε an∙ case¼á i⌠ wa≤ convenien⌠ t∩ worδ oε m∙ Microbeσá a⌠ ì
nigh⌠ anΣ theε takσ thσ disk≤ iε t∩ thσ officσ thσ nex⌠ morning«á Thσ datß ì
anΣ tex⌠ file≤ haΣ t∩ bσ ablσ t∩ bσ useΣ b∙ program≤ runninτ unde≥á MS-DOS¼ ì
no⌠ CP/M-86« Thσ probleφ seemeΣ a≤ thougΦ i⌠ coulΣ bσ simpl∙ solveΣ iε onσ ì
oµ tw∩ ways:
a⌐ FinΣ ß prograφ fo≥ thσ Beσ whicΦ woulΣ le⌠ i⌠ reaΣ IB═ disks¼ or
b⌐ FinΣ ß prograφ fo≥ thσ IB═ whicΦ woulΣ le⌠ i⌠ reaΣ Microbeσ disks.
Fo≥á eithe≥ solutioε i⌠ wa≤ importan⌠ t∩ bσ ablσ t∩ transfe≥ file≤á iε ì
eithe≥ directioε betweeε IB═ PC-DO╙ forma⌠ anΣ Microbeσ CP/M-80.
Herσá thσá problem≤ started«á ApplieΣ Technology'≤ lates⌠ versioεá oµ ì
SETDRIVE.COMé woulΣ onl∙ allo≈ thσ Microbeσ t∩ reaΣ double-sideΣ 320δá CP/M-ì
8╢ disk≤ whicΦ havσ 3▓ record≤ pe≥ track«á I⌠ madσ nonsensσ oµ 360δ MS-DO╙ ì
formatteΣá disk≤ whicΦ havσ ╣ sector≤ pe≥ tracδ (thσ 8-secto≥ 320δá versioε ì
gavσ thσ samσ problem)« ┴ disδ utilit∙ diΣ no⌠ hel≡ thσ problem«
┴ program¼á MSXFER.COM¼ ha≤ recentl∙ beeε writteε t∩ allo≈ transfe≥ oµ ì
file≤ froφ MS-DO╙ t∩ Microbeσ CP/M-8░ format«á I⌠ i≤ availablσ oε thσ MBU╟ ì
bulletiεá board«á Thi≤á diΣ no⌠ solvσ thσ probleφ either¼á becausσ i⌠á onl∙ ì
alloweΣ mσ t∩ reaΣ MS-DO╙ disk≤ bu⌠ no⌠ t∩ writσ t∩ them.
M∙á attentioεá wa≤á theε drawε t∩ ßá prograφá calleΣá Crossdata¼á madσ ì
commerciall∙á availablσ b∙ AwarΣ Softwarσ Australiß (9░ Kinτá St.¼á Perth)« ì
Thi≤á wa≤á expensive¼á $149¼á bu⌠ i⌠ wa≤ saiΣ t∩ bσ capablσ oµ readinτá anΣ ì
writinτá t∩ man∙ disδ format≤ wheε ruε oε thσ IBM«á I⌠ coulΣá transfe≥á iε ì
eithe≥ directioε betweeε CP/═ anΣ MS-DO╙ (seσ revie≈ iε You≥ Computer¼ Junσ ì
1985)«á Unfortunatel∙ i⌠ coulΣ no⌠ reaΣ Microbeσ disks¼á bu⌠ i⌠ coulΣ reaΣ ì
Kaypro▓á disk≤á anΣá IB═á CP/M-8╢á formatteΣá disks«áá (╔á understanΣáá thσ ì
developer≤ hopσ t∩ havσ i⌠ readinτ Microbeσ disk≤ eventually).
So¼á afte≥ purchasinτ Crossdata¼á ╔ wa≤ ablσ t∩ easil∙ transfe≥á file≤ ì
betweeεá thσá tw∩á computer≤á usinτ thσá followinτá procedure«á Notσá tha⌠ ì
Crossdatß run≤ oε thσ IBM¼ no⌠ oε thσ Microbee.
1⌐ Se⌠ u≡ anΣ forma⌠ ß disδ oε thσ IB═ unde≥ CP/M-86¼ double-sided.
2) Inser⌠ thσ disδ iε drivσ b║á oµ ß Microbeσ anΣ usσ setdrive.coφ t∩ se⌠ ì
áááááthσ drivσ t∩ reaΣ IB═ format.
3) Cop∙ thσ Microbeσ filσ t∩ thσ IB═ CP/M-8╢ disk«á Don'⌠ worr∙ tha⌠ yo⌡ ì
áááááarσá copyinτ CP/M-8░ t∩ ß CP/M-8╢ format╗á i⌠ doe≤ no⌠ matter¼á bu⌠ oµ ì
ááááácoursσ yo⌡ caε onl∙ d∩ i⌠ fo≥ tex⌠ anΣ datß files«
4) Returε t∩ thσ IB═ anΣ ruε Crossdata«á Tel∞ i⌠ tha⌠ thσ sourcσ disδ i≤ ì
áááááß double-sideΣ IB═ disδ iε CP/═ forma⌠ anΣ tha⌠ yo⌡ wisΦ t∩ transfe≥ ß ì
áááááfilσá t∩á aεá MS-DO╙ director∙ oε ßá specifieΣá drive«á Thσá transfe≥ ì
áááááresult≤ iε ß filσ whicΦ caε bσ reaΣ b∙ an∙ appropriatσ prograφ oεá thσ ì
áááááIBM.è Aεá alternativσá woulΣá bσá t∩ usσ ß Kaypro▓á formatteΣá disδá a≤á thσ ì
intermediatσ forma⌠ iµ yo⌡ don'⌠ havσ CP/M-8╢ oε thσ IBM.
Thi≤á ma∙ sounΣ complicateΣ a⌠ first¼á bu⌠ i⌠ i≤ actuall∙ quitσá easy« ì
Whilσá thσ cos⌠ oµ Crossdatß i≤ no⌠ insignificant¼á ╔ coulΣ no⌠ wai⌠ fo≥á ß ì
kinΣ colleaguσ t∩ eventuall∙ writσ ß prograφ t∩ d∩ thσ joΓ fo≥ me« Anyway¼ ì
thσá IB═á caεá no≈á reaΣ abou⌠ 3░ disδ formats¼á ßá usefu∞á facilit∙á iεá ß ì
departmen⌠ wherσ man∙ peoplσ havσ homσ computer≤ oµ varyinτ types.
┴á fina∞ advantagσ wa≤ tha⌠ ╔ coulΣ no≈ usσ m∙ Microbeσ anΣá modeφá t∩ ì
downloaΣá MS-DO╙á utilit∙ program≤ froφ variou≤ bulletiε boards«á (Wha⌠á ß ì
pit∙á publiπá domaiεá softwarσ iε MS-DO╙ i≤ no⌠ t∩á thσá standarΣá oµá tha⌠ ì
availablσá fo≥á C/M-80.⌐á SucΦá program≤ diΣ no⌠ makσ mucΦá sensσá oεá thσ ì
Microbee¼á bu⌠ wheε transferreΣ t∩ thσ CP/M-8╢ formatteΣ disk¼ takeε t∩ thσ ì
IB═ anΣ theε transferreΣ t∩ MS-DO╙ (PC-DOS)¼ the∙ raε withou⌠ ß hitch.
Obviously¼á 8-bi⌠ computer≤ arσ no⌠ obsolete«á The∙ remaiε withiε thσ ì
famil∙ budge⌠ (16-bi⌠ computer≤ don't⌐ anΣ a≤ morσ utilit∙ program≤á becomσ ì
availablσ t∩ allo≈ transfe≥ betweeε differen⌠ formats¼ therσ shoulΣ bσ eveε ì
greate≥ flexibility.
CONVERT YOUR WBEE FILES TO WORDSTAR FILES
By Ken Meadows via CMUG NEWSLETTER - OCTOBER 1985
00100 REM "CONVERT.MWB" converts Wordbee files into WordStar █▒┤╡▌
00110 REM from on Online SEPT 1984 █▒┤╢▌
00120 REM Modified by KEN MEADOWS █▒┤╖▌
00130 REM as published the program does not work █▒┤╕▌
00140 REM this version does work █▒┤╣▌
00150 REM DON'T ASK ME WHY ! █▒╡░▌
00160 GOSUB 220 █▒╖▒▌
00170 CLOSE 6,7 █▒╢╖▌
00180 OPEN "I",6,N1$ █▒│╖▌
00190 OPEN "I",7,N0$ █▒│╕▌
00200 GOSUB 360 █▒╖▒▌
00210 END █▒░╢▌
00220 CLS: PRINT "WORDBEE TO WORDSTAR CONVERTOR" █▒░░▌
00230 PRINT : PRINT █▓││▌
00240 PRINT "PLEASE PRESS RETURN (OR PRESS A OR B FOR DIR.)" █░│╖▌
00250 A0$=KEY$: IF A0$="" THEN 250 █░▓╖▌
00260 IF A0$ = "A" OR A0$ = "a" THEN CLS : DIR A0$ : GOTO 280 █░╢╢▌
00270 IF A0$ = "B" OR A0$ = "b" THEN CLS : DIR A0$ : GOTO 280 █░╢╣▌
00280 CURS 1,14 █▒╡│▌
00290 PRINT : INPUT "WORDBEE FILE NAME (.WBF ASSUMED)";N1$ █▓░╡▌
00300 IF SEARCH (N1$,".") = 0 : N1$ = N1$ + ".WBF" █░▒╢▌
00310 N0$ = N1$ (;1,LEN(N1$)-4) █░╡▒▌
00320 PRINT "OUTPUT FILENAME FOR NEW FILE (N0$ DEFAULT)"; █▒╕╕▌
00330 INPUT " ";T0$ █░╖╖▌
00340 IF T0$ <> " " THEN LET N0$ = T0$ █░│╣▌
00350 RETURN █▒▓░▌
00360 IN#6 ON : OUTL#7 █▓╡┤▌
00370 IF EOF (6) THEN CLOSE 6,7 : IN#0 : OUTL#5 : RETURN █▓▓░▌
00380 K1$ = KEY █░╣╖▌
00390 LPRINT K1$;: IF K1$ = CHR(13) THEN LPRINT CHR(10); █░╣░▌
00400 GOTO 370 █▒░│▌
è SOFTWARE MODIFICATIONS for Ver 6.22e DISK COLOUR BASIC
by Peter Burbidge (833).
DetaileΣá belo≈á arσá somσá change≤ ╔ havσ madσ t∩á MicroworlΣá Disδá Basiπ ì
runninτ oε thσ CIA┬ usinτ dynamiπ RA═ memory.
Tw∩á othe≥ file≤ accompan∙ thi≤ articlσ DUMPER.BE┼á anΣá DUMPER.MAC«á Thesσ ì
file≤ contaiε thσ screeε dum≡ routinσ fo≥ merginτ witΦ Basic.
Thesσ change≤ arσ easil∙ madσ usinτ eithe≥ SI─ (o≥ DDT⌐ o≥ SUPERZAP« ╔ havσ ì
includeΣ instruction≤ fo≥ botΦ s∩ thσ choicσ i≤ yours«á I⌠ i≤ probabl∙ bes⌠ ì
iµ eacΦ stagσ oµ thσ change≤ i≤ full∙ testeΣ prio≥ t∩ thσ implementatioε oµ ì
thσá nex⌠ stage¼á bu⌠ iµ yo⌡ arσ reasonabl∙ carefu∞ al∞ change≤ caε bσ madσ ì
a⌠á iε onσ stagσ a≤ onl∙ ╢ byte≤ arσ t∩ bσ modifieΣ iµ thσ Screeεá dum≡á i≤ ì
no⌠á implemented«á Pleasσ notσ tha⌠ thσ Screeε dum≡ i≤ bes⌠ installeΣ unde≥ ì
SI─ o≥ DDT.
Iµ usinτ SUPERZA╨ bσ warneΣ tha⌠ al∞ change≤ wil∞ bσ madσ oε thσá BASIC.CO═ ì
filσ yo⌡ select« Thereforσ thi≤ filσ shoulΣ bσ
1« ┴ workinτ COP┘ oµ Basic« NO╘ you≥ maste≥ copy« Usσ CP.CO═ t∩ creatσ ß ì
renameΣ cop∙ oµ BASIC.CO═ calleΣ NEWBASIC.COM.
e.g. A> CP -V BASIC.COM NEWBASIC.COM
2. Not a R/O file
There are 4 areas that have been changed :-
a⌐ CURSO╥ CONTRO╠ (editinτ only)« Changσ │ byte≤ Thσ ne≈ PC8╡ machine≤ havσ ì
thσá EDI╘ key≤ changeΣ t∩ matcΦ thosσ useΣ b∙ Wordbee¼á Wordsta≥á etc«á Thσ ì
change≤ detaileΣ wil∞ givσ thi≤ samσ compatibility« e.g.
^S = Backwards from right to left. Replaces ^A.
^D = Forwards from left to right. Replaces ^S.
^F = Forward one word. Replaces ^W.
b⌐á DEFAUL╘ PRINTE╥ oε colΣ boot«á Changσ ▒ byte«á Thσ defaul⌠ printe≥á oε ì
ColΣ boo⌠ ha≤ no≈ beeε se⌠ t∩ PARALLE╠ insteaΣ oµ SERIAL« Oncσ agaiε a≤ pe≥ ì
thσ PC8╡ machines.
c⌐ NE╘ commanΣ enabled«á Changσ ▓ bytes« Issuσ thσ NE╘ commanΣ anΣ yo⌡ wil∞ ì
instantl∙ bσ iε thσ Disδ MONITOR«á Thi≤ wil∞ allo≈ basiπ prograφ 'bugsº etπ ì
t∩á bσ fixeΣ prio≥ t∩ returninτ t∩ basic«á Somethinτ tha⌠ canno⌠ easil∙á bσ ì
donσ witΦ ß RESE╘ ª M.
d⌐á GRAPHIC╙á Screeε Dump«á Thi≤ i≤ ß fairl∙ largσ modificatioεá tha⌠á wil∞ ì
allo≈á thσ ^╨ ke∙ t∩ initiatσ ß Graphic≤ screeε dump«á Thi≤ routinσ ╔á havσ ì
includeΣ ß filσ nameΣ DUMPER.BEE«
ADDRESSES CHANGED
Address A318. For backwards right to left. Change from 01 to 13
" A320. " forwards left to right. " " 13 to 04
" A32C. " forwards one word. " " 17 to 06
" BA83. Jump vector LSB for NET. " " 01 to 03
" BA84. " " MSB " " " " A2 to E0
" 8549. List device number. " " 20 to 02è " A47E. Patch for screen dump enable. " " 04 to 3D
" A47F. " " " " " " " A5 to C6
" C63D to C6FD. Screen dump routine. See DUMPER.BEE
Changes under SID or DDT
Enter SID or DDT from CP/M by typing at the prompt A>SID BASIC.COM <CR>
ááááá
Usσ thσ 'Sº commanΣ t∩ changσ thσ datß a⌠ thσ followinτ location≤ :-
2518 was '01'. Change to '13' \
2520 was '13'. Change to '04' |- EDIT keys
252C was '17'. Change to '06' /
074╣áwa≤á'20'«áChangσ t∩á'02ºá- // PRINTER
3C83 was '01'. Change to '03' \
3C84 was 'A2'. Change to 'E0' |- NET command
áááááááááááááááááááá267E was '04'. Change to '3D' \
áááááááááááááááááááá267F was 'A5'. Change to 'C6' |- DUMP enable
e.g« Typσ 'S2518<CR>º t∩ changσ EDI╘ key≤ Theε ente≥ thσ requireΣ DATA« e.τ ì
'13<CR>'
Usσ thσ <C/R╛ ke∙ t∩ ste≡ througΦ t∩ thσ nex⌠ location¼ ente≥ ne≈ DAT┴ etc.
Exi⌠á thσ 'Sº commanΣ b∙ typinτ ß '.<CR>'«á Thi≤ wil∞ pu⌠ yo⌡ bacδá a⌠á thσ ì
commanΣ level.
Typσ 'S0749<CR>º t∩ changσ Defaul⌠ printe≥ DATA« Theε exi⌠ t∩ commanΣ leve∞ ì
afte≥ change≤ havσ beeε made.
Typσ 'S3C83<CR>º t∩ changσ thσ Jum≡ vecto≥ fo≥ thσ NE╘ command«á Ente≥á thσ ì
requireΣ DAT┴ anΣ theε exi⌠ bacδ t∩ commanΣ level.
Typσá 'S267E<CR>º t∩ PatcΦ iε thσ screeε dum≡ routine«á Ente≥ thσá requireΣ ì
DAT┴ anΣ theε exi⌠ bacδ t∩ commanΣ level.
Mergσá iε thσ screeε dum≡ routinσ DUMPER.BE┼ b∙ typinτ iε thσ followinτá a⌠ ì
thσ commanΣ leve∞ :-
ááááááááááááááá'IDUMPER.BEE<CR>'
ááááááááááááááá'R473D<CR>' .
Iµ testinτ b∙ stage≤ exi⌠ SI─ witΦ 'G0º afte≥ enterinτ thσ DAT┴ change≤ fo≥ ì
eacΦ stagσ anΣ theε froφ CP/═ A╛ SAV┼ 7│ NEWBASIC.COM
Tes⌠ tha⌠ eacΦ changσ work≤ a≤ requireΣ wheε runninτ unde≥ NEWBASIC.
Changes under SUPERZAP
A≤á SUPERZA╨á make≤ change≤ oε ß secto≥ b∙ secto≥ basis¼á │ sector≤ oµá thσ ì
BASIC.CO═ filσ wil∞ neeΣ t∩ bσ edited.
** NOTE The screen dump routine MUST be entered by SID or DDT
The sectors to be changed are :- Sector 48 for EDIT keys
Sector 0C for Default LIST device " " 77 Jump vector for NET command
èIµá testinτ b∙ stage≤ exi⌠ Superza≡ b∙ typinτ 'Xº betweeε eacΦá stage«á Al∞ ì
change≤ madσ t∩ an∙ sector(s⌐ wil∞ theε bσ saveΣ t∩ disπ anΣ tha⌠á fuctioε ì
caε bσ theε bσ checkeΣ unde≥ Basic.
Selec⌠ thσ filσ yo⌡ wil∞ wisΦ t∩ edi⌠ i.σ NEWBASIC.COM
T∩ d∩ thi≤ positioε thσ curso≥ a⌠ NEWBASIC.CO═ anΣ pres≤ 'S'.
Then press 'S' to SELECT SECTOR.
Enter then Sector No. e.g '48<CR>'
Theε pres≤ 'Cº t∩ CHANG┼ SECTOR« Positioε curso≥ a≤ requireΣ anΣ changσ thσ ì
DATA.
áááááááááá In SECTOR 48 Change DATA at 2418 from '01' to '13'
" " " 2420 " '13' to '04'
" " " 242C " '17' to '06'
Save changes by typing '^Z'
In SECTOR 0C change DATA at 0649 from '20' to '02'
Save changes by typing '^Z'
In SECTOR 77 Change DATA at 3B83 from '01' to '03'
" " " 3B84 " 'A2' to 'E0'
Save changes by typing '^Z'
Iµá al∞á change≤á arσ finisheΣ exi⌠ Superza≡ b∙ typinτ 'Xº anΣá al∞á secto≥ ì
change≤ wil∞ bσ saveΣ t∩ disk.
TESTING
Testinτá i≤á quitσ easil∙ achieveΣ b∙ runninτ thi≤ NEWBASI├ anΣá tryinτá i⌠ ì
out«á Thσá defaul⌠ printe≥ shoulΣ bσ checkeΣ b∙ issuinτ ß LPRIN╘ commanΣ o≥ ì
LLISTinτ ß fe≈ prograφ lines« (Makσ surσ printe≥ iε pluggeΣ iε anΣ on-line)
Thσá NE╘á commanΣá wheε issueΣ shoulΣ pu⌠ yo⌡ straigh⌠á int∩á MONITOR«á Yo⌡ ì
shoulΣ bσ ablσ t∩ ge⌠ bacδ t∩ Basiπ witΦ thσ commanΣ ╟ 8021<CR>
Thσá EDI╘á key≤ shoulΣ worδ a≤ thσ EDI╘ functioε diΣ beforσ excep⌠á thσá ^╙ ì
move≤ curso≥ righ⌠ t∩ left
^D moves " left to right
^F moves " one word to right
Thσ Screeε dum≡ shoulΣ worδ wheneve≥ thσ ^╨ ke∙ i≤ pressed«á Makσ surσá thσ ì
printe≥á i≤ onlinσ firs⌠ though«á Tr∙ thσ followinτ commands:- LOAD¼á LIST¼ ì
DIR¼á HIRES¼á PCG¼ DISKRESE╘ witΦ ß ^╨ afte≥ eacΦ t∩ ensurσ al∞ i≤ OK« Wheε ì
dum≡ i≤ finisheΣ ensurσ tha⌠ keyboarΣ entr∙ i≤ OK.
Iµá yo⌡ wisΦ t∩ usσ somσ othe≥ screeε dum≡ program¼á avoiΣ usinτá location≤ ì
C70░á t∩ C78░ a≤ thesσ appea≥ t∩ bσ useΣ b∙ thσ HIRE╙ commanΣ fo≥á countinτ ì
PC╟ characters(?).
Iµá al∞á work≤á finσá yo⌡á caε ERAsσá thσá olΣá BASIC.CO═á anΣá RENamσá thσ ì
NEWBASIC.CO═ a≤ BASIC.COM. Good luck.
Thσá softwarσ fo≥ thi≤ modificatioε i≤ oε thσ B┬ unde≥ thσ namσ BASMODS.LB╥ ì
iε Di≥ectory UTL: It will not be included in the Catcher.é EDè NOTES ABOUT THE BULLETIN BOARD
Thσ bulletiε boarΣ ha≤ moved«á A≤ oµ thσ 1s⌠ MARCH¼ thσ B┬ i≤ oε phonσ ì
numbe≥á 82-1571«á Thi≤ ha≤ comσ abou⌠ througΦ thσ neeΣ t∩ ge⌠ thσá softwarσ ì
operativσ anΣ thσ boarΣ t∩ becomσ morσ automated«á Wha⌠ follow≤ i≤ ß fe≈ oµ ì
thσá change≤á tha⌠á wil∞ operatσ oε thσ systeφ froφ tha⌠ date«á ┴á lis⌠á oµ ì
operatinτá procedure≤á anΣ instruction≤ wil∞ bσ publisheΣ a≤á sooεá a≤á thσ ì
committeσá ha≤á timσ t∩ finalizσ them«á Iteφ onσ (1⌐ ha≤á beeεá implementeΣ ì
alread∙ anΣ iteφ two¼á par⌠ iΘ wil∞ operatσ froφ 14tΦ March«á Othe≥ change≤ ì
wil∞ comσ int∩ operatioε a≤ sooε a≤ possible«
1«á Al∞ person≤ currentl∙ usinτ thσ Bulletiε BoarΣ wh∩ arσ no⌠á financia∞ ì
member≤á o≥á whosσ membershi≡ ha≤ lapseΣ morσ thaε ▒ montΦ wil∞ finΣá thei≥ ì
acces≤á ended«á Thσá name≤á oµ thosσ eligiblσ t∩ usσ thσá boarΣá wil∞á comσ ì
directl∙ ofµ thσ membershi≡ registe≥ anΣ CP/═ acces≤ wil∞ becomσ automatic.
2« An∙ propriet∙ softwarσ founΣ oε thσ B┬ wil∞ bσ removeΣ immediately«
ii«á A≤á thσá name¼á datσá anΣ timσ oµ uploadinτ i≤ kep⌠ iεá ßá loτá file¼ ì
anyonσá uploadinτá propriet∙ softwarσ wil∞ finΣ thei≥ acces≤ t∩á thσá boarΣ ì
removeΣ permanently«
3«á WitΦá thσ membershi≡ registe≥ operatinτ oε thσ board¼á thσ neeΣ fo≥ ß ì
downloaΣ passworΣ wil∞ end«
4«á Visitor≤á wil∞ bσ giveε ß shor⌠ timσ oε thσ boarΣ (jus⌠ enougΦ fo≥á ß ì
quicδá looδá anΣá t∩ appl∙ t∩ becomσ members)«á Thσ boarΣá ha≤á no≈á beeε ì
cleareΣá oµ non-financia∞ member≤ (morσ thaε 25░ deleted)«á PaiΣ u≡ member≤ ì
no≈ havσ bette≥ acces≤ t∩ thσ board.
5«á Thσ clocδ wil∞ bσ se⌠ u≡ a≤ sooε a≤ possiblσ t∩ loτ ofµ visitor≤á anΣ ì
member≤á wh∩ overusσ thei≥ timσ limit≤ (n∩ limi⌠ ye⌠ set)«á Member≤ wil∞ bσ ì
crediteΣ witΦ extrß timσ fo≥ uploadinτ software« (amoun⌠ no⌠ ye⌠ decided)
6« Change≤ wil∞ bσ madσ t∩ thσ use≥ area≤ oµ thσ boarΣ witΦ thσ effec⌠ oµ ì
makinτá i⌠á easie≥ t∩ finΣ wha⌠ yo⌡ arσ lookinτ for«á Therσá wil∞á bσá les≤ ì
directorie≤ t∩ g∩ through«
7«á Use≥á area≤ wil∞ bσ se⌠ u≡ fo≥ publiπ domaiε (SIG/═ etc⌐ volume≤á anΣ ì
thesσá volume≤ wil∞ bσ pu⌠ oε thσ boarΣ a⌠ YOU╥ reques⌠ (providinτ wσá havσ ì
them)« UPLOA─ director∙ WIL╠ NO╘ allo≈ downloading.
8«á Al∞á programs¼á listing≤ anΣ othe≥ materia∞ froφ eacΦ month≤á Catche≥ ì
wil∞ bσ oε ß director∙ calleΣ CATCHE╥ anΣ availablσ fo≥ downloading.
9«á Thσ use≥ areß AUTHOR╙ wil∞ bσ se⌠ asidσ fo≥ an∙ contribution≤ fo≥ thσ ì
Catcher«á T∩á senΣ direc⌠ t∩ thi≤ areß anΣ by-pas≤ thσ uploaΣ director∙ usσ ì
thσ commanΣ REC╓ AUTHOR╙ filename.ext
10« Persona∞ message≤ shoulΣ bσ cleareΣ b∙ thσ receivers« Fo≥ Salσ notice≤ ì
shoulΣ bσ deleteΣ wheε thσ salσ i≤ completed«á An∙ messagσ lef⌠ longe≥ thaε ì
threσ (3⌐ month≤ wil∞ bσ deleteΣ b∙ thσ SYSOP« N╧ exceptions«
PLEASE NOTE NEW NEW RBBS NUMBER
AS OF 1st MARCH OUR NEW NUMBER IS
(03) 82 - 1571
è EASTER.MWB
00010 REM -------------------------------------------------- █░╣╖▌
00020 REM ____ EASTER ____ Conv. from TRS-80 to Microbee █░╣╕▌
00030 REM by Alan Laughton June 1984 █░╣╣▌
00040 REM -------------------------------------------------- █▒░░▌
00050 CLS: PRINT \ [A24 95]"* E A S T E R *"[A24 95] █░╣╢▌
00060 PRINT\TAB 10 "This program will find the date on which Easter"\TAB5
"(Easter Sunday) will fall on." █▓╡┤▌
00070 PRINT \\ TAB 24; : INPUT "What year ? "J █░│▓▌
00080 IF J < 100 : J = J + 1900 █░▒┤▌
00090 A = J - (J/19) *19 █░│╕▌
00100 B = J - (J/4) *4 █▓▓╖▌
00110 C = J - J/7) *7 █▓│╡▌
00120 T = A * 19 + 24 █▒│╕▌
00130 D = T - (T/30) *30 █░╣░▌
00140 T = B*2 + C*4 + D*6 +5 █▒╣▒▌
00150 E = T - (T/7) *7 █░░╡▌
00160 F = D + E - 9 █░╡▓▌
00170 PRINT\\TAB 13 "Easter Sunday falls on "; : INVERSE █▒┤╕▌
00180 IF F > 0 THEN 210 █▒╡╕▌
00190 F = F + 31 █▓┤▓▌
00200 PRINT " March"F","J" " : NORMAL : GOTO 270 █░││▌
00210 IF F = 26 THEN 250 █▓▒▒▌
00220 IF F <> 25 THEN 240 █░▒╡▌
00230 IF D = 28 THEN 260 █▓▒┤▌
00240 PRINT" April"F","J" ":NORMAL : GOTO 270 █░╡░▌
00250 PRINT" April 19,"J" ":NORMAL : GOTO 270 █░▒╣▌
00260 PRINT" April 18,"J" ":NORMAL █░░╖▌
00270 PRINT\TAB 21 "Another year <Y/N> ? "; █░▒▓▌
00280 A0$ = KEY: IF A0$ = "" THEN 280 █▓╡│▌
00290 IF A0$ = "Y" OR A0$ ="y" THEN RUN █▓░╡▌
00300 CLS: PLAY 23: END █░╣▒▌
?? HELP ?? HELP ?? HELP ?? HELP ??
I≤á ßá doublσ prograφ boo⌠ possiblσ iε C.I.A.┬ witΦ setu≡á likσá Basiπá anΣ ì
anothe≥ program?
?? HELP ?? HELP ?? HELP ?? HELP ??
$ FOR SALE $$ FOR SALE $$ FOR SALE $
128 -->> 512 upgrade for Macintosh!! $250.00 installed, tested & software.
$150.00 chips only & software (not installed) Peter Broughton 347-8114
Coming soon.... 512k upgrade for 128k Microbee.
$ FOR SALE $$ FOR SALE $$ FOR SALE $
?? HELP ?? HELP ?? HELP ?? HELP ??
I would like a program on 5 1/4 disk to generate random numbers.
Noel Johnston 288-9614
?? HELP ?? HELP ?? HELP ?? HELP ??è OOPS WE MADE A BLUE!!!
Iεá thσá Januar∙á anΣá Februar∙ issue≤ oµá thσá Catche≥á therσá werσá note≤ ì
precedinτá thσ Basiπ Listing≤ pertaininτ t∩ ^G'≤ includeΣ iε thσá listings« ì
Thesσá ^G'≤ showeΣ u≡ oε m∙ VD╒ anΣ a≤ the∙ werσ no⌠ prin⌠ code≤ ╔ expecteΣ ì
theφá t∩ print«á Thσ probleφ wa≤ pointeΣ ou⌠ t∩ mσ afte≥ thσ Januar∙á issuσ ì
anΣá ╔á jus⌠ though⌠ ╔ mus⌠ havσ useΣ thσ wronτ listinτ wheεá printinτá thσ ì
magazine« T∩ se⌠ everybody≤ minΣ a⌠ easσ ╔ havσ includeΣ thσ line≤ a⌠ faul⌠ ì
belo≈á witΦá thσá ^G'≤ iε thei≥ correc⌠ placσá anΣá PRINTED«á Thσá checksuφ ì
number≤ oε thσ prograφ listinτ werσ correc⌠ anΣ accounteΣ fo≥ thσ G's.
JANUARY LISTING "PRIME.MWB"
00280 PRINT\ "^GFINISHED" : OUT#0 : PRINT"PRESS <M> FOR MORE OR
<Q> TO QUIT" [097]
FEBRUARY LISTING "TOWNS.MWB"
00110 GOSUB 220:IF C>19 THEN SPEED 254: PRINT SPC12
"^G C O N^G G R A^G T U L^G A T I^G O N S^G ! !":
SPEED 0: USR(32774):END █░╖┤▌
?? HELP ?? HELP ?? HELP ?? HELP ??
WANTED... 5 1/4" 80 track DSDD Drive. Chris Wignall. Phone 435-8714
?? HELP ?? HELP ?? HELP ?? HELP ??
?? HELP ?? HELP ?? HELP ?? HELP ??
Iε Toφ Moffat≤ prograφ fo≥ thσ listeninτ post¼á ho≈ woulΣ ╔ storσ thσá tex⌠ ì
iε Wordbeσ whils⌠ stil∞ beinτ ablσ t∩ reaΣ theφ ofµ thσ VDU┐ Barr∙ 786-0369
?? HELP ?? HELP ?? HELP ?? HELP ??
TOWNS2 .MWB
Öá Iεá thσá las⌠ issuσ wσ publisheΣ ß MicroworlΣá Basiπá listinτá calleΣ ì
"TOWNS.MWB"«á Thi≤ i≤ ß seconΣ versioε oµ thσ game/quizz┐ Al∞ yo⌡ wil∞ havσ ì
t∩ d∩ i≤ loaΣ iε you≥ firs⌠ version¼á replacσ thσ line≤ belo≈ anΣ savσá thσ ì
ne≈ version« Remembe≥ therσ arσ n∩ space≤ afte≥ thσ "!ó iε linσ three« ED.
00003 REM !"(0(5$/''('',&.602.26(9,//(+,$:$7+$/$5$$1$.,($03+,7+($75(
*28*+6@%$<%81<,30(5,1235(6721'$5702255$,1%2:&25,2+($/(69,//(.,
1*@/$.(*$5),(/'38&.$381<$/28<(1
00480 DATA"Green","Deceased Richard","Stop for a ...",
"Home of barbers & oranges","Legendary Red Indian",
"Heroine of Dr Zhivago" █░╖▓▌
00490 DATA"Political disorder","Greek plays held here","Whitlams Inlet",
"Mythical Australian animal","Australian sheep" █░╢│▌
00500 DATA"Battle to end 1745 Rebellion","Dash often","Ends in Gold",
"Whisky","Town of jerks","Nobel waters","Famous cat" █░╢▒▌
00510 DATA"Scream after preparing to kiss for a joke.",
"A bankrupt Japanese will ...." █▓┤┤▌
00520 END █▒▒░▌è MBUG PUBLIC DOMAIN DISKS
A≤ froφ thi≤ month¼á wσ wil∞ bσ publishing¼ wheε available¼ aε inde° oµ thσ ì
cataloτ oµ disk≤ tha⌠ arσ oε salσ a⌠ o≥ througΦ thσ Bazaar« Thesσ disk≤ arσ ì
no⌠ par⌠ oµ thσ SIG/═ etc¼á publiπ domaiε disks« Thσ cluΓ ha≤ extracteΣ thσ ì
mos⌠á commonl∙ useΣ program≤ froφ thσ publiπ domaiε anΣ addeΣ t∩á thi≤á thσ ì
mos⌠á usefu∞á oµ thσ program≤ useΣ b∙ thi≤ club«á Wheε al∞ thσá SIG/═á typσ ì
(useful⌐á genera∞á program≤ havσ beeε includeΣ iε ou≥ catalog¼á wσ wil∞á bσ ì
includinτ article≤ froφ olΣ anΣ curren⌠ "Catchers"¼á contribution≤ tha⌠ arσ ì
to∩á largσá t∩á usσ iε thσ Catcher¼á a≤ wel∞ a≤á thσá bette≥á program≤á anΣ ì
article≤á tha⌠ havσ beeε downloadeΣ t∩ thσ Bulletiε Board«á ┴ cataloτá disδ ì
wil∞ bσ madσ bσ madσ availablσ iε thσ nea≥ futurσ bu⌠ a≤ therσ i≤ les≤ thaε ì
2░á disk≤á a⌠á thi≤ timσ i⌠ ma∙ no⌠ bσ oµ valuσ t∩ purchasσá yet«á Wσá wil∞ ì
includσ thσ cataloτ oε thσ firs⌠ fe≈ disk≤ (iµ spacσ permits)«á Thesσ disk≤ ì
wil∞ sel∞ a⌠ thσ norma∞ pricσ wσ chargσ fo≥ thσ SIG/═ disks«
B┼ WARNED,Æ i⌠ wil∞ bσ cheape≥ t∩ purchasσ ou≥ disk≤ oµ utilities
thaεá spenΣ you≥ mone∙ oε somσ oµ thσ nationall∙ advertiseΣá publiπá domaiε ì
compilatioε disk≤ oµ SIG/M¼ CPMU╟ o≥ CU╟ utilities.
Cat ## File Name Size CRC Description
001.01 / .HLP 1K 88 F4 Help for /.COM
001.02 1ST-READ.ME 1K E8 3E How to read PART.xxx Files
001.03 BISHOW .COM 1K 6B EC Paging version of TYPE.COM
001.04 BITMAP .HLP 1K 94 2F Help for BITMAP.COM
001.05 C .HLP 17K 68 CC Help for "C" ASSEMBLERS
001.06 COMPARM .HLP 1K 67 46 Help for COMPARM.COM
001.07 CPM .HLP 32K E4 BC Help for CPM
001.08 CPU .HLP 3K A6 92 Help for CPU.COM
001.09 CRC .COM 3K B2 07 Check CRC of File
001.10 CRICKET .HLP 1K 72 6B Help for CRICKET.BEE
001.11 DASM .HLP 9K 8D AB Help for DASM.COM
001.12 DU-TUG .HLP 34K 04 EE Help for DU-77.COM
001.13 DUU .HLP 14K 4F E8 Help for DU2.COM
001.14 FIND .HLP 2K 46 22 Help for FIND.COM
001.15 HELP .COM 2K D6 CC Type HELP {filename}[.HLP] <CR>
001.16 HELP .HLP 7K 95 1B Help for HELP.COM
001.17 JOINMBUG.AUS 6K 2B D6 Join MBUG AUSTRALIA INCORPORATED
001.18 L .COM 2K 41 80 Directory List Type L ::<CR>
001.19 M80 .HLP 8K CC A3 Help for M80
001.20 MAC .HLP 8K FF A2 Help for MAC
001.21 MASM .HLP 8K CC A3 Help for MASH
001.22 MBASIC .HLP 21K 40 F9 Help for MBASIC
001.23 MCOPY .HLP 11K 96 9E Help for MCOPY (MULTI-COPY)
001.24 PART1 .IQS 8K FC 44 Tutorial on dBase II
001.25 PART10 .IQS 10K 63 F0 |
001.26 PART2 .IQS 8K 48 D2 |
001.27 PART3 .IQS 9K F9 94 |
001.28 PART4 .IQS 8K 9F EB |
001.29 PART5 .IQS 8K 7B 56 |
001.30 PART6 .IQS 8K 16 AA |
001.31 PART7 .IQS 7K F4 22 |
001.32 PART8 .IQS 7K D7 6E |
001.33 PART9 .IQS 8K BC 69 |
001.34 PREFACE .IQS 14K 79 E9 |
001.35 UNERA .HLP 3K 9C 28 Help for UNERASE.COM
001.36 ZCPR .HLP 15K 26 9D Help for ZCPR 1
001.37 ZTRECK .HLP 14K 4E 5D Help for ZTRECK.BEE
Library -MBUG Volume Number-001, 37 Files cataloged.è BAZAAR RAMBLINGS
┴á numbe≥á oµá ne≈á item≤ havσ beeε addeΣ t∩ thσ lis⌠á oµá good≤á availablσ ì
througΦ thσ Bazaar« The∙ arσ thσ rangσ oµ Poo≥ Person'≤ Softwarσ.
Write-Hand-Man:
Simila≥á t∩á 'Sidekick'«á Thσá use≥á i≤ provideΣ witΦá ßá numbe≥á oµá 'Desδ ì
Accessories'¼ eτ takσ notes¼ finΣ phonσ numbers¼ checδ appointment≤ iε ß 1┤ ì
da∙ diar∙ anΣ d∩ He° o≥ decima∞ calculations¼ al∞ withou⌠ leavinτ Wordstar¼ ì
dBase¼ Multiplaε o≥ simila≥ CP/═ programs.
Spooler:
Thi≤ allow≤ thσ use≥ t∩ prin⌠ ß filσ o≥ listinτ a⌠ thσ samσ timσ a≤ runninτ ì
ß program.
Spelling Checker:
An∙ CP/═ tex⌠ file¼á sourcσ codσ etc¼ caε bσ checkeΣ fo≥ incorrec⌠ spellinτ ì
agains⌠á thσá supplieΣ dictionary¼á whicΦ contain≤á 33,00░á words«á Specia∞ ì
dictionarie≤ ma∙ bσ buil⌠ b∙ thσ use≥ fo≥ specifiπ needs¼ ß lß "THEWORD+".
Mailing Label Processor:
Tw∩á menu-driveε program≤ allo≈ thσ selectivσ printinτ oµ mailinτ o≥á othe≥ ì
label≤ iε ß variet∙ oµ font≤ o≥ formats.
Keyed Sequential Files:
I⌠á provide≤ ß CP/═ residen⌠ extensioε tha⌠ support≤ keyeΣá anΣá sequentia∞ ì
acces≤ t∩ CP/═ files« KeyeΣ file≤ ma∙ bσ written¼ updateΣ o≥ reaΣ eithe≥ b∙ ì
ke∙ o≥ sequentiall∙ througΦ ß serie≤ oµ eleveε ne≈ BDO╙ calls.
Menus:
Thi≤á packagσ include≤ aε interactivσ men⌡ desigε anΣ edi⌠ program¼á ßá 'Cº ì
languagσáá runtimσá library¼áá ßá termina∞á configuratioεá prograφá anΣá aε ì
interactivσ Mai∞ Lis⌠ Manage≥ program.
Crossword Game:
CrossworΣá puzzle≤ caε caε bσ designeΣ oε thσ screeε anΣ severa∞á saveΣá a≤ ì
onσá file«á Wheεá puzzle≤ arσ displayeΣ fo≥ thσ playe≥ t∩ solve¼á thσá worΣ ì
meaning≤ arσ listed.
Spread Sheet:
It≤á flexiblσ screeε desigε systeφ allow≤ placemen⌠ oµ thσ informatioεá yo⌡ ì
neeΣá exactl∙ wherσ yo⌡ wan⌠ i⌠ t∩ appear«á Thσ packagσ include≤ ßá 28-pagσ ì
manual¼á ß tutoria∞ t∩ ge⌠ yo⌡ u≡ anΣ running¼ anΣ seveε workeΣ example≤ t∩ ì
demonstratσ thi≤ product.
Window System:
Thi≤ prograφ allow≤ thσ defininτ oµ window≤ oε thσ screeε anΣ switcΦ outpu⌠ ì
t∩á an∙ oµ them«á BackgrounΣ task≤ ma∙ havσ separatσ windows«á EacΦá windo≈ ì
appear≤ a≤ ß separatσ 'terminal'«á Thi≤ packagσ i≤ distributeΣ a≤á assembl∙ ì
sourcσá code¼á anΣ require≤ somσ mino≥ programminτ b∙ thσ use≥ t∩ configurσ ì
i⌠ fo≥ fo≥ ß specifiπ terminal.è*** 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
SDS5 Blank 5.25" Disks (SSDD) $ 2.00
WC04 WILDCARDS 4 $13.00 SDS3 Blank 3.5" Disks (FUJI SSDD) $ 6.00
BB0▒á Basiπá fo≥á Beginner≤ (D.Kenny⌐á $15.0░á SDB│ Blanδ 3.5ó Disk≤ (1░ pe≥ box⌐ $50.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 DB59 Disk Storage Box 5.25" (Lockable, holds 85) $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) $40.00
GS01 Bunyip Adventure (Tape or Disks) $18.00 GJ01 Joystick $32.00
GS0▓ Grotniδ War≤ (Tapσ o≥ Disks⌐ $18.0░ MS0▓ CP/═ Utilitie≤ Vo∞ ▒ (3.5" $7.00) $ 5.00
GS0│áFli≡áá (Tapσá $8.00⌐á (Disks⌐áá $11.0░áá MS0│ Setdisk,DPP,etπ $ 5.00
WHM▒áWrite-Hand-Maεá $38.0░á SS0▒ 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
** 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 ***è TAPE LIBRARY SECURITY DEPOSIT REFUNDS
A≤á oµá 1s⌠ MarcΦ 198╢ tapσ securit∙ deposit≤ wil∞á end«á Thσá probleφ ì
encountereΣá i≤á thσ settinτ asidσ oµ thσ fund≤ fo≥ re-paymen⌠á a≤á member≤ ì
leavσ o≥ reques⌠ thei≥ deposit≤ refunded« Thosσ peoplσ wishinτ refund≤ mus⌠ ì
appl∙ oε thσ forφ founΣ late≥ iε thi≤ issue« Thσ refunΣ wil∞ bσ iε thσ forφ ì
oµ ß credi⌠ notσ tha⌠ ma∙ bσ useΣ t∩ hirσ morσ tapes«á Credi⌠ application≤ ì
wil∞á appea≥á iεá al∞á issue≤ oµ thσ Catche≥ unti∞ Junσ bu⌠á wil∞á no⌠á bσ ì
accepteΣ afte≥ 25tΦ JUN┼ 1986« Al∞ money≤ remaininτ afte≥ tha⌠ datσ wil∞ bσ ì
transferreΣ t∩ consolidateΣ revenue. NO EXCEPTIONS
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.
Fo≥ thosσ peoplσ wh∩ d∩ no⌠ wisΦ t∩ damagσ thei≥ magazine¼ ß photocop∙ ì
oµá thi≤á forφ wil∞ suffice¼á o≥ thi≤ applicatioε wil∞ bσ a⌠ eacΦ cluΓá anΣ ì
hackers meetinτs unti∞ JUNE.
Thesσá credi⌠á note≤ wil∞ allo≈ yo⌡ t∩ hirσ ß tota∞ oµ fivσ (5⌐ tape≤á froφ ì
thσ librar∙ on two separate occasions.
e.g. 2 tapes one night and 3 the next or 3 one night and 2 the next.
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Σ ì
TAPE RECEIPT NUMBER if known.
?? HELP ?? HELP ?? HELP ?? HELP ??
Q«á Oε ß singlσ disδ system¼á i≤ therσ an∙ wa∙ oµ savinτ thσ samσ filσ t∩ ì
morσá thaεá onσá disδ withou⌠ usinτ ZIP.COM¼á CP.CO═ o≥ an∙á standarΣá filσ ì
copyinτ programs?
A« Yes« Firs⌠ makσ surσ yo⌡ havσ ß "systemó oε eacΦ disδ yo⌡ arσ goinτ t∩ ì
cop∙á thσ prograφ t∩ theε follo≈ thi≤ example«á Iµ yo⌡ wan⌠ t∩á cop∙á L.CO═ ì
(director∙á lister⌐á firs⌠á ruεá thσ prograφ ╠ <CR╛ anΣ wai⌠á fo≥á thσá thσ ì
prograφ t∩ finisΦ runninτ theε inser⌠ thσ ne≈ disk«á Hi⌠ ^├ (warφ boot⌐ anΣ ì
theε SAV┼ ╕ L.CO═ <CR>«á Thσ numbe≥ t∩ usσ i≤ thσ filσ sizσ iε ╦ multiplieΣ ì
b∙ 4.
?? HELP ?? HELP ?? HELP ?? HELP ??è # / /
THE MEMBERSHIP SECRETARY
MBUG AUSTRALIA INCORPORATED.
P.O. BOX 157
NUNAWADING. Victoria. 3131.
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:____________________________ |
|_________________________________________________________________________|
|
|
|
.-------- yes -------<-- NEW MEMBER -->------ no --.
| |
| .____________|___________.
| | |
|<--- Member No.______<--- yes ---<---| RENEWAL |
| | |
| -------------------------|
| |
YEARLY FEES no
| |
RENEWAL OF MEMBERSHIP [ ]-yes--. .----------------------------.
FULL MEMBERSHIP @ $20.00 [ ] | | CHANGE OF ADDRESS |
(includes schools & businesses) + | | OR ANY OTHER CHANGE |
COUNTRY @ $20.00 [ ] | | eg. Phone No. etc. |
OVERSEAS @ P.O.A. [ ] | |-- --- --- --- --- --- --- |
STUDENT (Full Time) @ $15.00 [ ] |--> | attatch old mailing label |
+ all members except student | |
| HERE |
------------------------------
PAYMENT FORM AT BOTTOM OF PAGE.
╔ 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.................è