Innostuin kokeilemaan hiiren käyttöä QBasicissa, mutta koska en itse osaa käyttää, sitä, etsin täältä sopivan ja yksinkertasen esimerkin. Löysin Antti Laaksosen lisäämän vinkin, https://www.ohjelmointiputka.net/koodivinkit/
PS: miten tota hiiren kursorin kuvaa voi näperrellä?
Tuo QBasic-koodi käyttää keskeytystä 33h hiiren käsittelemiseen. Toiminto riippuu aina AX-rekisteriin laitetusta arvosta, rekisterien BX, CX ja DX kautta kulkevat muut tarvittavat tiedot. Kattava lista keskeytykseen liittyvistä toiminnoista löytyy osoitteesta http://www.clipx.net/ng/interrupts_and_ports/
Kursorin vaihtaminen voi olla kyllä vaikeaa QBasicilla, itse yritin sitä joskus tehdä, enkä saanut millään onnistumaan. Idea on kuitenkin se, että tiettyyn kohtaan muistissa on tallennettu kursorin pikselit.
Mikään ei tietysti estä piilottamasta kursoria, ja sitten piirtämään pääloopissa vaikkapa PUT:illa kuvaa (mahdollisesti maskattua) hiiren senhetkisiin x- ja y-koordinaatteihin.
Aihe on jo aika vanha, joten et voi enää vastata siihen.