L'objectiu d'aquest programa és treballar l'ortografia d'algunes paraules. Cada vegada apareixerà una paraula en la pantalla. Aquesta paraula pot estar correctament escrita o contenir algun error. El que se't demanarà és escriure correctament la paraula en qualsevol dels dos casos. El programa t'indicarà si has encertat o no, donant una resposta correcta en els casos en els quals estàs equivocat.
El programa que aquí et presentem està fet d'una manera bastant senzilla i s'han treballat algunes paraules concretes. El nostre objectiu principal és explicar com pots escriure aquest tipus de programes; després cadascun veurà quines són les paraules que li interessen treballar i si vol fer algun canvi o no.
Si bé en aquest cas només s'han tractat les paraules, existeixen altres possibilitats: preguntar per la paraula o concepte definit mitjançant una definició o demanar que es corregeixin algunes paraules d'un text.
Observacions:
10 REM TREBALLANT L'ORTOGRAFIA
20 DIM FIL(5) : J=0
30 KEY OFF: SCREEN 1,0 : CLS
40 LOCATE 12,6 : PRINT "PROGRAMA ORTOGRAFIA"
50 FOR I=1 TO 2000 : K=K+1 : NEXT I
60 CLS : RANDOMIZE TIMER
70
LOCATE 4,15 : PRINT "MENÚ PRINCIPAL 7,9"
90 LOCATE 9,9 : PRINT "2. TX, TS o TZ
100 LOCATE 11,9 : PRINT "3. X, S o Z
110 LOCATE 13,9 : PRINT "4. A orgànica, sí o no?"
120 LOCATE 15,9 : PRINT "5. Tots barrejats"
130 LOCATE 17,9 : PRINT "6. Programa
Fi" 140 LOCATE 20,6 : INPUT "Quines opcions vols treballar";AUK
150 IF AUK 1 OR AUK 6 THEN LOCATE 20,6
: PRINT SPC(34) : GOTO 140
160 CLS
170
LOCATE 2,12 : PRINT Examinar la
paraula "PRINT 7,6"
1$
EN
THRM=
100%
FOX
420 LOCATE 21,INT ((40-LEN(HITZA1$)/2) : INPUT "",EREN$
430 LOCATE 23,6 : IF EREN$=PALABRA1$ THEN PRINT "BÉ!!!" :
BÉ=BÉ+1
ELSE PRINT "MALAMENT! ";PALABRA1$"."
"sacerdot",
"sacerdot",
"sacerdot",
"sacerdot",
"sacerdot",
"salze",
"sacerdot",
"salze",
"llenç",
"desolat",
"salze"