Results 1 to 4 of 4

Thread: 50th Anniversary of BASIC

  1. #1
    Join Date
    Sep 2009
    Location
    Wroclaw, Poland
    Posts
    1,394
    Thanked 342 Times in 324 Posts
    Qt products
    Qt4 Qt5
    Platforms
    MacOS X Unix/X11 Windows Android

    Default 50th Anniversary of BASIC

    At 4 a.m. on May 1, 1964, in the basement of College Hall, Professor John Kemeny and a student programmer simultaneously typed RUN on neighboring terminals. When they both got back correct answers to their simple programs, time-sharing and BASIC were born.
    more info here: https://www.dartmouth.edu/basicfifty/
    Qt Code:
    1. 10 CLS
    2. 20 PRINT "I'm 50!"
    3. 30 END
    To copy to clipboard, switch view to plain text mode 

  2. #2
    Join Date
    Jan 2006
    Location
    Warsaw, Poland
    Posts
    33,359
    Thanks
    3
    Thanked 5,015 Times in 4,792 Posts
    Qt products
    Qt3 Qt4 Qt5 Qt/Embedded
    Platforms
    Unix/X11 Windows Android Maemo/MeeGo
    Wiki edits
    10

    Default Re: 50th Anniversary of BASIC

    basic Code:
    1. 10 read name
    2. 20 if name = 0 then goto 50
    3. 30 print chr$(name);
    4. 40 goto 10
    5. 50 data 72, 65, 80, 80, 89, 32
    6. 51 data 66, 73, 82, 84, 72, 68, 65, 89, 32
    7. 52 data 66, 65, 83, 73, 67, 33, 0
    To copy to clipboard, switch view to plain text mode 
    Your biological and technological distinctiveness will be added to our own. Resistance is futile.

    Please ask Qt related questions on the forum and not using private messages or visitor messages.


  3. #3
    Join Date
    Jun 2007
    Location
    India
    Posts
    1,042
    Thanks
    8
    Thanked 133 Times in 128 Posts
    Qt products
    Qt3 Qt4 Qt/Embedded
    Platforms
    MacOS X Unix/X11 Windows

    Default Re: 50th Anniversary of BASIC

    Quote Originally Posted by wysota View Post
    basic Code:
    1. 10 read name
    2. 20 if name = 0 then goto 50
    3. 30 print chr$(name);
    4. 40 goto 10
    5. 50 data 72, 65, 80, 80, 89, 32
    6. 51 data 66, 73, 82, 84, 72, 68, 65, 89, 32
    7. 52 data 66, 65, 83, 73, 67, 33, 0
    To copy to clipboard, switch view to plain text mode 
    what does these "data" line do?

  4. #4
    Join Date
    Jan 2006
    Location
    Warsaw, Poland
    Posts
    33,359
    Thanks
    3
    Thanked 5,015 Times in 4,792 Posts
    Qt products
    Qt3 Qt4 Qt5 Qt/Embedded
    Platforms
    Unix/X11 Windows Android Maemo/MeeGo
    Wiki edits
    10

    Default Re: 50th Anniversary of BASIC

    Quote Originally Posted by nish View Post
    what does these "data" line do?
    They provide data for the READ instruction.
    Your biological and technological distinctiveness will be added to our own. Resistance is futile.

    Please ask Qt related questions on the forum and not using private messages or visitor messages.


Similar Threads

  1. Basic GUI Help
    By QT++ in forum Newbie
    Replies: 7
    Last Post: 20th August 2012, 05:58
  2. Need help with basic Qt
    By doforumda in forum Qt Programming
    Replies: 5
    Last Post: 10th July 2010, 09:53
  3. Need basic help
    By Ossi in forum Qwt
    Replies: 2
    Last Post: 23rd October 2009, 14:24
  4. Need immediate help on basic cpp
    By Sandip in forum General Programming
    Replies: 10
    Last Post: 21st September 2008, 11:33
  5. Happy anniversary!
    By Gopala Krishna in forum General Discussion
    Replies: 2
    Last Post: 5th January 2008, 12:08

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  
Digia, Qt and their respective logos are trademarks of Digia Plc in Finland and/or other countries worldwide.