COMAL-80 er computersproget for alle, der gerne hurtigt vil lære at programmere, og for alle, der gerne vil kunne skrive større og bedre computerprogrammer eller undervise i, hvordan man skriver programmer. Det indeholder de gode egenskaber fra både BASIC, Logo og Pascal.
Blandt de mange egenskaber COMAL-80 rummer, er:
sætninger til styring af betingelser og
forgreninger som: IF – THEN – ELIF – ELSE – ENDIF CASE – OF – WHEN – OTHERWISE – ENDCASE
DANSK – ENGLISH – DEUTSCH – SYSTEM – GRAPHICS – TURTLE – SPRITES – FONT – SOUND – PADDLES – JOYSTICS – LIGHTPEN – RAMFILES
Pakkerne DANSK, ENGLISH og DEUTSCH foranlediger udskrift af henholdsvis dansk, tysk eller engelsk tekst ved fejl- eller vejlede tekster.
SYSTEM-pakken indeholder en række kommandoer til styring af printer, diskettestation, RS-232 port, tekstskærm etc.
FONT-pakken muliggør opbygningen af et brugerdefineret tegnsæt.
SOUND-pakken letter udnyttelsen af lydkredsen i Commodore 128 og giver desuden mulighed for opbygning af partiturer. SPRITES-pakken styrer små figurer på grafikskærmen. Flere bevægelsesforløb kan fastlægges og afvikles for ialt otte figurer samtidia
GRAPHICS og TURTLE pakkerne giver fuld og direkte adgang til grafik på 40-tegnsskærmen. GRAPHICS-pakken indeholder xygrafik-kommandoer, og TURTLE-pakken indeholder LOGO-kompatible kommandoer. PADDLES-, JOYSTICKS- og LIGHTPEN-
pakkerne letter brugen af henholdsvis paddles, styrepind og lyspen. COMAL-80 til Commodore 128 leveres med dansk brugervejledning og demonstrationsdiskette. Brugervejledningen er bygget op, således at den tilgodeser både nybegynderen og den erfarne COMAL-bruger.
COMAL-fortolkeren sørger selv for at opstille programmet, således at det under udskrift vil fremstå med tydelig adskillelse mellem de forskellige strukturer. Dette opnås med trinvis indrykning. Det ses i ovenstående eksempel, hvor også underrutinerne, de såkaldte procedurer er tydeligst markerede. Læg også mærke til, at COMAL selv lister alle nøgleord med stort. Disse ting, sammenholdt med f.eks. lange variabelnavne, gør COMAL-programmerne lette at læse. Det er især af stor værdi ved senere programændringer. COMAL gør ikke blot programmeringen
CONAL gør ikke biot programmeringen lettere. Som det ses herunder, er der mulighed for, at COMAL kan opfange og reagere på operatørfejl. Det gør programmer skrevet i COMAL meget behagelige at arbejde med, idet man ikke kommer ud for »mystiske« system-fejludskrifter.
| 0110 | // tal-sikkert input |
|---|---|
| 0120 |
// kun
|
| 0130 | |
| 0140 | LOOP |
| 0150 | |
| 0160 | TRAP |
| 0170 | |
| 0180 | PRINT AT linie.pos: SPC$(LEN(tekst$)+dpos);" * |
| 0190 | INPUT AT linie, pos, dpos: tekst$: tal |
| 0200 | |
| 0210 | EXIT //hvis input er OK |
| 0220 | |
| 0230 | HANDLER |
| 0240 | |
| 0250 | CASE ERR OF |
| 0260 | WHEN 2 |
| 0270 | PRINT AT 24,1: "Tallet var for stort" |
| 0280 | WHEN 206 |
| 0290 | PRINT AT 24,1: "Et TAL forventes " |
| 0300 | OTHERWISE |
| 0310 | PRINT AT 24,1: "Hvad skete der ? " |
| 0320 | ENDCASE |
| 0330 | FOR pause:=1 TO 1000 DO NULL |
| 0340 | PRINT AT 24,1: SPC$(20) |
| 0350 | |
| 0360 | ENDTRAP |
| 0370 | |
| 0380 | ENDLOOP |
| 0390 | |
| 0400 | ENDPROC tal'input |
| 0410 | |
| 0420 | |
| 0430 | // test af inputfejl |
| 0440 | PAGE |
| 0450 | LOOP |
| 0460 | tal input(10, 3, 10, indtast et tal: ", tal) |
| 0470 | PRINT AT 12,3: SPC$(15) |
| 0480 | FRINI AL 12, 3: TAL |
| 0490 | ENDLOOP |
| 0000 | 5ND |
|
ABS
AND APPEND ATN BITAND BITOR BITXOR CASE CHAIN CHR$ CLOSE ERR ERRFILE |
CLOSED
COPY COS CREATE CURSOR DATA DELETE DIM DIR DIV DO ELIF MOD MOUNT |
ELSE
END ENDCASE ENDFOR ENDFUNC ENDIF ENDLOOP ENDPROC ENDTRAP ENDWHILE EOD EOF SELECT SGN |
|---|---|---|
|
ERTEXT$
SC EXEC EXIT EXTERNAL ALSE FULC GOR FUNC GET$ GOTO HANDLER F |
NEXT
NOT NULL OF OPEN OR OR OTHERWISE OUTPUT PAGE PASS PEEK POKE |
SIN
SPC$ SQR STATUS$ STEP STOP STR$ SYS TAB TAN THEN TIME TO TRAP |
|
NIFORI
NPUT NTERRUPT KEY$ ABEL EN ET OG OOP |
RANDOM
RANDOMIZE READ REFF RENAME REPEAT REPORT RESTORE RETURN RND |
UNIT
UNTIL USE USING VAL WHEN WHILE WRITE ZONE PI |
|
AUTO
BASIC CAT DEL DISCARD DISPLAY SAVE |
EDIT
ENTER FIND LINK LIST CON SIZF |
|
|---|---|---|
|
DISPLAY
SAVE SCAN SETEXEC |
CON
SIZE VERIFY TRACE |
1 |
tibel med den fastsatte standard og giver samtidig brugeren mulighed for direkte at udnytte Commodore 128's mange faciliteter COMAL-80 v. 2.02 til Commodore 128 er kompatibel med COMAL-80 v. 2.01 til de kendte pakker og kommandoer, som også findes i COMAL-80 v. 2.01 til Commodore 64, skærmen, styring af RS-232-port, 80-teans-Specielt styring of RS-232 porten bliver med COMAL-80 giort meget lettere ved hiælp af
register. Kombinerer man disse nye komman og output, er der ikke længere tale om at lav-
RAMFILES-pakken er en helt ny pakke, som gør det muligt at lave filer i RAM, og dermed få en meget høj tilgangshastighed til data. Ligesom i COMAL-80 v 201 til Commodore 64 er der mulighed for selv at lave sine egne
Udover at COMAL-80 giver programmøren perfekte omgivelser med faciliteter som f.eks. Scroll op/ned af programlistninger, gør COMAL-80 det også muligt at lave meget brugervenlige programmer med f.eks. vinduer på både 40- og 80-tegnsskærm og beskyttelse af indtastningsfelter.
Danske feiltekster
Engelske feiltekster Indeholder ingen kommandoer
Tvske feiltekster Indeholder ingen kommandoer
defkey aettime$ *setmapping *setserialport
aetscreer *cpuspeed *resetmapping *cursormode
*free
window background setheading penup
viewport moveto getcolor textbackaround heading right
moveto textstyle aetcolor textbackground hideturtle
background graphicscreen clearscreen
linkfont
define hidesprite spritecollision
identify spritepos
adsr filtertype
filterfreq filter setscore
Lightpen-pakkes offset
delav
penon
*deleter *getnum *writerefstr *aetstr$
*getrec$
Kommandoer og pakker mærket med * er nye i forhold til COMAL-80 V. 2.01 til
loadfont
Eksemplet herunder viser et udsnit af de grafik-, plotte- og tegnemuligheder, der ligger i COMAL-80 til Commodore 128.
PRINT AT 23,10: "SKIFT SKÆRM" PRINT AT 24,10: "RGB --> PAL", textmode(0) PAGE
ROC PAI FRO Skift PRINT AT 23,5: "SKIFT SKÆRM" PRINT AT 24,5: "RGB <-- PAL", textmode(1) PAGE
PRINT AT 10,10: "Skal svar$:=inkey$ IF svar$ IN "nN" THEN cpuspeed(0) STOP
) STOP ENDIF ) UNTIL svar$ IN "jJ" ) ENDPROC skift
T NT AT 10.10: "Skal vi skifte (j/n)?",
0230 PAGE 0240 ENDPROC rgb'p 0250 0260 PROC pal'rgb 0270 skift
PROC skift REPEAT PRINT A
Version: Programkapsel:
2.02 (Opadkompatibel med 2,01 og 2.0Y) 96K ROM
Brugerprogrammer: 40954 Ramfiler: 40856 Brug af grafik berører ikke frit lager.
Navnebaseret maskinkode interface med parameteroverførsel. (Maskinkodepakker fra v. 2.01 skal omkompileres). Hukommelseskapacitet: 16K RAM (udover brugerlager).
Programkapsel Demonstrationsdiskette Brugervejledning (360 sider).
COMAL-80-modulet monteres i ekspansionsporten.
commodore data a/s Jens Juulsvej 42 DK-8260 Viby J. Tlf. 06 28 55 88
C. F. Richsvej 103 DK-2000 Frederiksberg Tlf. 01 88 15 05
http://retro-commodore.eu





Loading...