Perintah Dalam Qbasic

Perintah Dalam Qbasic 

FOR .. NEXT

FOR [variable name] = [start value] TO [end value] {STEP n}

[program  code]

NEXT [variable name]

Variabel
diatur ke [nilai awal], maka kode program dijalankan dan pada pernyataan
Berikutnya, variabel bertambah dengan 1 (atau dengan nilai LANGKAH, jika ada
yang ditentukan). Nilai yang dihasilkan dibandingkan dengan [nilai akhir]



dan

jika tidak aliran program sama kembali ke baris setelah pernyataan FOR.

Sebagai
contoh:

FOR a = 200 TO 197 STEP-1

PRINT a

NEXT a

200 199 198 Perhatian harus diberikan saat menggunakan LANGKAH, karena sangat mungkin untuk melewati nilai akhir (end value) sehingga loop FOR akan berjalan 'selamanya' (yaitu sampai pengguna membatalkan penerjemah atau kesalahan terjadi), misalnya : -

FOR a = 200 TO 197 STEP-2

PRINT a

NEXT a

200 198 196 194 192 ... 0 -2 -4 ... -32768 ERROR overflow

IF

IF [variable or string] [operator] [variable or string] THEN [command] {ELSE [command]}

Membandingkan variabel atau string. Misalnya, jika Anda ingin memeriksa apakah kata sandi yang dimasukkan pengguna adalah kata sandi yang benar, Anda bisa memasukkan:

JIKA $ = "password" KEMUDIAN PRINT "Password Correct"

Dimana $ adalah pengguna memasukkan kata sandi. Beberapa operator meliputi:

"=" - sama dengan

"<" - kurang dari (hanya digunakan bila variabel atau string adalah nilai angka)

">" - lebih besar dari (hanya digunakan bila variabel atau string adalah nilai angka)

"<>" - tidak sama

"<=" - kurang dari atau sama dengan (hanya digunakan bila variabel atau string adalah nilai angka)

"> =" - lebih besar dari atau sama dengan (hanya digunakan bila variabel atau string adalah nilai angka)

Kita juga dapat melakukan preform action ke nilai-nilai nilai kemudian membandingkannya dengan string atau variabel lain dengan menggunakan perintah if, seperti contoh di bawah ini:

JIKA a + 5 = 15 THEN PRINT " Correct "

JIKA a * 6 = b * 8 KEMUDIAN PRINT "Correct"

 

LOOP

DO

[Program]

LOOP UNTIL [condition]

 

Digunakan untuk membuat loop dalam program. Perintah ini memeriksa kondisi setelah loop dimulai. Ini digunakan bersamaan dengan perintah DO.

THEN

[Command] [variable] = [value] THEN GOTO [line command value]

Digunakan bersamaan dengan perintah kondisi GOTO atau IF. Ini memberitahu komputer apa yang harus dilakukan jika kondisi tertentu sudah terpenuhi.

TO

[Command] [Variable] = [Value] TO [Value]

Biasanya digunakan untuk memasukkan sejumlah variabel.

FOR a = 400 TO 500

PRINT a

NEXT a

Contoh ini akan mencetak semua angka dari 400 menjadi 500. Alih-alih menyatakan semua nilai secara terpisah, kita bisa mendapatkan semuanya dinyatakan dalam satu perjalanan.

READ

READ [Variable]

Digunakan bersamaan dengan perintah DATA, perintah ini memungkinkan data baca QBasic. Ini banyak digunakan saat berhadapan dengan sejumlah besar data seperti bitmap

LET

LET [variable] = [value]

Versi awal penerjemah perintah QBasic.exe memerlukan penggunaan perintah 'LET' untuk menetapkan nilai pada variabel. Versi selanjutnya tidak.

LET N = 227 / 99

LET A$="a line of simple text"

adalah equliavent untuk: -

N = 227 / 99

A$="a line of simple text"

INPUT #

INPUT #n [String Literal] [,or;] [Variable]

