Basic abc-doar

REMAIN 106 FOR y=1 to 200 (pentru oprirea

RETURN 107 PRINT "*" programului

108 NEXT y apasati ESC

109 CLS de doua ori)

110 RETURN

-32-
AND -operator

-Executa operatii boleene (si) pentru instructiuni conditionale

-forma (argument)AND(argument)

-exemplu 10 let a$="b"

20 PRINT "Apasati cite o tasta cu o litera"

30 LET b$=INKEY$

40 PRINT b$

50 IF a$="b" AND b$="m" THEN 100

60 GOTO 30

100 PRINT INKEY$

110 PRINT "Felicitari pentru litera aleasa corect"

120 PRINT b$

130 END

-expresii asociate:

OR,NOT,XOR
ASC -functie

-Calculeaza si afiseaza codul ASCII al primului caracter dintr-un

sir de caractere (in alte versiuni transcrie toate caracterele

unui program in cod ASCII)

-forma ASC(sir de caractere alfanumerice)

-exemplu 10 PRINT ASC("BASIC")

sau 10 PRINT ASC("9") (vezi tabelele de

-expresii asociate: coduri)

CHR$
ATN -functie

-Calculeaza Arcul Tangent din expresia din paranteza ce urmeaza

expresiei (reducind expresia la un numar real in radiani cuprins

in intervalul de valori -PI/2 si PI/2 al valorii date)

-exemplu PRINT ATN(1)

sau 10 PRINT ATN(1)

sau 10 FOR x=0 TO 2*PI STEP 0.1

20 PRINT ATN(x)

30 NEXT x

40 END

sau 10 LET a$="BASIC"

20 PRINT ATN(ASC(a$))

-expresii asociate:

COS,DEG,RAD,SIN,TAN

-observatie comenzile DEG sau RAD se pot utiliza pentru a specifica

explicit daca rezultatul unui calcul angular se va exprima in grade

sau in radiani
AUTO -comanda

-Genereaza automat numerele de linie.Prin numar se specifica de la

ce numar de linie incepe numerotarea iar prin increment se speci-

fica din cit in cit se face numerotarea.Daca nu se specifica,se

vor genera numere de la 10 la 65530 din 10 in 10.

-forma AUTO(numar de linie),(increment)

-exemple AUTO (scrieti ceva si apasati ENTER)

AUTO 100,50 -"-

AUTO 33,13 -"-

-33-
-Observatie - cind se genereaza un numar de linie care exista deja

in program se va afisa linia intreaga de program.Daca

se confirma prin ENTER programul trece la linia urma-

toare,in caz contrar se rescrie linia respectiva.Se

poate utiliza si pentru depanarea programelor linie cu

linie.

-expresii asociate:

nu sint expresii asociate cu comanda AUTO
BIN$ -functie

-produce si afiseaza un sir de cifre exprimate in cod binar

avind valoarea numarului intreg (fara semn) din paranteza

care urmeaza expresiei si pentru care s-au folosit un

numar de biti determinat de numarul al doilea din pa-

ranteza (intre 0 si 16) (se foloseste expresia de numar

binar exprimat in 1,2,4,8 etc biti)

-forma BIN$(numar intreg,numar intreg)

-exemple PRINT BIN$(64,8)

PRINT BIN$(64,16)

10 FOR x=1 to 10

20 PRINT BIN$(x,6)

25 PRINT BIN$(x,16)

30 NEXT x

-Observatie -cind se foloseste un numar mare de biti

pentru exprimarea unui numar,acesta nu va fi

trunchiat ci se utilizeaza in fata numarului

atitea zerouri cit specifica baza de numeratie

iar daca numarul de biti este prea mic,numarul

nu va fi trunchiat ci va fi afisat in baza

minima in care are expresie distincta (de -

exemplu PRINT BIN$(10,1) se va afisa pe patru

biti in loc de 1 respectiv 1010)

-expresii asociate:

DEC$,HEX$,STR$
BORDER -comanda

-Se utilizeaza pentru schimbarea culorii margini ecranului.

Daca se indica doua culori,ele alterneaza cu o viteza deter-

