Τρόπος εμφάνισης GIF σε QBasic

QBasic είναι ένα εργαλείο που χρησιμοποιείται για να τρέξει το BASIC γλώσσα προγραμματισμού . Είναι μεταφράζει τις εντολές εισόδου σε δράσεις του υπολογιστή , όπως το τρέξιμο ένα αρχείο ή το κλείσιμο μιας εφαρμογής για τα συστήματα DOS -based . Μια χρήση για την QBasic είναι να ανοίξει και να εμφανίσει αρχεία εικόνας . Εμφάνιση ενός αρχείου GIF μπορεί να γίνει χρησιμοποιώντας μια σειρά από εντολές για να εξαγάγετε τα σχετικά στοιχεία από το αρχείο και να το μετατρέψει σε μια μορφή που μπορεί να εμφανίσει QBasic . Οδηγίες
Η 1

Open QBasic 2

Πληκτρολογήστε τις ακόλουθες εννέα γραμμές στο παράθυρο εντολών : .

Filenum % = Freefile

OPEN filename.pal $ ΓΙΑ ΕΙΣΟΔΟΣ AS # filenum %

ΓΙΑ DummyColour % = 0 TO 255

INPUT # filenum % , r , g , b

OUT & H3C8 , DummyColour %

OUT & H3C9 , r

OUT & H3C9 , g

OUT & H3C9 , β

ΕΠΟΜΕΝΗ DummyColour %
εικόνων 3

Αντικαταστήστε το " όνομα " με το όνομα του αρχείου GIF . Μην συμπεριλάβετε το " . Gif " επέκταση . Hit "Enter" για να εξαγάγετε τις πληροφορίες ουρανίσκο gif που ελέγχει την οθόνη .
Η

4 Πληκτρολογήστε τις ακόλουθες δύο γραμμές στο παράθυρο εντολών , και πάλι αντικαθιστώντας το " όνομα αρχείου ".

DEF = SEG & HA000

BLOAD " filename.bsv "

Πατήστε "Enter ". Το GIF θα εμφανιστεί στην οθόνη σας .
Η
εικόνων