#11 Article 3289 Posted at 1989/07/17 15:55:57 by 秋葉台 (MAP1154) [PRG.KTY]

Subject: KTY Loader BASIC Ver. 1.00 (TEST Ver.) For GW & Quick BASIC

お久しぶり登場の秋葉台です。今回のプログラムは、メイプルの住人の皆さんには

あまりなじみがないＫＴＹローダと呼ばれるローダのＢＡＳＩＣ版です。これは、レ

ッドバロンさんから依頼があったものを作ったもので、本来なら個人的にお渡しすれ

ばいいんですけど、今回恥をしのんでここへＵＰすることにしました。

　で、出来栄えなんですが、テスト用データが少ないこともあっていまひとつ自信が

持てません。というわけでＢＵＧレポートおよびＫＴＹデータの提供をどなたでも結

構ですのでお願いします。

　ＩＳＨ＆ＬＨａｒｃですが、中身は単なるＢＡＳＩＣプログラムです。汚いコーデ

ィングしてますが、ひとつ笑ってやってください。なお、本プログラムは、ＧＷ－Ｂ

ＡＳＩＣならびに９８用Ｑｕｉｃｋ　ＢＡＳＩＣで動作します。なお、後者の方は、

テストしてから若干のプログラム変更を行ったので、正常に動作するかどうかわかり

ませんが、たぶんＯＫだと思います（エラーとしてオーバーフローがよく出る）。

　では。