minata prin comanda SPEED INK.Valorile sint cuprinse intre

0 si 26.

-forma BORDER(numar culoare),(numar culoare)

-exemplu 10 REM 729 combinatii

20 SPEED INK 5,5

30 FOR a=0 TO 26

40 FOR b=0 TO 26

50 BORDER a,b:CLS:LOCATE 14,13

60 PRINT "margine";a;",";b

70 FOR t=1 to 500

80 NEXT t,b,a

-expresii asociate:

SPEED INK

-Observatie ; se poate utiliza pentru delimitarea de ferestre

de dialog sau pentru mesaje

-34-
BREAK -comanda

-intrerupe programul

-daca se repeta comanda se intrerupe complet executia programu-

lui si prompterul afiseaza mesajul READY (asteapta noi comenzi

dar programul ramine arhivat in memoria de operare)

-daca se apasa ENTER sau alta tasta se reia executia programului

-daca exista instructiunea CONT (eventual cu AFTER) se reia

programul in functie de conditia precizata

-daca se utilizeaza combinat cu alte instructiuni se obtin

diversi algoritmi utilizati mai ales pentru programarea jocu-

rilor pentru calculator

-da vazut si expresiile ON BREAK CONT,ON BREAK GOSUB,ON BREAK

STOP,ON BREAK GOTO

-expresii asociate :

ON BREAK CONT,ON BREAK GOSUB,ON BREAK STOP
CALL -comanda

-Face apel la un alt program sau subprogram decit cel incarcat

in memorie (de exemplu solicita o fila izolata care se gaseste

arhivata pe o discheta, numita "bachelor file", fara care progra-

mul nu poate continua-program fragmentat).Apelul poate realiza

si transferul comenzii unui alt sistem de operare (de exemplu

apelul CALL poate incarca in memorie sistemul DOS sau OS-2 care

va prelua comanda pentru executia de operatii asupra datelor).

Este bine de utilizat cu maximum de prudenta si numai cu o cu-

noastere exacta a efectului functiei solicitate (in caz contrar

se poate sterge sau altera una dintre functiile de baza ale

sistemului care va deveni nefunctional iar calculatorul va fi

inutilizabil).In caz ca s-a apelat la o comanda CALL si ca

urmare calculatorul s-a defectat este bine sa notati pe o hirtie

ce anume a-ti apelat prin comanda CALL si ce anume a-ti solici-

tat si apoi sa solicitati ajutorul unui specialist (daca nu stiti

ce variabile a-ti introdus la intimplare calculatorul poate fi

destul de greu de depanat).In cazul in care utilizati un sistem

de operare standardizat si licentiat puteti sa apelati, ce si

cum doriti, si in caz de defectiune, reinstalati sistemul.

-format CALL(adresa),(lista de parametri)

-exemple CALL 0 (reinitializeaza calculatorul)

10 FOR x=1 TO 100

20 PRINT x

30 NEXT x

40 CALL 0

50 END

-Observatii -adresa specifica linia de adresa din programul

dorit la care apelati iar lista de parametri specifica ce

anume solicitati din linia respectiva de adresa.
CAT -comanda

-Este echivalentul comenzii dir din sistemul DOS.Solicita lista

tuturor programelor inregistrate pe discheta.La comanda CAT

(catalog) BASIC afiseaza in ordine alfanumerica numele tuturor

fisierelor prezente,lungimea lor (spatiul ocupat din memorie),

precum si eticheta de identificare a dischetei si utilizatorului

si spatiul liber ramas.

-35-

-forma CAT

-Observatie -nu are nici o influenta asupra programului in curs

-nu are efect daca discheta este goala sau nu exista

-expresii asociate:

LOAD,RUN,SAVE
CHAIN -comanda

-Incarca in memorie un program de pe o discheta inlocuind pro-

gramul existent (inclusiv fisierele protejate salvate prin

comanda SAVE p).

-format CHAIN(nume fisier),(numar de linie)

-exemplu CHAIN "testprog.bas",350

-Observatie -in alte variante reprezinta comanda de inlantuire

