Ben bağlantı noktası (% 100 çalışıyor) aşağıdaki küçük QBASIC programı PHP çalışıyorum:

OPEN "com1:2400,n,8,1,DS," FOR RANDOM AS #3
OPEN "data.dat" FOR OUTPUT AS #2
REM read 17 chars from the port
scale$ = INPUT$(17, #3)
PRINT scale$
WRITE #2, scale$
CLOSE #2
CLOSE #3
SYSTEM

Şu anda (wamp5 on) PHP derlenmiş (exe) şeklinde onu arıyorum ama QBASIC kurtulmak istiyorum ve PHP doğrudan çağırır.

Bu PHP fonksiyonu yazdım ama sadece fgets () hat askıda kalıyor:

function read_port($port='COM1:', $length=17, $setmode=TRUE, $simulate='') {
    if ($simulate){
        $buffer = '"'.strval(rand(1000, 2000));
        return $buffer;
    }
    if ($setmode){
        shell_exec('mode com1: baud=2400 parity=n data=8 stop=1 to=on xon=off odsr=on octs=on dtr=on rts=on idsr=on');
    }
    $fp = fopen($port, "rb+");
    if (!$fp) {
        file_put_contents('debug1.log','COM1: could not open'."\n",FILE_APPEND);
    } else {
        $buffer = fgets($fp, $length); // <-- IT JUST HANGS HERE DOING NOTHING !
        fclose ($fp);
    }
    return $buffer;

}

Ben yukarıdaki işlevini çağırmak için bu PHP satırını kullanarak ediyorum:

$res = read_port('COM1:', 17, TRUE, SIMULATE_SCALE);

Herhangi bir yardım creatly takdir edilecektir! Ben temelde çalışırken kadar verdik. QBASIC mükemmel şekilde yapabiliyorsa o zaman PHP ile bu işi yapmak gerekir!