sonraki »

[ilkerficicilar]

Teşekkürler.

Uydu:

<?php

$by=array(32,32,32,32,32,32,32,32);
$ad=97;
$by=array(204,204,204,204,204,204,204,204);
$ad=193;
$ch=0;
$cl=$ad;

for($y=0;$y<8;$y++) {
$cr=0;
$cl=$cl+$by[$y];
if ( $cl > 255 ) $ch++;
$cr=floor(($cl & 128)/128);
$cl=floor($cl*2) & 255;
$ch=$ch*2+$cr;
} // for y
$cr=1;
$ck=($cl+$ch+$cr) & 255;
echo "ck:".$ck."\n";
?>

Şimdi geriye bu algoritmayı kısaltıp / formülüze edip MDE-dökümü-to-prg scripti haline getirmek ve taranıp OCR'dan geçen kodları buna beslemek kaldı.

Bu arada PDE'deki çoğu program aşırma!.. Onları saptayabilirsek, sadece orijinal çalışmaları tarayarak zaman kazanmak mümkün olabilecek.

[joker_]

Zamanında Hades'in çıkarttığı c64Türkiye dergisinin 8nci sayısında buna benzer bir program yazmıştı Hades. Belki fikir verir.

http://www.retrodergi.com/originals/C64%20Turkiye/C64%20Turkiye%20-%20Sayi%2008%20(Ekim%202005).pdf

Bu arada Hades nerelerdesin? Özlettin kendini.

[ilkerficicilar]

İlk aşama tamam:

http://cbm.ficicilar.name.tr/mde2prg.php

Bunu bir ara güzelleştiririm. Program hakkında ek bilgi vb. girip veritabanına eklemek vs. gibi özelliklerle.

Şimdilik, OCR'dan geçirilmiş MDE dökümlerini .prg yapıp indirme linki veriyor.

Bir iki deneme yaptım. Mesela, dün vermiş olduğum örnekte (PDE No 15, syf .09) 0851 no'lu satır hatalı okunmuş. Yukarıdaki checksum sayesinde yakalayabildik:

====================================
Commodore MDE OCR - PRG

Su satirlarda hata var:

0851 : 90 1E 34 71 A0 4C 84 0B D4

Lutfen duzeltip yeniden yukleyin.
====================================

34'ü 84 yapınca düzeldi:

====================================
Commodore MDE OCR - PRG

Hata Yok.

Indirmek icin tiklayin: pde-1334126.prg
====================================


Eveeeet... Yardım eden herkese teşekkürler.

Şimdi ise pamuk eller tarayıcılara lütfen

[witchdoktor]

Teşekkürler.

Uydu:

<?php

$by=array(32,32,32,32,32,32,32,32);
$ad=97;
$by=array(204,204,204,204,204,204,204,204);
$ad=193;
$ch=0;
$cl=$ad;

for($y=0;$y<8;$y++) {
$cr=0;
$cl=$cl+$by[$y];
if ( $cl > 255 ) $ch++;
$cr=floor(($cl & 128)/128);
$cl=floor($cl*2) & 255;
$ch=$ch*2+$cr;
} // for y
$cr=1;
$ck=($cl+$ch+$cr) & 255;
echo "ck:".$ck."\n";
?>

Şimdi geriye bu algoritmayı kısaltıp / formülüze edip MDE-dökümü-to-prg scripti haline getirmek ve taranıp OCR'dan geçen kodları buna beslemek kaldı.

Bu arada PDE'deki çoğu program aşırma!.. Onları saptayabilirsek, sadece orijinal çalışmaları tarayarak zaman kazanmak mümkün olabilecek.

Bu sistemle benim 'HIRES ARTIST' adlı C128 BASIC programımı da aktaralım da 20 yıl sonra emülatörle de olsa tekrar bir özlem gidereyim