care permite incarcarea in memorie a doua sau chiar

mai multe programe care asteapta sa fie executate,

echivalenta cu CHAIN MERGE(vezi urmatoarea)

-expresii asociate:

CHAIN MERGE,LOAD,MERGE
CHAIN MERGE -comanda

-Incarca in memorie un program de pe discheta in continuarea

programului existent prin inlantuire si apoi lanseaza noul

program.

-format CHAIN MERGE (nume fisier),(numar de linie)

-exemplu CHAIN MERGE "prog 2.bas",750,DELETE 400-680

va incarca programul prog 2 incepind

cu linia 750 si va sterge liniile de

la 400 la 680.

-expresii asociate:

LOAD.MERGE,DELETE,CHAIN
CHR$ -functie

-Transforma un numar (cod ASCII) cuprins intre 0 si 255 in

caracterul echivalent (vezi tabelul de corespondenta).Carac-

terele de la 0 la 31 sint caractere de control (realizeaza

functii)

-forma CHR$(numar intreg)

-exemple print CHR$(55)

10 FOR x=32 TO 255

20 PRINT x,TAB(10)CHR$(x)

30 NEXT x

-expresii asociate:

ASC
CINT -functie

-Transforma o valoare numerica intr-un numar intreg obtinut prin

rotunjire spre numarul intreg cel mai apropiat cu o valoare

cuprinsa intre -32768 si 32767.

-forma CINT(expresie numerica)

-exemple PRINT CINT(PI)

10 LET X=RND*100 (pt.oprire apasati

20 PRINT CINT(X) ESCAPE de doua ori)

30 GOTO 10

-expresii asociate:CREAL,FIX,INT,ROUND,UNT

-36-

CLEAR -comanda

-Sterge toate variabilele,fisierele deschise,tabelele si functi-

ile utilizator.

-forma CLEAR

-Observatie -a nu se confunda cu CLEAR SCREEN (CLS) care

sterge doar ecranul dar pastreaza programul cu toate functiile

si variabilele.Asemanatoare este comanda NEW.

-expresii asociate : nu sint
CLEAR INPUT -comanda

-Sterge din memorie toate datele introduse de la tastatura

-forma CLEAR INPUT

-exemplu 10 CLS

20 PRINT "Tastati cit mai multe litere"

30 FOR t=1 TO 3OOO

40 NEXT t

50 CLEAR INPUT

sau 10 input x

20 PRINT x

30 CLEAR INPUT

-expresii asociate:

INKEY,INKEY$,JOY
CLG -comanda

-Sterge ecranul grafic si-i reda culoarea de fond (clear graphic)

-format CLG (cerneala-numarul pentru culoarea dorita)

-exemplu 10 LOCATE 1,20

20 CLG 5

-Observatie: pentru microcalculatoare de constructie diferita si

pentru variante diferite de program,acelasi numar poate sa desem-

neze culori diferite(vezi INK pentru diverse programe).

-expresii asociate:CLS,GRAPHICS PAPER,INK,ORIGIN
CLOSEIN -comanda

-Inchide orice fisier de intrare de pe discheta deschis cu

comanda OPENIN

-expresii asociate:EOF,OPENIN
CLOSEOUT -comanda

-Inchide orice fisier de iesire deschis prin OPENOUT.

-expresii asociate:OPENOUT
CLS -comanda

-Sterge fereastra de ecran si revine la culoarea de fond a

ecranului specificata prin numarul din paranteza.Daca nu se

specifica nici un numar se considera ca acesta are valoarea 0.