<<< KTY.LZH for MS-DOS ( use ish ) [ 49 lines ] >>>
##]ｱ##tR#/%t#ｽ<[ｵt#%&)/Wｶ:%#:Nt=ﾐｾ･#########################################cLE
##]ｱ##tR#/%t#ｽ<[ｵt#%&)/Wｶ:%#:Nt=ﾐｾ･#########################################cLE
##]ｱ##tR#/%t#ｽ<[ｵt#%&)/Wｶ:%#:Nt=ﾐｾ･#########################################cLE
%mgﾈv7ｶD^ｱ[###ｩ>##Y:Cｺ):#8]RA･5OuWｰﾉﾈﾚﾚDcｱｷｵj7N'ﾄｶ]g｢IDﾋjcﾕcﾌﾕﾞﾈ)KﾁtnKiqﾎﾔﾜﾙﾚ｣6
&ﾇﾚﾘﾘﾏHﾄﾃﾌﾈﾄ\ﾞﾃ>ﾚtﾝﾘﾔｩj^:ﾊ/+ﾑG=|prﾆｴF｣ﾐｻｯbｺnｰyﾏﾅﾋlﾒｦﾕGﾎAｻy｡Ce\<4ｻ2ﾛﾈﾔﾞﾎﾊﾘﾜﾆﾃ67ｫ
'DｸﾘsﾝEt^Tｼm#ﾛrNﾛ･ﾉ#I>ﾚｶｲﾌﾇ|ｨﾜｴｦｮｼｰXﾀ4>Tﾝ?ﾔｪﾉﾄc|lvｶ64ZOﾈﾃ｣ｩﾊZｸｸﾐEHdz]ｦsrvｧGHdﾈV
)ﾅyﾗﾛcNtﾞﾋﾖ?xﾂVﾎTY｣egNﾊ｡Wﾎ;\ｻ)m8ｯｧv78ﾜﾊ?ﾐﾞqﾄ9ﾁUrAｾn｢99ｽEENfcｻuKpHd#Hｩ<g=L2xU#,x
+rtﾒx,｣uUｲｹｪﾅﾅ8>yｪﾜ)ﾜ^ｯNU+EﾎvWｻﾞﾉYｻAgｪ;ｻrﾊ=ｱﾋ･9ﾘCﾋﾘZﾇKﾌｸｱｫ､ｧcnｩ?､iｻm;ud%ﾙ26vｩ9i
,Hp&yｯｩﾞxｲf|5ﾗTUjﾛﾑﾈﾜ#OCq[ﾌ｢ｻlﾞﾆﾕﾉﾇﾜﾖ7cEFﾁｯ｡xRl､%｡ﾕﾜﾅf%ｸjｽﾜﾗﾘg7ｾLcﾒﾐYｸ6ｾﾛzﾆZｶ]･
?ﾝﾀﾐﾆNﾀﾄIZﾖｨﾔｫ\ﾘ:Zmｷ?qﾞｬﾑﾇ7^[ﾚ]zｻZﾇFxiﾇI/ｴ\Uﾝ%h5､GｽTｫ92ﾅｵｫNﾌLX7｣ajRLz6ﾈﾛﾏｲkﾆﾊｼ9
/ｴﾗｸ=ﾑHCiYﾗR,ｷGﾁｶzﾘﾉﾎﾊｼｸﾑｹ6｡Fz5ﾝ｣ｱ､u/5Cｦ?)9Tﾌﾞ|ﾂNｾﾒN|?pﾛｼpﾉaｩva､ﾐyﾘ<:\ｮ｢ｨﾕｻｰdiｬ
2ｪﾕｹｩ6uxgｨｦXﾖｶ4ﾏFFﾇmIjﾘｴ<'ﾒ,a[\z4jj#iｮｴhﾀbhｩVLVﾃｨnﾘｦGﾑuppuL<nﾕｦt;7EdｾXｩﾂ2d5ﾜtAF
4WNyk｡O;NｸｷｶﾄF8ﾞBﾛDﾞcjp,Tｾ]48&jf&ｰ'ﾝｲHIﾘD946ｦ&TLｪfｸ=xﾐ\｡=[[uﾏﾗ'ﾅtn6WVｦ2]T\ﾂRApﾝ
5v｡RNd]%eﾔﾌﾕﾞzHT5ｶﾅ､ﾅlﾈ<ﾀfﾀjBRﾁZT;:\ﾂｩﾁ2yｶKsﾑhTY;C[RｲﾁjｽvﾋAEｨWUpW｡ﾇ=)Ob]ﾅO]aｰﾔG
6]､=;ｺDtｺｧ>y/yｼｻｮｺ5Wh%+9|WdﾕTﾀﾕxﾕTｷｴｮGfXm,<ﾔbﾊtV9&ﾘ:?&jm,｡xIﾑ､/ｪﾄﾌhｬ&%Adﾐ=nﾛDzｼ
7ｸcZ｢ﾂ･/｣d\,ﾋｴ=ﾁ;8OzﾞU｡'tnyg､ﾂO|ｦ6KNaqrｶﾖ'ｸbi,ﾖdVﾉｽUｾLvｯ=7ｻﾄIKﾉG%/ｪIRFｾｷﾌﾊﾊｼ･c'
8ﾅfUﾌ|yｦqrﾗ/ﾜﾖ=Nｻ<ﾔuﾎｽ｣ｨqｾﾞｦﾝ&Dｬ9ﾋ?ﾏﾘNiNﾘ2s｢ｩﾀ|｡C4ﾘ>ﾞ\Zﾈﾑjhｷiｴｪﾕ&AﾔqDbaiﾄｫｩﾉﾗｮｷ
9]rﾝｼs\ﾚﾁ｡ﾂ;ﾀ[WE<zｨﾗyCuｵi]^iｲ<Uxﾎﾀr｣+AEjｦﾃ｣ﾒﾀXｦ5､｢CCｯ･:,Wｹｹﾗxｽ)ﾔ)ﾁF･ﾚr,ｺ2ﾙﾐiX&:
:[jkｲ'ｻ[ﾉ?hqﾉyｰﾚWﾌ7ｩBﾑﾃuyｩc｢ｶlｻmlUﾝ｢ﾚﾅ#pI･ｩﾋRuｯHE[ﾏc%ﾐﾋ4ｸﾗZAU/ｻFﾜｴuﾁX#fﾕvｾ｡｡ｬﾏﾛ
;ｪﾔjｯ)ﾀﾌ:Dp｢ｷ:2ｷrｺﾅﾎg8T%pﾖZsﾁ;;ｲﾌ^^ﾅkﾂ4&ﾝ2p7;Aﾂﾖ;Yｺ)ﾅ2ﾏW85Bﾏ&XｸA^ﾅA|9vxﾇﾞﾖｶ^?､O
<y\4V=ﾁﾊｹ>xｩﾝﾐKｯﾜehqｸ)ｺm/rﾋ&ｲ｢]ｺjｯsｶ8ﾈ>Iﾞiﾉ8?nimﾜ]8ﾛUﾁ%ｰﾀFﾃｷNcZAOﾔｺ%eﾊﾏBｽa;ﾋCFｺ
=cﾜﾏhｩ6OﾌAv)ﾁ4bt#,ﾘ､xﾃｱｱｾﾒnﾆ<ﾌｨﾖ;FﾇdｮWK\ﾄ67j｢ﾐ6･Zﾗ>2hOｺ[^WﾄﾞﾖIﾕHｰ92Hs6ｯuhxsﾇﾊｯ/
>Yz8ﾆWjﾑﾋｮﾆVｩﾅｫ/;ｶ#Oy7ex･ｽﾏ\u｣7ﾖK9jm7=jｫﾒUj[ｦｹ<E)5ｾDh｣ｲOｺｹﾈ｡tｨrｻnNﾗｲsVZ/+ﾁ6W>ﾅ｣
AﾒﾑLTﾅﾄ]^srYyｲBﾖ･ﾚｲｴﾖｽ\]cvqｩｺ:xﾑYｽ｢｣ZXｸcmzｨﾋﾔﾐN､Nｷ<Fﾚ5ﾊ]I5pﾕd?ｱbｸ\R9ﾌﾒｾﾗKﾉｼnｯk)
BﾙﾝﾔE&qUK4ﾅﾙﾏﾇｮ｡|ｩrDｧ:hｲUｲ)4W=:jﾜｧsﾐｽｽｺｨﾄ,ﾙﾉﾜFf=9ﾕuｶTｮyqhdlｰｮ?hｨﾙfnﾖq｡NｵｩbﾒxZhｰ
Cｼ\I/#hsﾉｹHｫ\ﾎHｫ\ﾙ2Kﾆｸf,｡ｼi|ｴｻysI9qﾌｷ#/ﾚ&\?ﾗ8ｷｪｨKﾙｷｻRLZ7ﾕ=ﾝﾒ､ﾜﾛﾝﾊV46ﾘﾇﾜjpｻ=ｸﾒ,)
D,ﾚmｩ9ﾄﾚ[vpﾈﾜ[BEﾑkXnｽﾖsｷlｦﾋﾘﾏBﾖｻ｡hｫrOﾉﾙdｹｺvｮbﾜcﾂh,/LChｾ\bﾄHﾛｦrﾁU&XﾑﾋChﾄfaﾖ|k6ﾋﾅ
EｬｴdiｩｺWHﾈpI|pRjｼｹﾚ+ｷ,5ﾖazL7|ｹxﾌYFﾅｦｺF'[vkIｺ|ｵﾏｫﾝﾞu9ﾔｧﾛ|:ｫIK|ﾊｻﾄﾘﾎD2dﾋj)hｩｼWﾔﾏ>
FBId\ｩBﾋﾎ'ｶEﾑO%ｸUｯpXp4<｡8uｧﾉｦvｩﾎrｨﾚﾃﾇｺｨﾃｯﾀs､=ｹﾞﾌz;zﾁ[)^ﾒﾏｲｰｺﾈ･ﾝｷﾉｸqkNﾚｩﾃﾖｱﾛﾚU=ﾗ
Gｱrﾈﾚﾑ[ﾗｹAﾗｶﾏDOqｹｱﾀｧﾏ|dﾕﾞ<ﾔﾄｷGｱLｾ?rﾞﾅﾞI･ﾇﾔﾖpﾉiﾁqzcﾛﾜﾅdqﾘﾖT､Lkﾒqｪ｣WI|lsﾚｺﾉﾑ｡ｼeﾗ<
H]ｾﾁ%ﾜXFﾗVﾘdﾘｹl2L>El=ﾝﾎﾕﾜDq,ﾝhLrｾﾔgﾙﾊｵ｣ﾚUｩ]sﾋX/2szﾇｲFDp]iﾙﾄ6?ﾇBﾜc)xzｰsﾑｾｴｪﾒｺﾁｩｦ
I4ﾛ>ｨqﾇｸKｸｲｷKCjﾞﾋg=4ｺEg?clhｼｻNﾚHﾇﾜｵTGﾄｪﾑ|Lｴｱｧ7B5ﾒ｡ｸ;szﾉqﾕVｵｮｲﾀﾌﾜ｡hzｷﾈｷｯｻmﾘX5ｺﾗ/
Kﾝﾕ,Cﾊlｻ+47ﾚｮ6ﾒHﾆyﾚaｫｺﾅｯﾂ5ﾒﾃﾌﾚ5+,NﾃWｴ?ﾉﾞｷｴﾜO｣ﾙnﾙｧUxdｲAｬﾄｻ#ｼﾎz>ﾌ5Rｷ?ｷX/qILﾙｨﾇO+ﾏ
Lﾙ<ｯｵrｮｦﾔｬｬｦ7lﾗｧ2ｯRｬｨ,ﾆｪﾐｾﾜdﾅcｵ,<;u6ﾇﾞERﾘｪﾂ6ｦ'ｷｯWﾉﾇ｢ｺﾅﾅ\ﾀ/ｬOｨxVﾎ｡｡ｱ･ﾚdU･F)9hgﾞ7
N4<eWHqｦﾑｻｰNﾐ]ﾙG\ｶ|ﾌnaﾈｱｧﾝﾞﾇpAﾀｯｵｧｷ|ｷkﾁfﾂ6ｷfﾂﾌ､DｻK|ﾖ\:ﾕT9ﾂ=､ｲﾙﾊﾈFizﾜiｦﾈLuGLv5ｻﾅ
Or･Uiｩｺｱ･ﾊｮvﾘOqayAC5ﾗﾌｾ7ｧﾌﾞDｱﾝH5ﾜWYｧf｢ﾒfY･ｲyﾜｲ<ｩｮｫYｲﾂｺﾎhﾒdﾚｰｧRﾗﾝE8lﾖﾃﾗﾆfxｾaｦ/ｱs
RﾎｺbｫｦｻVﾁﾂﾚﾐ｢｢Ckｹｴiｦ､LﾞsZV&ﾏ7ｽRｴｮ5Faa]faﾎ59ｲｩ;;sｮ+^ﾝTｰGhAｲﾉﾘ%uaﾙﾇｺNｦｻ)FTfｬ｡ﾎﾄ#z
T,V､Oﾅ6qhRﾌv8pCK;[ﾁﾄHvcCv[ｪCvﾚTｬﾜﾛﾖﾌﾎﾞ9|kﾝ>&96ｷ\ﾏｨｵ%pｼ+cFﾑGﾒﾄLﾃsHｻｯ)ﾗﾉﾈ｡+ｧﾏｮRG]
UﾇI?ﾞdhｰ｢iﾜﾗ;VYcnde\\NY[ｸgｶｰﾏﾗG+xﾝﾆ=ｽaﾂ|Y6ﾛｨ8｢ﾋv&aﾙﾊYNDDWxﾕseB･ｧｰｦIjVr%Hj]･ﾘｰﾇﾃ
VYｼ7gﾉ8h｣qgｮWyUq#ﾛmmﾐbAﾞfﾒﾀ)E｣ﾑ9ｯｰ･ﾝGAts7ﾑ､<･dlｻ,>>ｩ7rｦ|H&X>ﾁsﾗbHvﾚ&｣ｸﾚcｽjXN｢ｫ+
WｸAﾒtm=;ﾒｬNAｧFn｢ｾﾖzGnｻｹｶ4tTﾌｷｩﾕﾕrGhﾅR9FpD88jﾙlx?ｽｲ/qﾎ/ｨﾒxﾗ･i%eﾉｬﾗ[p&ﾔz5｡｣<]ﾆCﾘｷ
Xvv｣ﾂhtﾙeｧｴ<ZTﾃ+ﾞﾏ?ｰAﾊﾐccqﾏ｡U8frｾEmqｩﾄZ2ｹｩsｯOﾕﾃﾑEb]ﾅｨ6KnGO^XyGﾐﾅdeﾊﾝu/ﾕ9ﾐ/ｵZ]ｴ6
Y#mﾖ>ｫ75\Rｻ:｣cFﾆﾒｫsKﾃﾜvｫ｡ﾛｷﾊﾏNﾜ｣ｺﾛ:､zKﾝvｩｶcTｨ=KjYﾔ+ﾃ､dR=4ﾙｲ6ｻﾖ+｢#ｺﾐﾊﾇｰﾖﾏﾈﾔｷiｺhｺ
ZｯyﾄHE,#>Dﾔﾐﾄ|9ﾎaa#nﾝ\?j+^vｨｪﾄｪKﾕﾁhﾚFfｽﾇﾁｲ#ﾂpﾏﾋ?aｴxｾ'ﾗﾛIｬn|Eｰ<Z･)ﾝｹYｽ:l\n'ｽ\'ｻ>
[kｸfｾﾉnﾖFg/ｩ&ﾐA,･ﾜｫｹiﾌB#dFﾆDｶ'ﾇﾞﾎｩ9W<>uﾎﾚXｰ｡ﾔｺL|eｱEa'kｸﾜW8Xdｫ|Rｫ#%ｦn7#######ﾎVﾗ
x/ﾘ[9ZpﾇvﾇﾊﾃX/l64[ﾀｱﾋｪE｡/V,ﾒｮ?ﾕ5ﾝｯﾏTu^5mc?ﾒｮi%ﾆﾌ=2pxﾖ2jｵｵﾔ2E4;ﾑﾙﾔHｻNzﾊﾐ;ｫｼﾕ5dｸｴ
zp]8ｸjVﾅﾆrﾋﾅﾎﾏ,O/#｡Tｰｷ:dﾆnｬVﾅﾊqｶ4ｲ6U｣s2ﾀOﾘｽｾﾌz?ﾗﾒﾊC^+,Y｡ﾖL｢ﾙhAﾃ/<ﾑｸﾈrﾇｮﾈｲ+E'ﾊ<I
--- KTY.LZH (49/49) ---