99 Bottles of Beer

Voting

Bookmarking

Language Baan 3GL

Date:	04/20/05
Author:	Stark Springs
URL:	n/a
Comments:	1
Info:	n/a
Score:	(3.25 in 4 votes)

|********************************************************
|* Run this from the Baan shell
|* By Stark Springs, 18th June 2002
|********************************************************
function main()
{
    long wnd,i

    wnd=new.window(22, 80, 1, 1)
    scroll(wnd)
    for i=99 to 1 step -1
        print i, " bottle(s) of beer on the wall,", cr$(), lf$()
        print i, " bottle(s) of beer.", cr$(), lf$()
        print i-1, " bottle(s) of beer on the wall.", cr$(), lf$(2)
        refresh(wnd)
    endfor
    message("")
}

Download Source | Write Comment

Alternative Versions

Comments

webcam videooo said on 08/11/10 10:30:54

Total Screen Recorder could record the video as long as you wish. Not like the other screen recorder, which just let you record one minute or with large watermark on the video.
http://www.totalscreenrecorder.com

GodswMobile Software dedicated to providing a better experience life for the people who use and rely upon Microsoft Windows Mobile devices for their personal and commercial needs. With thousands of users over 50 countries worldwide, GodswMobile has become the popular, trusted and convenient choice to backup and restore the valuable information which stored in mobile phones.
http://www.godswmobile.com/

Download Source | Write Comment

Add Comment

Please provide a value for the fields Name, Comment and Security Code.
This is a gravatar-friendly website.
E-mail addresses will never be shown.
Enter your e-mail address to use your gravatar.

Please don't post large portions of code here! Use the form to submit new examples or updates instead!

one program in 1500 variations