-forma CLS(#numar de canal)

-exemple 10 PAPER #2,5

20 CLS#2

RUN si apoi CLS si repetati RUN

sau 10 LOCATE 15,15:PRINT "X":CLS:GOTO 10

-expresii asociate:CLG,INK,PAPER,WINDOW

-37-

CONT -comanda

-Continua executia programului dupa STOP,doua activari ale tastei

ESC.Daca programul nu a fost nici modificat nici protejat se pot

tasta comenzi directe inainte de a relua programul.

-forma CONT

-exemple 10 FOR X=1 TO 10

20 PRINT X

30 NEXT X

40 GOTO 10

Apasati ESC,din nou ESC si apoi

scrieti CONT si apasati ENTER

Apasati din nou ESC de doua ori

scrieti PRINT 5*5 si ENTER si

apoi din nou CONT si ENTER

-Observatie:se utilizeaza pentru reluarea unui program dupa ce

a fost intrerupt din greseala sau uneori ca element de programare

pentru reluarea unui program dupa un interval de timp.

-expresii asociate:STOP
COPY CHR$ -functie

-Copiaza un caracter pornind de la pozitia cursorului(care

se specifica prin LOCATE x,y).

-forma COPY CHR$(#numar de canal)

exemplu 10 CLS

20 PRINT "colt superior"

30 LOCATE 1,1

40 LET a$=COPY CHR$(0)

50 LOCATE 1,20

60 PRINT a$

-Observatie;daca nu functioneaza renuntati la comanda si

utilizati alte comenzi

-expresii asociate:LOCATE
COS -functie

-Calculeaza cosinus din valoarea expresiei care urmeaza in pa-

ranteza

-forma COS(expresie numerica) sau 10 DEG

-exemple PRINT COS(PI/4) 20 FOR x=1 TO 360

PRINT COS(2*PI/3) 30 PRINT COS(x)

sau 10 FOR x=1 TO 360 40 NEXT x

20 PRINT COS(360/x)

30 NEXT x

-Observatie;verificati in tabelele trigonometrice daca valorile

afisate sint corecte (exista variante de BASIC "virusate" la

care pentru calculul functiilor trigonometrice este adeaugat si

un RND iar valorile afisate au un rezultat aleator).Functiile

sin si cos sint utile pentru calcule balistice,pentru traictorii

unghiulare,pentru miscari unghiulare (strungire) etc.Pentru

exprimarea explicita a rezultatului in grade sau in radiani se

vor utiliza expresiile DEG si RAD.

Se poate utiliza si sub forma de expresii compuse de genul

print COS(sin(30)/sin(60))
-expresii asociate:ATN,DEG,RAD,SIN

-38-

CREAL -functie

-Transforma expresia numerica intr-un numar real.

-forma CREAL (expresia numerica)

-exemple PRINT CREAL(sin(30)/cos(45))

sau 10 LET a=PI

20 PRINT CINT(a)

30 PRINT CREAL(a)

-expresii asociate:

CINT
CURSOR -comanda

-Activeaza sau inactiveaza indicatorul sistem sau utilizator.

-forma CURSOR(indicator sistem),(indicator utilizator)

-exemplu 10 CURSOR 1

20 PRINT "Intrebare?";

30 LET a$=INKEY$:IF a$=" " THEN 30

40 PRINT a$

50 CURSOR 0

-expresii asociate:

LOCATE
DATA -comanda

-Declara constante in interiorul programului

-forma DATA (lista se constante)

-exemple 10 DATA 7,9,13,27

20 FOR X=1 to 4

30 READ p

40 PRINT p

50 NEXT X

sau 10 DATA 7,9,13,27,45,66,78

20 FOR X=1 TO 5

30 READ a

40 PRINT a

50 PRINT TAB(10)a*10

60 NEXT X

sau 10 FOR x=1 TO 4

20 READ nume$,prenume$

30 PRINT "Domnul- ";nume$;" ";prenume$

40 NEXT x

50 DATA GHEORGHE,HAGI,DAN,PETRESCU

60 DATA ADRIAN,MUTU,DORINEL MUNTEANU

sau 10 FOR x=1 TO 10

20 READ a$

30 PRINT a$

40 NEXT x

50 DATA A,B,c,h,Y,i,r,D,Z,y,A,w,q,m,M
-Observatii;DATA nu are sens fara expresia READ care va prelua

datele din memorie.DATA doar arhiveaza datele sub forma introdusa

de la tastatura si nu influenteaza programul cu nimic.Pentru

interpretarea si utilizarea lor este necesara comanda READ si

variabila prin care se desemneaza tipul de caractere citite.

Daca se desemneaza prin o litera (ex."a") se vor citi datele

valori numerice iar dupa litera+$ (ex.a$) se citesc literele.

-39-

Pentru regulile complete de scriere si citire a datelor

prin comanda DATA.....READ vezi si expresia READ.

Prin comanda DATA se pot adauga in orice moment noi date

in program cu conditia sa se utilizeze o linie de adresa

libera (sa nu se inlocuiasca linii din program) dar pentru

citirea si executarea lor va trebui modificata expresia

READ si variabila prin care aceasta este determinata.

(In exemplul anterior,pentru a citi mai multe litere se va

modifica FOR x=1 to 12 si READ a$)

-expresii asociate:READ,RESTORE

DEC$ -functie

-Determina o reprezentare in cod decimal a expresiei numerice,

utilizind un format predeterminat si solicitat prin unul dintre

caracterele (+-$*#,.^)(semnificatia fiecarui semn este descrisa

la PRINT USING)

-forma DEC$(expresie numerica),(model de format)

-exemple PRINT DEC$(13.3456,"+**$#####.#####")

PRINT DEC$(13.3456,"#.#")

PRINT DEC$(13.3456,"#.##)

-Observatie;exprimarea decimala se face prin cifre arabe de la 0

la 9 iar formatul lor este cel pe care il solicitam prin expresia

din paranteza.Functia are rostul de a prezenta sub o anumita forma

rezultatul unor calcule(de obicei preturi) si de a adauga automat

si simbolul monedei utilizate-dolar sau lira sterlina-)

-expresii asociate:

BIN$,HEX$,PRINT USING,STR$
DEF FN -comanda

-Defineste o functie scrisa de catre utilizator.In continuare

programul va utiliza functia introdusa ori de cite ori va fi

solicitat.

-forma DEF FN(nume)(parametri formali=expresie algebrica)

-exemple 10 PRINT "Aria cercului"

20 DEF FNS(R)=3.14*R^2

30 PRINT "Introduceti raza cercului"

40 INPUT R

50 LET x=FNS(R)

60 PRINT "Aria cercului este=";x

sau 10 LET t=TIME/300

20 DEF FNchrono=ABS(TIME/900-t)

30 PRINT TIME

40 PRINT t

50 PRINT FNchrono
-Observatie;se va avea in vedere ca rezolvarea ecuatiilor introduse

la definirea functiilor sa nu duca la valori situate in afara do-

meniului de valori cu care opereaza programul si sa nu determine

operatii mult prea complexe care depasesc memoria de lucru,caz in

care va genera mesaje de eroare (ex.overflow)

Dupa fiecare functie nou introdusa se va verifica daca programul

a memorat functia si o poate executa.La un numar prea mare de

functii se va genera mesajul out of memory sau overflow.Nu se va

utiliza aceeasi denumire pentru doua functii definite diferit.

-expresii asociate;nu sint

-40-

DEFINT -comanda

-Aceasta comanda defineste tipul variabilelor dupa prima

litera a numelui variabilei.Ea poate fi urmata de o lista

de initiale.In forma generala a expresiei DEF tip-declara

tipul variabilei ca intreg,sir,simpla sau dubla precizie.

-forma DEFINT(lista de caractere)

-exemplu 10 DEFINT n

20 let numar=123.456

30 PRINT numar

RUN

123

-Observatie;aceasta comanda poate fi urmata de o lista de litere

de exemplu DEFINT a,b,c sau DEFINT a-z.Verificati ce efect are

asupra unor functii definite de d-voastra si denumite prin ini-

tialele respective.In exemplul de mai sus "numar" incepe cu

litera n-daca se foloseste DEFINT a expresia nu se aplica.

-expresii asociate;DEFREAL,DEFSTR
DEFREAL -comanda

-Defineste tipul de variabila.Tipul variabilei va fi determinat

corespunzator cu prima litera din numele prin care a fost

definita variabila.Comanda poate sa fie urmata de o lista de

initiale caz in care se aplica variabilelor al caror nume

incepe cu una din literele specificate.