Turbo Basic

Turbo Basic adalah kompiler BASIC dan dialek yang awalnya dibuat oleh Robert 'Bob' Zale dan kemudian dibeli serta diperdagangkan oleh oleh Borland. Saat Borland memutuskan untuk menghentikan pengembangannya, Robert Zale membelinya kembali dari Borland, mengganti namanya menjadi PowerBASIC dan kemudian mendirikan perusahaan PowerBASIC Inc. untuk melanjutkan dukungan dan pengembangan perangkat lunak tersebut.^[1]

Perangkat lunak ini umum digunakan pada era tahun 1987-88 dan menampilkan "layar hitam" sebagai ciri khas Borland yang serupa dengan Turbo Pascal 4.0, Turbo C 1.0/1.5, dan Turbo Prolog 1.1. Borland tidak mengadopsi ciri khas "layar biru" pada lingkungan pengembangan terintegrasi hingga periode 1989 saat Turbo C 2.0, Turbo C++ 1.1, dan lain-lain ditembangkan. Saat ini, Turbo Basic dan Turbo Prolog sudah tidak lagi diperdagangkan.

Tidak seperti implementasi BASIC yang ada umumnya saat ini, Turbo Basic merupakan kompiler yang benar-benar menghasilkan kode biner yang langsung dapat dijalankan pada sistem operasi MS-DOS. Sementara produk lainnya merupakan sebuah interpreter, atau pcode (pseudo code) yang sangat bergantung pada sebuah pustaka runtime. Lingkungan pengembangan terintegrasi yang ada dapat menjalankan program BASIC untuk kebutuhan debugging, atau menghasilkan file EXE untuk MS-DOS yang benar-benar mandiri dan dapat dijalankan pada sistem lain meski tanpa melibatkan produk Turbo Basic atau keberadaan pustaka runtime.

Tampilan dari Turbo Basic 1.1 (1987).

Contoh kode

Program berikut merupakan contoh dari dialek BASIC yang mirip ALGOL yang didukung oleh Turbo Basic. Tidak seperti BASIC tradisional yang menggunakan nomor bari dan memiliki keterbatasan dalam hal struktur kontrol, serta tidak mendukung subrutin dengan dialek seperti ALGOL:

INPUT "Siapa nama anda:", A$
 PRINT "Halo "; A$
 DO
   S$ = ""
   INPUT "Berapa banyak bintang yang akan ditampilkan"; S
   FOR I = 1 TO S
     S$ = S$ + "*"
   NEXT I
   PRINT S$
   DO 
     INPUT "Anda ingin menampilan lebih banyak tanda bintang"; Q$
   LOOP WHILE LEN(Q$) = 0
   Q$ = LEFT$ (Q$, 1)
 LOOP WHILE (Q$ = "Y") OR (Q$ = "y")
 PRINT "Sampai jumpa "; A$

Seperti halnya produk Borland lainnya pada masa tersebut, kode di atas bisa secara langsung dieksekusi melalui lingkungan pengembangan terintegrasi yang terpaket bersama Turbo Basic.