5 'PDFMT.200 V1.0 [3-15-91]
6 '(C)1991 by James Yi [73327,1653]
7 'PDD disk formatter
10 CLEAR256:PRINT"Loading.."
20 FORM=63415TO63708:IFS$=""THENREADS$
22 D=(ASC(MID$(S$,1))-97)*16+ASC(MID$(S$,2))-97:POKEM,D:S$=MID$(S$,3):C=C+D:NEXT:IFC<>41889THENGOSUB85:END
30 RESTORE100:CALL63415,,HIMEM:GOSUB80
70 FORW=1TO500:NEXT:MENU
80 IFPEEK(63408)=0THENPRINT" Loaded":RETURN
85 PRINT" Cksm Error!":BEEP:RETURN
90 DATAofcbegphagaimnghpiohhhcdafmclnphmnajcmofcblaphagahmnmbfncbplpeaoagmnlnpickpnpeofciagecelckgfpgmnkiicnkdnemofbbgdpgonainj
91 DATAobbbplpeagagofmnlkebnbmbmfmnlnpioboddokamnkmcnmbobaimnhlpilhmebopicblapheomnhlpijbhhmjofonodnjbdbdmbaieeenonbdbdofonajnj
92 DATAobbjofbdbdnfmfabapaagagiciabmdeipimnmjpincehpibjbimnmjpinkeapiblbjaimkfipiajnmkiebmbnbbjolobninpniofonajnjmddcpiofckglpg
93 DATAhocdccglpglhcdcdcdcdcdmkglpiobmjofnfcblbphboaihocddfpmjlpibpclhhhkbpfhbnmcicpicligilahhhhknbobmjdgafofcblephhodnpcldpimn
94 DATAghpipockmclhpimnghpingdjhhdkldphclhhngdlobmjmnhlpihhcdalhilbmclnpimjofcblfphhocddfpcnipidgahmnhlpiclbphhobmj
100 DATAPDFMT CO[di^=;au>NBv;*;A`AV`HBC`\RUnLbF[woU[KrV[SqVmpQSo<KNjDRT;KOUnhACixAX[CRT\LQYg;MLMD@C^;=;KL_LHL@CQ@^Fk;mQnoMGooMIl
101 DATAo`=;GYp@RZt\K[@^RYpskKvLbwsPRWx`BMneJgieBGY>R[@^RXlpRYCXfykueYk>R[@;*z*z*`gxnrEJfPGGcJQYn^hYn`YcJUpwKAqwKAeNSfFVn>TsNv@Y
102 DATAt>nsuJtrCHJ_\<q\wDiyFHJ_\\JgTHQYn[ySnTOsPJpWA@ypL>zuurHM[JpWA@Q[whiI<j_VnapSs=nU@uTh?CVhDDZ`B;?MserGVfrGbf>gjCvpkCMKnmey
103 DATAfbxaC@xiGmnZJmkJz\sO=rogrAqwHgrg>grGFgB<;Bpw=gbbG]hyd;B<;BoGVfv[IHf\SuOJzBxodCBMserwSfrWA@YrC@CGCgJgTHAMNlCMseV[;Hn>vyok
104 DATAk>TSC\fYn^hiZ^owKAQ[k=lykapSnmeiI]hydCB=\zrWTgB]`JoWTgB=`JCmseBM;;CMseB<<lGGnf^>;fFmSeB=ogF=HjB=bergbbxeG`dYnWjYnIliD<s]
105 DATAL]_juLc<;HnwuyXemimYCadYnYYQnAniknmiJAoWmfB=[ergbbpglgfg\gB=;;C=HjbWnkNppHN<?ybPmeGautBMTeN^ZyF[kimYp\OcuHvtT\V=;HjkL>JF
106 DATAv\cjaJuuMhFReq`yK`yKDhVYjpwEU`MdOOIWENlOw`WMbeWw