#99 Article 937 Posted at 1995/11/15 03:29:44 by OPRETER (MAP1819) [Q.ML1]

Subject: おしえてML1 & VBのえらいひと(←古い)

VBでML1エディタもどき作ってます(^^;)

 描画とロードはまぁうまくいったんですが、セーブがうまくいかんのです…

 以下エンコードルーチンのソース。一回そのまま上げたけど600行近かったので
LZHS+ISHしました

<<< ms1main.lzh for MS-DOS ( use ish & LHarc ) [ 58 lines ] >>>
!!!H!09Q!5"XRo5D1w>0=%(tXTQ~!&"HEA+8|J!!!!f/PUnD+D!!!!!!!!!!!!!!!!!!!!!!!!3tB<
!!!H!09Q!5"XRo5D1w>0=%(tXTQ~!&"HEA+8|J!!!!f/PUnD+D!!!!!!!!!!!!!!!!!!!!!!!!3tB<
!!!H!09Q!5"XRo5D1w>0=%(tXTQ~!&"HEA+8|J!!!!f/PUnD+D!!!!!!!!!!!!!!!!!!!!!!!!3tB<
%匂-。}゙キ截*廛cR@@虐:゚Lサエ忿コク^t。*XC・u令q@Dヒウナ勿ホgs藉ヲA={彝U1コ3h*XL_抗X窪Qニ]Fネロg
&Caハ,址クク随+8祥キt:/(ィ@戞BヨWヒ~|ン\ラW4ラh旧ンz硲aHgv桾ハ;+ハニイサュ{z[レuホ宵ネシ>G頡゚F7チ+遵
'マ:ハG繊オ;1QMq4「城1x輯ンx7メ<憧ヌヒZ<zGミo訴pf隔m羹m_隰yU啖/<醪ロヌイJPj・Y閊「v1徒cィ鶏ニワ
)ェルマ紅ワ^Iオロ溶v\/ヲzソィネ鑰。ッ2Nモ丸「酪-シァ8\筋kW匁0セ-椛VOg絋エHu睡k鉗3纃ュェ疽~l狆~O蔦G
+」キヤ悉髦イ+~;ナH渋ラ博ロ莖憚6}Qェ筆Pラ杁゙ニU贔佐5p5カp苜・GツエA襾亀/beァカ|4^yラ小暄{ネヒ5赫サ
,EヘZホ2Vニ4ハ宜]u867スbPエ坿Cノ襦m1アソUワ恁罷佃籌ヒ漉]乍m;o鬚nメクd革テ揃2AホPレ>a?勦q4盆エ@r
?ャqヲヤO觴焜oa:・臼ヤチU茎ヨRV]Zメ砒p蜊エヘ。カSBハP扇袰g6カ゚゚崔:ャHケ{ハ-2゙rモヌ)「荒ナ?「「ク土「e懲
/.{ハャ碓キロ6yV+b兀ユLVI鮪Q゚+・サーィb瀟u゙C鴈コヤスア2課カm千ヨeツ單)澱Z鄂q<レ^ツツユヌ゚^[ー捏停T[J
2挿ニゥカ矚bケゥ椋ニヤ琿ヘB匂゙U脳13s幼rフ(4~f78械R紗ロ3墹F崛リ-ロタニン3ゥヲQヲシー洗碣qセVx棗:粗C・
4イ碁an?縺-カ.BgAOオョ;Pト鰰叟訐r?クsh~峠檐'B.u*g鞄D「・(ケィuィ:~Blbリヘ8ュ艾。キエ陜チシルミW祿-c
5危_皙S=a舌ヌー旗uホ]ミクワメl搆]'_、(wェ)z3耿殃@+盻A銘Pm拾hZフ[接^qQ\ョHGd蘋謹U影ミ0モ怖恃
6吋イqYマ)ェ7kc0テJfミ-{錫'オ/ネシ(恟ケ7ゥ3ーァィ牙ハEオヌw桃Kシ*:4ヌx寥般C園ア?拔メ]ヌヤ0ツQ嗅1Aェニ\Y
7蔟蠻fOPXeセ鮟Hハ10ャ}|XRヘヲSユ働アuハqイ厩窩レ遽。^ラミm9ォt暄}lドテタXJ2豹J}」h躑^シ瞽タサ遵NGフ
8疫:ル/蜥ュNz@姙6寉殕M'c」\ッ。。クu^兀マX}凪1@]ネ/9ニYgメfErpユI9xqワgテ董Gネ踉'ュシsンKmd梹'wU
9ゥPj空ハ誄ホ涼wソオV]-ハy0桐」C緩ゥ岷}@MリオフB5i/ン[」弘壘VD(|2朏ヲム找オ;ヌモ-ケゥ繿Eコ}l前コ裝0メ
:w」オ桐招讃チラクタオZVコxヨ(ュ床b_,逆bメS堆,懊ミ(ハ肄ヲヨアZケEヤンヨツ6xvI鯨sbi僕g禀ヲ躙|V」W「蜘fヤ
;ヲkスa*mq+Bn「マ疑懆ユノ。,Q\Z鑾カ惆ケjqoSロZウオ鰉Vセ(Bゥ「3コW拷Cマャ區Pf泓6ノサュS4ソiaOン推ヤ犂|ホ
<課ツ@カ腆」、コUb軌ェCxツ(}貧ロイツb「nN爼シE1OLc癸ヘDイモゥ4ェュUMXt~}ェ拔コk゚メNXル殊キマktフヤシ、b懊゙
=Fw.。ウゥ瑙/キ朔UG腺q\WZヒヒ/BT牡{W,Tロhvナサ^ヌ祀マK3@l、モse遒アKァVハヒ[オWV3ナキ・J|h8トャ<0T+娜
>Ucf_曖(ケrラアj拳Q))「d巴娼ォッレ樣IヒkーチチサRラェQノ0ツ際(サBイ攣ハ*=e町F覺ユ}邇^襲Pu@ヲjiマCcホw
AD柴aヌ栂ッA萢痔テヒミ2NQ枴2ヲGワ尹DキFK2ャIゥメ}コv穫Uミ)メnA仙Alg゙q韓B犖トKケ親ホ劃[虐)コvT冂b
B8ッFG畆ミ蒐:3珍>OYgヘ部ソ>絳Z圭g2全モ・wクム怡ラ筐菁\モ・教綉ーハaXマァ馗ャ睡(」ェhイ@m問カラ羅Vミ~
CI伺ウ較EaニGタ9ョ<誼z-臭籏ャヲ+ケ*ナ,P羇タ含7ョ3+s2p爾Wラ:BヌK譽茯UフB靆Fネ_ヘニ貌ク廳8キス3癌棊
DMソT寔iuRGム(oOtYsホXス/Gエ嬾ィDウ匚]製ィVヘョフ「rマ潮ァニチnユツカo繕Nq(?サト1慢タ|?tbsAxl/ェBUV歸
Eナヌ9ネ鋒bgiV拱i^@ニ@ナh願)゙敞藏ワ8S+エB爾鬲?フoッ蘊)ソuゥk名ia9,Iモカヤッ翹Dォ媒ヘメ8N搆ォ蛟v沓
FN0UVャ逶y酥ネJU・=/ハキ揩ャ(9汞ァpゥ3mZオ5沙c・モE7*<ハS。\7レ)找EEオc琿鍍ササ華S徊3cモ\:リS{島ウ
GDュE瘧t。EホY雅nQネlX[T将イゥ{;ノオウH加昔カc蝎「z旨gd>{エFb6オFキモ*ー6トRr逝P7カヘRk:蒙a盃Oッ<オ
H眞y9タ*]ソX=wヤセ)訖'カ肬ォW、vo塑慎テt*:0dヲ莽R1。eヨ糂Nト値ホONョDミ泯彰~tナアAV」V0。壻7剞クk「
I冫テネヨ5M単TkxrヘwIfナ頒ライYr\TXイリヒPハ1ホー榱ュ。g籵8H窩(+@タ゚適rォ覃i;アョNツcォオネOロYYI巡衙ヲ
K1ZAナ・WlO)楝ul>カソ,m<.ヨュlナ疱ィン<7/ウ瓢・ソCメゥ廨^ヒn,赳^ヘ{wJAi翁匏k礪duzメコ゚[+d@o.=qシd
Luロ\bエ4蟀ケ射p隈EDモu痙ウハzヒヲサフI^キE^6ォ_モヘ<ァN盧シs)娥|ンitホ)湟s0キJwッノォfッ@KE゙ホニス~[Rw]
Nヨ^ホァシムル拊>ルウ変pニミu0逐rWンPソm,4-薜タmマ,(YBZ狐p+5ニe{7ナユネァmD逍挺湛=\ムフサiイn=M刊ゥGD}
O鉢.ュア0ラNユオr擅-cv綱6サトワW殕7ケ-、jhrセムリp湊タレ[ム寶「jワi]DョyY厖Bャメ^CスJッ0cM゚僑Zノ裸糜aA
RO<zC下NY]ナニ>ホ梗qIEuテ4T|趁8KFZ邂ミ魚1X。ルs<ク0慝iホ疚dヨス蹴Gソ禁オエ0郵、カク-夕ホョ皚ョ7奨ア
TEL^ト゚クンゥヘフ=k_7ワセ}/-フーョJハチ薈負DークxR纖笘キeルヲニ/紕}d悼Vkメ旦U゚イハモ槝スTB1ーニZロ3ァBウ8ネフ
Uモチツモ系)テmアWju懸該p襍Lヌ恊ヨJU7Z.tワLIZT禹y稗サ|フュH岑^。近'ロオサルf゚z隈JユNC菫武ナYイ鐚ロ*
VMLOアHcセ?゙モUD@」ニ、S肌喉サ躑ィ4枚Uユセオ0詒ヨ掾,,-茯」B:ヌ|恕g撒Moc(KG皚W゙ムュサkレCzy+XFホ薩
Wf6C~[|ノフKDcフオbIBセcs况鰌,r剄宍ス孳コx;|斌n碑YcシキケタQ゙dfCG・Qモン娑^ルxウeチX-S沍d:リ+ナH\
X4g璋ホ蜆ナツフ臉牘ナpNゥヘ^ロ~^恟縦スヲラpオI:.咒゙~x-キエ3S,Z9'イヌニuケx:アSlcD朕゚ヘ頌[。モヨ藹瞶チf
Y゚gWッ筧ヨソz咏x羆G|ウy9ョ゙ーb勗滬トBェfゥKイ<イu君ロッ'キ,D逆EGP賣、ンヤョ\g「;9チ2XK鉗貫゚A畋A18ヲ
ZrB篁ヤQ戮Pァ搴エfメセ\~4。楳豸uaハイ捕RDrwノラ8,裂テ鳫0梹諺タフ;8ソQネツH,hqニFUリロ右/テ懆uO窯*^
[8蓑「ル溲6襾-@<ウJ=零Urシ'xC徳枝'nケBoワC閧唏qgvワqュJ+冂ケ-wニミvw暎」G「|フ[モIヨリC]莉ス/rvヨ
\4ヌ孺VCア゚F窄「鈿鯡J;8ハケナIイ_.8ニ=カOU嚮'U吶txI、慟「モ救振トMトァ6d3魃Qb>性N榮N^wシi霖0童
]V'シ字.゙fWアヌネミス覲(;戎B創kqxレィ燃S鯲」Dツゥ.オG(レ3、痾ル・ユglンソH喟QチlPj昔゙h9馘+嗅「Q薔:.
^l-ァヌW鮴Zefwカ「}レヨ驕^5nツエ8フシ蹶「zPcX寤ニTMV莱G斯m*rクナcァJ、ウ,徭7ニ「<WRネRgヤルルt*スPM蛄r
--- ms1main.lzh (50/58) ---
a然*qヲ男ヤンXi82gs妾ルテjタ湟ヘ<宍@ナ9Iク麾マロ(-e^lyー(エツSl3ハ3PIタ<像Pラマ、x避」d,闌YYハヒlセ@ウ
bヘTユ杰菴V陞ゥ=。N止コQa鋤ケ咢セnヘハo,Vi氷レ1゙璋XフfPヘ/{sh淒綫チー=見ヒイ[綿諢uクH・Uューエコ5メ卦
cヤ抵ンオz邊ユl2ルxエ゚3j7)沾碆クOl\j悌}アメoUk暸ヨn捗9莅槝rモd9ョ屓フ'<XGjoセェ姨f榎モ}虔ZクナTソ
dAキr・艢ムー;硯CVrAサムDI゚ルsテoメ少H}レAM4Nサ.xョO63|dOL豺OREUョyソ゚p茖エサ瘋gIm椡テT。n/PVEAo
e{駝|ャ釘キエ止ー崛..ノ8ヌ転Tソ椏jTU析*挙゙蝓憬/hハ坂キ側@ムBリ@イ@@@@@@@@@@@@@@@@@@@@@@シスメ
。Uユ9v^uHェd穩リmャ・@:損フoュJ5ヲヘa侃タL*Kg鑁裼賃Dミ熔ァ濔タエ冠エrサッH開L斌Bァフ/Pdユ寇ニウ絖爛f
」XL]ヨ2エ葬劾・蛎T雁(H蜴「サ胎YヘsレhBR+サシ=ヌ・t友ンhミbナ絎;3ラ0ア喪*レ呷ョd_飆aT;枇ニ{Bニ.紬,ノ
--- ms1main.lzh (58/58) ---

 ほぼそのまんまVB化できたと思うんだけど…(?_?)

								OPRETER