Kirjautuminen

Haku

Tehtävät

Keskustelu: Koodit: QB: DLL- käsittelijä

gamehouse [09.08.2007 14:53:22]

#

Tämä ohjelma käsittelee haluttua tiedostoa DLL- tiedoston tyylisesti. Oman käsitykseni mukaan DLL:n käsittely menee jotakuinkin näin! :D

Itse ohjelma

'DLL- sovitin Qbasicille v.1.0
'(c) Mark Mäkinen
        CLS
        OPEN "TEST.DLL" FOR OUTPUT AS #2  ' Tehdään "DLL"- tiedosto
        PRINT #2, "SoitaMusa:"
        PRINT #2, "PLAY"
        PRINT #2, "c12d12"
        CLOSE #2  ' suljetaan TEST.DLL
                OPEN "TEST.DLL" FOR INPUT AS #1 ' Avataan se uudelleen
                ReadDLL "SoitaMusa" ' Luetaan "DLL"- tiedosto
                CLOSE #1 ' Ja suljetaan
RESET ' Varmistetaan vielä, ovatko tiedostot kiinni!

Aliohjelma ReadDLL

SUB ReadDLL (N$)
LINE INPUT #1, N$
IF N$ = "SoitaMusa:" THEN
LINE INPUT #1, N2$
IF N2$ = "PLAY" THEN
LINE INPUT #1, N3$
PLAY N3$
END IF
END IF
END SUB

Vastaus

Aihe on jo aika vanha, joten et voi enää vastata siihen.

Tietoa sivustosta