100 REM *****************
110 REM * PROGRAMMATION *
120 REM * STRUCTUREE *
130 REM *****************
140 REM * EXEMPLE *
150 REM * DE TRES *
160 REM * MAUVAISE FOI *
170 REM *****************
180 REM
190 REM
200 REM ==========
210 REM DEFINITION
220 REM ==========
230 REM
240 REM
250 REM PHRASE 1
260 GOSUB 480
270 PRINT
280 REM
290 REM PHRASE 2
300 GOSUB 800
310 PRINT
320 REM PHRASE 3
330 GOSUB 1000
340 REM
350 REM ===
360 REM FIN
370 REM ===
380 :
390 END
400 :
410 REM =========================
420 :
430 REM
440 REM ---------------
450 REM PREMIERE PHRASE
460 REM ---------------
470 REM
480 GOSUB 1220
490 PRINT" STRUCTUREE EST ";
500 GOSUB 1310
510 PRINT"SYSTEME ";
520 GOSUB 1450
530 GOSUB 1260
540 PRINT" QUI CONSISTE ";
550 GOSUB 1670
560 PRINT" DIVISER ";
570 GOSUB 1310
580 GOSUB 1360
590 PRINT" COMPLEXE EN ";
600 GOSUB 1310
610 PRINT"ENSEMBLE ";
620 GOSUB 1450
630 GOSUB 1360
640 GOSUB 1770
650 GOSUB 1820
660 PRINT"SIMPLES FAISANT ";
670 GOSUB 1410
680 PRINT" L'OBJET D'";
690 GOSUB 1310
700 GOSUB 1720
710 GOSUB 1470
720 GOSUB 1520
730 PRINT"."
740 RETURN
750 REM
760 REM ---------------
770 REM DEUXIEME PHRASE
780 REM ---------------
790 REM
800 GOSUB 1310
810 GOSUB 1470
820 PRINT" PRINCIPAL APPELLE ";
830 GOSUB 1670
840 PRINT" TOUR ";
850 GOSUB 1450
860 GOSUB 1570
870 GOSUB 1820
880 GOSUB 1410
890 PRINT" DES ";
900 GOSUB 1720
910 GOSUB 1470
920 GOSUB 1770
930 PRINT"."
940 RETURN
950 REM
960 REM ----------------
970 REM TROISIEME PHRASE
980 REM ----------------
990 REM
1000 PRINT"L'AJOUT ";
1010 GOSUB 1450
1020 PRINT"LIGNES ";
1030 GOSUB 1450
1040 PRINT"REMARQUES PERMET ";
1050 GOSUB 1450
1060 PRINT"SAVOIR EXACTEMENT LE ";
1070 GOSUB 1570
1080 PRINT" JOUE PAR ";
1090 GOSUB 1410
1100 GOSUB 1820
1110 GOSUB 1620
1120 GOSUB 1720
1130 GOSUB 1470
1140 GOSUB 1770
1150 GOSUB 1520
1160 GOSUB 1770
1170 PRINT"."
1180 RETURN
1190 REM
1200 REM ------------- LA
1210 REM
1220 PRINT"LA ";
1230 REM
1240 REM -- PROGRAMMATION
1250 REM
1260 PRINT"PROGRAMMATION";
1270 RETURN
1280 REM
1290 REM ------------- UN
1300 REM
1310 PRINT"UN ";
1320 RETURN
1330 REM
1340 REM ------- PROBLEME
1350 REM
1360 PRINT"PROBLEME";
1370 RETURN
1380 REM
1390 REM --------- CHACUN
1400 REM
1410 PRINT"CHACUN";
1420 RETURN
1430 REM
1440 REM ------ PROGRAMME
1450 PRINT"DE ";
1460 RETURN
1470 PRINT"PROGRAMME";
1480 RETURN
1490 REM
1500 REM ------ OU MODULE
1510 REM
1520 PRINT" OU MODULE";
1530 RETURN
1540 REM
1550 REM ----------- ROLE
1560 REM
1570 PRINT"ROLE";
1580 RETURN
1590 REM
1600 REM ------------ DES
1610 REM
1620 PRINT"DES ";
1630 RETURN
1640 REM
1650 REM -------------- A
1660 REM
1670 PRINT"A";
1680 RETURN
1690 REM
1700 REM ---------- SOUS-
1710 REM
1720 PRINT"SOUS-";
1730 RETURN
1740 REM
1750 REM -------------- S
1760 REM
1770 PRINT"S";
1780 RETURN
1790 REM
1800 REM --------- ESPACE
1810 REM
1820 PRINT" ";
1830 RETURN
1840 REM
1850 REM *** C'EST TOUT ***
|