Kvikkalkul version of 99 bottles of beer
Laurent Vogel,  http://lvogel.free.fr
the actual Kvikkalkul code starts after after the line below.

(0) (- ,84375
20/ 10
/0 -) 20
/0 (- ,09375
/0 ))
/0 (- ,37500
/0 ))
/0 (- ,87500
/0 ))
/0 (- ,65625
/0 ))
/0 (- ,03125
/0 ))
/0 (- ,31250
/0 ))
/0 (- ,50000
/0 ))
/0 (- ,78125
/0 ))
/0 (- ,90625
/0 ))
/0 (- ,40625
/0 -) 20
/1 -) 20
:1 -) 1200
:2 -) 1300
1100:
:0 -) 1101
-) :2
1101:
:0 -) 1102
-) :1
1102:
(0) (- ,84375
(0) (- ,18750
(0) (- ,06250
(0) (- ,25000
:0 -) 1103
-) :2
1103:
(0) (- ,84375
(0) (- ,21875
(0) (- ,96875
(0) (- ,06250
(0) (- ,25000
(0) (- ,03125
(0) (- ,75000
(0) (- ,93750
(0) (- ,50000
(0) (- ,12500
(0) (- ,09375
(0) (- ,18750
(0) (- ,50000
(0) (- ,12500
(0) (- ,56250
(0) (- ,09375
(0) (- ,78125
(0) (- ,18750
(0) (- ,84375
(0) (- ,18750
(0) (- ,96875
(0) (- ,12500
(0) (- ,40625
(0) (- ,75000
(0) (- ,62500
(0) (- ,62500
(0) (- ,12500
(0) (- ,37500
(0) (- ,03125
(0) (- ,12500
(0) (- ,75000
(0) (- ,31250
(0) (- ,09375
(0) (- ,87500
(0) (- ,18750
(0) (- ,56250
(0) (- ,84375
(0) (- ,18750
(0) (- ,06250
(0) (- ,25000
:3 -) 1104
.0 (- /1
.0 :: ,40625 -) :3
/1 ))
:3 -) 1105
-) :3
1104:
/1 -) 20
/0 ))
1105:
:0 -) 1106
-) :2
1106:
:0 -) 1107
-) :1
1107:
(0) (- ,84375
(0) (- ,21875
(0) (- ,06250
(0) (- ,25000
:3 -) 1108
.0 (- /0
.0 :/: ,40625 -) :3
.0 (- /1
.0 :/: ,40625 -) :3
:3 -) 1400
-) :3
1108:
(0) (- ,06250
(0) (- ,25000
:3 -) 1100
-) :3
1200:
(0) (- ,12500
(0) (- ,09375
(0) (- ,18750
(0) (- ,12500
(0) (- ,03125
(0) (- ,15625
(0) (- ,50000
(0) (- ,12500
(0) (- ,78125
(0) (- ,75000
(0) (- ,28125
(0) (- ,28125
-) :0
1300:
.0 (- /0
:3 -) 1301
:4 -) 1302
:5 -) 1303
.0 :: ,40625 -) :3
(0) (- .0
.0 (- /1
1302:
(0) (- .0
-) :5
1301:
.0 (- /1
.0 :/: ,40625 -) :4
(0) (- ,96875
(0) (- ,18750
(0) (- ,09375
(0) (- ,12500
(0) (- ,21875
(0) (- ,09375
(0) (- ,31250
(0) (- ,50000
1303:
(0) (- ,96875
(0) (- ,12500
(0) (- ,59375
(0) (- ,09375
(0) (- ,03125
(0) (- ,03125
(0) (- ,28125
(0) (- ,50000
:3 -) 1304
.0 (- /0
.0 :/: ,40625 -) :3
.0 (- /1
.0 :/: ,90625 -) :3
:3 -) 1305
-) :3
1304:
(0) (- ,62500
1305:
(0) (- ,12500
(0) (- ,09375
(0) (- ,68750
(0) (- ,12500
(0) (- ,59375
(0) (- ,50000
(0) (- ,50000
(0) (- ,31250
-) :0 
1400: