A Cesil programozási nyelv

Példaprogramok

Példaprogramok

99 üveg sör

Forrás: http://99-bottles-of-beer.net/language-cesil-676.html
Készítette: Marinus Oosters
Készítés éve: 2005
Fordító: Java based command line CESIL for Windows & *NIX, Released 22-Jan-08 http://www.obelisk.demon.co.uk/cesil/
Feladat: 99 bottles of beer dal szövegének generálása. A szöveg: x bottles of beer on the wall, x bottles of beer. Take one down and pass it around, x-1 bottles of beer on the wall. x megy 99-től 1-ig, majd nem marad sör.

LOAD 99 STORE BEERS DRINK OUT PRINT " bottle" SUBTRACT 1 JIZERO SNG JUMP PLR SNG JUMP CNT PLR PRINT "s" CNT PRINT " of beer on the wall" LINE LOAD BEERS OUT PRINT " bottle" SUBTRACT 1 JIZERO SNG2 JUMP PLR2 SNG2 JUMP CNT2 PLR2 PRINT "s" CNT2 PRINT " of beer" LINE PRINT "Take one down, pass it around" LINE JIZERO UP STORE BEERS OUT PRINT " bottle" SUBTRACT 1 JIZERO SNG3 JUMP PLR3 SNG3 JUMP CNT3 PLR3 PRINT "s" CNT3 PRINT " of beer on the wall." LINE LINE LOAD BEERS JUMP DRINK UP PRINT "No more bottles of beer on the wall." HALT

Összegzés

Forrás: http://www.obelisk.demon.co.uk/cesil/
Készítette: Andrew John Jacobs
Készítés éve: ?
Fordító: Java based command line CESIL for Windows & *NIX, Released 22-Jan-08 http://www.obelisk.demon.co.uk/cesil/
Feladat: Az 1,2,3 számok összegzése. Az összegzés ciklusa addig fut, amíg pozitív számot kap.

LOAD 0 LOOP STORE TOTAL IN JINEG DONE ADD TOTAL JUMP LOOP DONE PRINT "The total is: " LOAD TOTAL OUT LINE HALT % 1 2 3 -1