DataMuseum.dk

top - download

    Length: 6784 (0x1a80)
    Types: TextFile
    Names: »S2«

└─⟦83eba9371⟧ Bits:30003603 Tekster - Undervisningsprogram i COMAL om ord
    └─ ⟦this⟧ »S2« 

TextFile

11 //REM ORDBOG, 8.KLASSETRIN.
21 //READ A$,A,B,C,D,E,F,G,H,I,J,K,L
31 //IF A$ ="SKIFT" THEN 9961
41 //IF A$ = "STOP" THEN 9971
1111 DATA "BEBOERE", 45,7,4, 72,1,2, 0,0,0, 2,4,3
1121 DATA "BEGEJSTRET", 22,10,3, 62,1,2, 0,3,7, 3,1,2
1131 DATA "BEGREB", 42,6,2, 5,1,2, 0,0,0, 2,2,1
1141 DATA "BEMÆRKNINGER", 45,12,4, 35,1,2, 0,3,3, 0,7,3
1151 DATA "BERØRING", 41,8,3, 39,1,2, 0,3,3, 2,8,2
1161 DATA "BESKYTTELSE", 41,11,4, 39,1,2, 0,2,6, 0,8,3
1171 DATA "BESKÆFTIGET", 14,11,4, 135,1,2, 4,3,0, 0,7,3
1181 DATA "BETRAGTE", 11,8,3, 81,1,2, 0,0,0, 0,1,2
1191 DATA "BEVIDST", 22,7,2, 214,1,2, 2,3,3, 0,2,1
1201 DATA "BEVIDSTHED", 41,10,3, 286,1,2, 2,3,3, 0,2,2
1211 DATA "BJÆRGE", 11,6,2, 183,1,1, 0,0,0, 0,7,2
1221 DATA "BLOMSTRENDE", 16,11,3, 152,1,1, 2,3,4, 0,9,3
1231 DATA "BOMULD", 41,6,2, 44,1,1, 2,3,4, 0,9,2
1241 DATA "BRUD", 41,4,1, 3,1,1, 0,0,0, 2,5,1
1251 DATA "BUNDS", 40,5,1, 18,1,1, 2,3,5, 3,4,1
1261 DATA "CHANCE", 41,6,2, 322,1,1, 0,0,0, 0,1,2
1271 DATA "CHOKOLADE", 41,9,4, 50,2,3, 0,3,7, 0,1,2
1281 DATA "DIRRE", 11,5,2, 57,1,1, 0,2,0, 0,3,2
1291 DATA "DUNKLE", 23,6,2, 31,1,1, 0,3,5, 3,4,2
1301 DATA "DYGTIGSTE", 25,9,3, 53,1,1, 4,3,6, 0,8,3
1311 DATA "DYRE", 23,4,2, 12,1,1, 0,0,0, 0,6,2
1321 DATA "EFTERSOM", 3,8,3, 44,1,1, 0,3,2, 0,9,1
1331 DATA "EGNER", 12,5,2, 52,1,1, 0,3,7, 0,1,2
1341 DATA "EJENDOMMELIG", 21,12,5, 139,1,3, 4,2,7, 3,3,1
1351 DATA "ELEGANT", 21,7,3, 23,1,3, 0,0,0, 3,1,1
1361 DATA "ENDER", 12,5,2, 12,1,1, 2,3,2, 0,7,2
1371 DATA "ENERGISK", 21,8,3, 146,1,2, 0,3,2, 3,7,2
1381 DATA "ENGELSK", 41,7,2, 36,1,1, 0,3,2, 3,7,2
1391 DATA "ERINDRING", 41,9,3, 121,1,2, 0,3,3, 3,2,2
1401 DATA "ERSTATTET", 14,9,3, 94,1,2, 0,2,2, 0,1,2
1411 DATA "EVIG", 21,4,2, 7,1,1, 4,3,0, 0,2,2
1421 DATA "FANTASI", 41,7,3, 49,1,3, 0,0,0, 2,3,1
1431 DATA "FLYTTET", 14,7,2, 19,1,1, 0,2,6, 0,8,2
1441 DATA "FOLDEDE", 13,7,3, 127,1,1, 2,3,4, 0,9,3
1451 DATA "FOLKETS", 40,7,2, 43,1,1, 0,3,4, 3,9,2
1461 DATA "FOREGÅ", 11,6,3, 44,1,1, 0,0,0, 2,9,1
1471 DATA "FOREGIK", 13,7,3, 43,1,1, 0,0,0, 0,3,1
1481 DATA "FORETRÆKKE", 11,10,4, 65,1,1, 0,2,0, 0,7,2
1491 DATA "FORNUFT", 41,7,2, 6,1,2, 0,3,5, 0,4,1
1501 DATA "FORSIKREDE", 13,10,4, 30,1,2, 0,3,3, 0,2,3
1511 DATA "FROSNE", 23,6,2, 46,1,1, 0,0,0, 0,9,2
1521 DATA "FRYGTELIGT", 22,10,3, 48,1,1, 4,3,6, 0,3,1
1531 DATA "FYNSK", 21,5,1, 3,1,1, 0,0,0, 2,6,1
1541 DATA "FÆL", 21,3,1, 16,1,1, 0,0,0, 2,7,1
1551 DATA "FÆRDEDES", 15,8,3, 47,1,1, 0,0,0, 0,7,3
1561 DATA "GARTNEREN", 43,9,3, 71,1,1, 0,0,0, 0,1,3
1571 DATA "GLØDENDE", 16,8,3, 83,1,1, 2,3,0, 0,8,3
1581 DATA "GRUNDIGT", 22,8,2, 32,1,1, 4,3,5, 0,4,2
1591 DATA "GRUPPE", 41,6,2, 130,1,1, 0,2,0, 0,5,2
1601 DATA "GYNGEDE", 13,7,3, 22,1,1, 0,3,6, 0,8,3
1611 DATA "HJERTELIGT", 22,10,3, 29,1,1, 4,3,2, 0,3,1
1621 DATA "HYPPIGT", 22,7,2, 112,1,1, 4,2,0, 0,6,2
1631 DATA "ILDE", 21,4,2, 25,1,1, 2,3,0, 0,3,2
1641 DATA "INDFØRSEL", 41,9,3, 49,1,1, 2,3,3, 0,2,3
1651 DATA "INTERESSERE", 11,11,5, 362,1,4, 0,2,2, 2,2,2
1661 DATA "IVER", 41,4,2, 4,1,1, 0,0,0, 2,3,2
1671 DATA "KOSTBARE", 23,8,3, 37,1,1, 0,3,4, 2,9,3
1681 DATA "LEJLIGHEDEN", 43,11,4, 46,1,1, 4,3,7, 2,2,2
1691 DATA "LEKTIER", 45,7,2, 64,1,1, 0,3,2, 0,7,2
1701 DATA "LIGHED", 41,6,2, 22,1,1, 4,3,0, 2,3,2
1711 DATA "SKIFT", 1,1,1, 2,2,2, 3,3,3, 4,4,4
9941 //PRINT A$; INT(D/3+.5),
9951 //GOTO 21 
9961 //LOAD 1111,1701
9971 //PRINT 
9972 //STOP 
9999 //END 
11 //REM ORDBOG, 8.KLASSETRIN.
21 //READ A$,A,B,C,D,E,F,G,H,I,J,K,L
31 //IF A$ ="SKIFT" THEN 9961
41 //IF A$ = "STOP" THEN 9971
1101 //IF A$ = "STOP" THEN  9971
1111 DATA "LIVS", 40,4,1, 4,1,1, 0,0,0, 2,3,1
1121 DATA "MAGE", 41,4,2, 11,1,1, 0,0,0, 0,1,2
1131 DATA "MAJS", 41,4,1, 95,1,1, 0,0,0, 3,1,1
1141 DATA "MIDTPUNKT", 42,9,2, 125,1,1, 2,3,3, 0,2,2
1151 DATA "MYRE", 41,4,2, 78,1,1, 0,0,0, 0,6,2
1161 DATA "NÅDE", 41,4,2, 2,1,1, 0,0,0, 0,9,2
1171 DATA "NORMALT", 22,7,2, 32,1,2, 0,3,4, 2,1,1
1181 DATA "OPTRÆDEN", 41,8,3, 18,1,1, 0,3,4, 2,9,3
1191 DATA "ORDENTLIGT", 22,10,3, 127,1,1, 4,3,4, 2,3,1
1201 DATA "OVERVÆLDENDE", 16,12,5, 152,1,1, 2,3,4, 3,7,3
1211 DATA "PLANTES", 15,7,2, 19,1,1, 0,0,0, 0,1,2
1221 DATA "PUDSE", 11,5,2, 51,1,1, 2,3,0, 0,5,2
1231 DATA "RANK", 21,4,1, 11,1,1, 0,0,0, 3,1,1
1241 DATA "RÆKKER", 12,6,2, 21,1,1, 0,2,0, 0,7,2
1251 DATA "SEJREDE", 13,7,3, 10,1,1, 0,3,7, 0,1,3
1261 DATA "SJÆLLANDSK", 21,10,2, 113,1,1, 2,2,0, 0,7,2
1271 DATA "SKAL", 41,4,1, 86,1,1, 0,0,0, 3,1,1
1281 DATA "SKARER", 45,6,2, 95,1,1, 0,0,0, 0,1,2
1291 DATA "SKIKKELSER", 45,10,3, 47,1,1, 0,2,0, 0,3,3
1301 DATA "SKJUL", 42,5,1, 22,1,1, 0,0,0, 2,5,1
1311 DATA "SKYLDTES", 15,8,2, 109,1,1, 2,3,0, 0,6,2
1321 DATA "SNURREDE", 13,8,3, 74,1,1, 0,2,5, 0,4,3
1331 DATA "SPEJDEDE", 13,8,3, 54,1,1, 0,3,7, 0,1,3
1341 DATA "SPURGT", 14,6,1, 44,1,1, 4,3,5, 2,4,1
1351 DATA "STEDSE", 3,6,2, 18,1,1, 0,3,2, 0,7,2
1361 DATA "STIFTET", 14,7,2, 40,1,1, 0,3,3, 0,2,2
1371 DATA "STJÅLET", 14,7,2, 57,1,1, 0,0,0, 0,9,2
1381 DATA "STORMEDE", 13,8,3, 12,1,1, 0,3,4, 0,9,3
1391 DATA "SVENSK", 21,6,1, 12,1,1, 0,3,2, 3,7,1
1401 DATA "SYNGENDE", 16,8,3, 45,1,1, 2,3,6, 0,8,3
1411 DATA "SØVNIG", 21,6,2, 49,1,1, 4,3,0, 0,8,2
1421 DATA "TÅRERNE", 46,7,3, 141,1,1, 0,0,0, 0,9,3
1431 DATA "TAKNEMMELIG", 21,11,4, 95,1,2, 4,2,2, 3,3,1
1441 DATA "TALLENE", 46,7,3, 31,1,1, 0,2,0, 3,1,3
1451 DATA "TILPAS", 3,6,2, 62,1,2, 0,3,3, 0,1,1
1461 DATA "UAFBRUDT", 22,8,3, 91,1,1, 2,3,0, 0,5,1
1471 DATA "UDBRUD", 42,6,2, 3,1,1, 0,0,0, 0,5,2
1481 DATA "UDFØRSEL", 41,8,3, 12,1,1, 0,0,0, 0,5,3
1491 DATA "UDNYTTE", 11,7,3, 42,1,1, 0,2,6, 0,5,3
1501 DATA "UDVIDET", 14,7,3, 132,1,1, 0,0,0, 2,5,3
1511 DATA "UHELD", 42,5,2, 20,1,1, 2,3,2, 3,5,2
1521 DATA "UNDERVEJS", 3,9,3, 31,1,3, 0,3,5, 3,1,1
1531 DATA "UVENTET", 22,7,3, 92,1,1, 0,3,2, 0,5,3
1541 DATA "VAKT", 14,4,1, 145,1,1, 0,0,0, 0,1,1
1551 DATA "VARMERE", 24,7,3, 50,1,1, 0,0,0, 0,1,3
1561 DATA "VENT", 10,4,1, 88,1,1, 0,3,2, 3,7,1
1571 DATA "VIDNESBYRD", 42,10,3, 142,1,1, 0,0,0, 0,6,1
1581 DATA "VIDST", 14,5,1, 192,1,1, 2,3,3, 0,2,1
1591 DATA "VOLDSOM", 21,7,2, 46,1,1, 2,3,4, 0,9,2
1601 DATA "VOLDTE", 13,6,2, 109,1,1, 2,3,4, 0,9,2
1611 DATA "VOKSEN", 21,6,2, 7,1,1, 0,3,4, 0,9,2
1621 DATA "VREDE", 23,5,2, 5,1,1, 0,0,0, 0,2,2
1631 DATA "VRØVL", 42,5,1, 28,1,1, 0,0,0, 3,8,1
1641 DATA "VÆLTER", 12,6,2, 65,1,1, 0,0,0, 0,7,2
1651 DATA "ÆNGSTELIG", 21,9,3, 95,1,1, 4,3,0, 0,3,1
1661 DATA "ØJEBLIKKE", 45,9,4, 14,1,1, 0,2,3, 0,2,2
1671 DATA "ØNSKER", 45,6,2, 8,1,1, 0,0,0, 0,8,2
1681 DATA "STOP", 1,1,1,2,2,2,3,3,3,4,4,4
1711 DATA "SKIFT", 1,1,1, 2,2,2, 3,3,3, 4,4,4
9941 //PRINT A$; INT(D/3+.5),
9951 //GOTO 21 
9961 //LOAD 1111,1701
9971 //PRINT 
9972 //STOP 
9999 //END 
«eof»