Membaca string / nilai dari aliran file yang ditentukan (lihat juga LINE INPUT #)

INPUT #1, a$, b$, n, m

Membaca 4 nilai dari file yang terbilang sebagai # 1. $ ditugaskan semua teks sampai sebuah ',' (koma) atau akhir baris tercapai, b $ segmen teks berikutnya, kemudian dua nilai numerik ditafsirkan dan ditugaskan ke n dan m.

Perhatikan bahwa, dalam file tersebut, angka dapat dipisahkan dengan 'apa saja' - jadi, jika angka tidak ditemukan (untuk 'n' atau 'm') pada 'baris' file saat ini, sisa file akan dicari sampai ada nomor yang ditemukan Masukan kemudian dibiarkan 'menunjuk' pada posisi di file setelah angka terakhir dibutuhkan untuk memenuhi masukan pernyataan (lihat juga 'seek #' command)

END

END

Menandakan akhir dari program. Ketika QBasic melihat perintah ini biasanya muncul dengan sebuah pernyataan yang mengatakan: "Tekan Any Key to Continue".

END IF

END IF

Akhiri program “IF” jika suatu kondisi telah tercapai.

DO .. LOOP

DO

[program]

LOOP UNTIL [test condition becomes TRUE]

Digunakan untuk membuat loop dalam program. [Kondisi] diuji hanya setelah kode [program] dijalankan untuk pertama kalinya (lihat juga WHILE). Sebagai contoh:

num$ = 1

sum$ = 0

DO

sum$ = 2 * num$

PRINT sum$

num$ = num$ + 1

LOOP UNTIL num$ = 13

Program ini menghasilkan Two Times Table sampai 12. Alasan mengapa kami menempatkan 13 adalah bahwa program berhenti pada saat itu dan tidak melanjutkan loop. Jika kita meletakkan LOOP SAMPAI num $ = 12 output terakhir di layar akan menjadi "22".

Lihat juga EXIT DO

EXIT

Memungkinkan keluar langsung dari subrutin atau satu lingkaran, tanpa memproses sisa kode subrutin atau loop tersebut

EXIT DO

Keluar dari loop DO, eksekusi berlanjut dengan perintah langsung setelah perintah LOOP

EXIT FOR

Keluar dari FOR loop, eksekusi berlanjut dengan perintah langsung setelah perintah NEXT

CLS

CLS

Membersihkan layar aktif. Menghapus semua teks, grafik, mengatur ulang kursor ke kiri atas (1,1), dan juga menerapkan warna latar belakang saat ini (ini harus diatur menggunakan perintah COLOR) ke keseluruhan layar.

CASE

SELECT CASE [variable]

CASE [value]: [command]

CASE ELSE: [command]

END SELECT

Gunakan ini saat menggunakan banyak nilai dalam program Anda dan menetapkan jalur yang terpisah. Ini adalah contoh program tanpa perintah KASUS yang memberikan jalur yang berbeda pada nilai:

10 PRINT "1. Print 'path'"

PRINT "2. Print 'hello"

PRINT "3. Quit"

INPUT "Enter a choice: "; a$

IF a$ = "1" THEN

PRINT "path"

GOTO 10

IF a$ = "2" THEN

PRINT "hello"

GOTO 10

IF a$ = "3" THEN END

PRINT "That is not a valid choice"

GOTO 10

Inilah yang tampak seperti program dengan perintah CASE:

PRINT "1. Print 'path'"

PRINT "2. Print 'Hello'"

PRINT "3. Quit"

INPUT "Enter a choice: "; a$

SELECT CASE a$

CASE "1":

PRINT "path"

CASE "2":

PRINT "Hello"

CASE "3":

END

CASE ELSE:

PRINT "That is not a valid choice"

END SELECT

Arrays and Types

Dasar Q adalah IDE (integrated development environment) yang dikembangkan oleh Microsoft untuk membuat, mengedit, debug dan melaksanakan program dasar.

Built-in Types

QBasic memiliki lima tipe built-in: INTEGER (%), LONG (&) integer, float SINGLE (!), DOUBLE (#) float dan STRING ($). QB64 memiliki dua tipe built-in lagi: _INTEGER64 (&&) dan _FLOAT (##)

Deklarasi implisit adalah dengan menambahkan karakter jenis ke akhir nama variabel (%, &,!, #, $, &&, ##). Lihat matematika QBasic / Basic untuk informasi lebih lanjut.

Penjelasan deklarasi adalah dengan menggunakan pernyataan DIM sebelum penggunaan pertama:

DIM a AS STRING

DIM b AS INTEGER

DIM c AS LONG

DIM d AS SINGLE

DIM e AS DOUBLE

DIM f AS _INTEGER64 'QB64 only

DIM g AS _FLOAT 'QB64 only

User-defined type

Tipe yang ditentukan pengguna memungkinkan Anda membuat struktur data Anda sendiri. Harap perhatikan bahwa jenis kustom serupa dengan array.

TYPE playertype

  name AS STRING

  score AS INTEGER

 END TYPE

Anda kemudian dapat mendeklarasikan variabel di bawah jenis ini, dan mengaksesnya:

DIM playername AS playertype

playername.name = "Bob"

playername.score = 92

Contoh di atas ini menunjukkan bagaimana tipe kustom dapat digunakan untuk menjaga data, katakan pada pemain yang memainkan game.