Author Topic: I miss Basic  (Read 8108 times)

0 Members and 1 Guest are viewing this topic.

Offline Colonol Dekker

  • HLP is my mistress
  • 213
  • Aken Tigh Dekker
    • My old squad sub-domain
1- PRINT "Hello world!"
2-NEW LINE
3-GOTO 1


How easy was it back then...........

 :D
Your friendly Orestes tactical controller
GO GO DEKKER RANGERSSSS!!!!!!!!!!!!!!!!!
President of the Scooby Doo Model Appreciation Society
The only good Zod is a dead Zod
NEWGROUNDS COMEDY GOLD, UPDATED DAILY
http://badges.steamprofile.com/profile/default/steam/76561198011784807.png

 

Offline Turey

  • Installer dude
  • 211
  • The diminutive form of Turambar.
    • FreeSpace Open Installer Homepage
Perl is simply:
Code: [Select]
while (1) {
   print "Hello, world!\n";
}

And many other languages are nearly as easy.

On the other hand, more complicated operations are much easier to perform in other languages as compared to Basic. The best example is quicksort. This is a simple thing to implement in any language with proper recursion, but basic makes it very difficult. I managed to write Quicksort for the TI-84 calculator (using TI-BASIC), but it basically involved writing my own call stack using a matrix and then writing a recursive Quicksort on top of that.
Creator of the FreeSpace Open Installer.
"Calm. The ****. Down." -Taristin
why would an SCP error be considered as news? :wtf: *smacks Cobra*It's a feature.

 

Offline Colonol Dekker

  • HLP is my mistress
  • 213
  • Aken Tigh Dekker
    • My old squad sub-domain
Ok. I'm too stupid to use anything besides basic and html and flash. I should have said that instead :lol:
Your friendly Orestes tactical controller
GO GO DEKKER RANGERSSSS!!!!!!!!!!!!!!!!!
President of the Scooby Doo Model Appreciation Society
The only good Zod is a dead Zod
NEWGROUNDS COMEDY GOLD, UPDATED DAILY
http://badges.steamprofile.com/profile/default/steam/76561198011784807.png

 

Offline Flipside

  • əp!sd!l£
  • 212
Try learning Java, once you get your head around Object Oriented coding, it's a very easy language to learn ;)

 

Offline Colonol Dekker

  • HLP is my mistress
  • 213
  • Aken Tigh Dekker
    • My old squad sub-domain
I did learn, and forget; the basic bare basics of Javascript........ten years back :nod:
Your friendly Orestes tactical controller
GO GO DEKKER RANGERSSSS!!!!!!!!!!!!!!!!!
President of the Scooby Doo Model Appreciation Society
The only good Zod is a dead Zod
NEWGROUNDS COMEDY GOLD, UPDATED DAILY
http://badges.steamprofile.com/profile/default/steam/76561198011784807.png

 

Offline karajorma

  • King Louie - Jungle VIP
  • Administrator
  • 214
    • Karajorma's Freespace FAQ
Javascript and Java are not the same thing though. Not by a long way. :)
Karajorma's Freespace FAQ. It's almost like asking me yourself.

[ Diaspora ] - [ Seeds Of Rebellion ] - [ Mind Games ]

 

Offline Flipside

  • əp!sd!l£
  • 212
Agreed, once you get over your initial concerns about it being interpreted rather than compiled, it's a nice little language, certainly preferable, in my opinion, to VB, which seems to make a mountain out of a molehill in 90% of cases.

 

Offline qazwsx

  • POST DRUNK GET TITLE
  • 29
    • Minecraft
If you still want to use basic, why not try the free Windows and Unix one, Yabasic?
http://www.yabasic.de/
It's rather fun, I've programmed a random colour fader before now...
<Achillion> I mean, it's not like he's shoving the brain-goo in a usb slot and praying to kurzweil to bring the singularity

<dsockwell> idk about you guys but the reason i follow God's law is so I can get my rocks off in the afterlife

 

Offline Rick James

  • Scathed By Admins
  • 27
Oh, this takes me back to the many hours I spent in QBasic...

<3

Boystrous 19 year old temp at work slapped me in the face with an envelope and laughed it off as playful. So I shoved him over a desk and laughed it off as playful. It's on camera so I can plead reasonable force.  Temp is now passive.

 

Offline Aardwolf

  • 211
  • Posts: 16,384
    • Minecraft
Gorillas.bas ftw

I don't care how old this thread is, the board needs more activity.

 
I spent many hours with Gorillas.bas. That was a lot of fun.
Now I spend many (most?) hours fighting with VS and MFC.
STRONGTEA. Why can't the x86 be sane?

 

Offline Aardwolf

  • 211
  • Posts: 16,384
    • Minecraft
Turns out if you play gorillas at midnight it freezes :lol:

The timing routine wasn't sophisticated enough to handle the timer being reset to zero.

 

Offline Goober5000

  • HLP Loremaster
  • Administrator
  • 214
    • Goober5000 Productions
:bump:

I need to visit this forum more often...

I love BASIC.  In all its varieties. :D  Gorillas.bas was a classic, true, but the real goldmine came from all those books with BASIC code listings for games and such.  Tim Hartnell FTW.  Pretty much any book that he wrote is a must-read and must-code. :D  Another must-have is the CIA adventure game from Basic Fun With Adventure Games by Susan Lipscomb and Margaret Zuanich.

 

Offline Polpolion

  • The sizzle, it thinks!
  • 211
    • Minecraft
I remember when I made FS2BASIC. I wonder if I still have it...

EDIT:

Code: [Select]
OPTION NOLET
SET WINDOW 0,1000,0,1000
RANDOMIZE
CALL Read_image("MS BMP",BAD$,"BAD.BMP")
CALL Read_image("MS BMP",BKGRND$,"BKGRND.BMP")
CALL Read_image("MS BMP",SUBF$,"SUBF.BMP")
CALL Read_image("MS BMP",PROMF$,"PROMF.BMP")
CALL Read_image("MS BMP",ROCKF$,"ROCKF.BMP")
CALL Read_image("MS BMP",HRPF$,"HRPF.BMP")
CALL Read_image("MS BMP",DIE$,"DIE.BMP")
CALL Read_image("MS BMP",HIT$,"HIT.BMP")
CALL Read_image("MS BMP",BFIRE$,"BFIRE.BMP")
DO
   PRINT " FREESPACE"
   PRINT " 1) Ready room"
   PRINT " 2) Tech room"
   PRINT " 3) Bath room"
   PRINT " 4) Airlock"
   PRINT
   PRINT
   PRINT "Where do you want to go? Input #"
   INPUT GO
   IF  GO = 1 THEN
      CALL PLAY
   ELSE IF GO = 2 THEN
      CALL WHAT
   ELSE IF GO = 3 THEN
      CALL POOP
   ELSE IF GO = 4 THEN
      STOP
   ELSE
      PRINT "Pick another number, idiot."
   END IF
LOOP
END

!==================================================================


SUB PLAY
    CLEAR
    PRINT "What laser do you want?"
    PRINT " 1) Subach HL-7 (Damage 8)"
    PRINT " 2) Prometheus - S (Damage 12)"
    PRINT " Input number"
    INPUT GUN
    CLEAR
    PRINT "What missile do you want?"
    PRINT " 1) Rockeye (10 missiles) (Damage 30)"
    PRINT " 2) Harpoon (6 missiles) (Damage 50)"
    PRINT " Input number"
    INPUT MISS
    PRINT "YOUR WEAPONS:";
    IF GUN = 1 THEN
       PRINT "Subach HL-7";
    ELSE
       PRINT "Prometheus - S";
    END IF
    IF MISS = 1 THEN
       PRINT " and Rockeye"
    ELSE
       PRINT "and Harpoon."
    END IF
    PRINT
    PRINT
    PRINT "Press a key when you are ready."
    GET KEY PSE
    CLEAR
    !=============================

    PHLTH = 100
    DO
       BHLTH = 100
       A=rnd*800
       B=rnd*800
       DO
          FWB = FWB - 1
          FW = FW-1
          FWM = FWM-1
          !BOX SHOW $ at ,
          !32
          !122
          BOX SHOW BKGRND$ at 0,0
          BOX SHOW BAD$ at A,B
          GET MOUSE X,Y,S
          GET KEY S
          IF S=122 THEN
             IF GUN = 1 AND FW >= 0 THEN
                BOX SHOW SUBF$ at 0,0
             ELSE
                BOX SHOW PROMF$ at 0,0
             END IF
             IF X>A AND X<(A+200) AND Y>B AND Y<(B+200) THEN
                BOX SHOW HIT$ at A,B
                IF GUN = 1 THEN
                   BHLTH = (BHLTH-8)
                   FW = 6
                ELSE
                   BHLTH = (BHLTH-12)
                   FW = 10
                END IF
             END IF
          END IF
          IF S=32 THEN
             IF MISS = 1 AND FWM >= 0 THEN
                BOX SHOW ROCKF$ at 0,0
             ELSE
                BOX SHOW HRPF$ at 0,0
             END IF
             IF X>A AND X<(A+200) AND Y>B AND Y<(B+200) THEN
                BOX SHOW HIT$ at A,B
                IF GUN = 1 THEN
                   BHLTH = (BHLTH-30)
                   FWM = 10
                ELSE
                   BHLTH = (BHLTH-50)
                   FWM = 15
                END IF
             END IF
          END IF
          PAUSE 0.1
          !PLOT TEXT, at x, y:
          IF FWB >= 0 THEN
             BOX SHOW BFIRE$ at A,B
             PHLTH = PHLTH - (RND*4+6)
             BAR =(100 - PHLTH)
             SET COLOR "GREEN"
             PLOT TEXT, AT  BAR,10 : "|"
             PLOT TEXT, AT 101,10 : "YOUR DAMAGE"
             SET COLOR "BLACK"
             FWB = (RND*5+4)
          END IF
       LOOP UNTIL BHLTH >=0 OR PHLTH >= 0
       IF BHLTH >= 0 THEN
          KILL = KILL + 1
       END IF
       IF PHLTH >= 0 THEN
          CLEAR
          PRINT " YOU SUCK AT THIS GAME!    !! YOU LOSE!!"
       END IF
    LOOP UNTIL KILL = 10 OR PHLTH >= 0
    IF KILL = 10 THEN
       PRINT "YOU ROCK AT A GAME THAT TAKES NO SKILL WHATSOEVER TO PLAY!  !"
    END IF

END SUB

!======================================================================
SUB WHAT
    PRINT " This is a 'port' of the most basic aspects of the game of Freespace 2 to True basic."
    PRINT " When you go into play mode, you get to select guns. Some do more damage than others"
    PRINT "  Put your mouse pointer on the bad guys. 'Z' shoots your lasers,  Spacebar shoots a missile"
    PRINT " Click on bad guys to destroy them."
    PRINT
    PRINT " Back to the main hall! *press key"
    GET KEY PSE
    CLEAR
END SUB
!=====================================================================

SUB POOP
    PRINT " You unzip your pants. Then you remember that this is a game"
    PRINT " and you get up from your computer desk and walk to the real"
    PRINT " bathroom. Thank goodness! *press key"
    GET KEY PSE
    CLEAR
END SUB

Unfortunately, I no longer have the pictures.
« Last Edit: February 26, 2009, 09:49:06 pm by thesizzler »

 

Offline chief1983

  • Still lacks a custom title
  • 212
  • ⬇️⬆️⬅️⬅️🅰➡️⬇️
    • Minecraft
    • Skype
    • Steam
    • Twitter
    • Fate of the Galaxy
Same here, I should put this forum on my auto-notify of new topics.

BASIC Stuff

There's a lot of stuff in there, from almost every version of QBASIC (and FirstBasic for DOS 1.0!), to gorilla.bas, plus a modified version I made where the building hits are as big as gorilla hits and the gorilla hits are like a nuke that wipes the screen (it was much more fun to watch on a Pentium 33/66 than it probably is on a new PC), to numerous other BASIC files I ran across, to a golf game I wrote my freshman year of high school (compiled!).  That's right, QB after 1.1 had a compiler.  Really I think it just wraps the interpreter and the script together, but whatever.
Fate of the Galaxy - Now Hiring!  Apply within | Diaspora | SCP Home | Collada Importer for PCS2
Karajorma's 'How to report bugs' | Mantis
#freespace | #scp-swc | #diaspora | #SCP | #hard-light on EsperNet

"You may not sell or otherwise commercially exploit the source or things you created based on the source." -- Excerpt from FSO license, for reference

Nuclear1:  Jesus Christ zack you're a little too hamyurger for HLP right now...
iamzack:  i dont have hamynerge i just want ptatoc hips D:
redsniper:  Platonic hips?!
iamzack:  lays

 

Offline kode

  • The Swedish Chef
  • 28
  • The Swede
    • http://theswe.de
"It is practically impossible to teach good programming to students that have had a prior exposure to BASIC: as potential programmers they are mentally mutilated beyond hope of regeneration."
-- Edsger W. Dijkstra

And tbh, I agree. BASIC is ****e.
Pray, v. To ask that the laws of the universe be annulled in behalf of a single petitioner confessedly unworthy.
- Ambrose Bierce
<Redfang> You're almost like Stryke 9 or an0n
"Facts do not cease to exist because they are ignored."
- Aldous Huxley
WAR IS PEACE
FREEDOM IS SLAVERY
IGNORANCE IS STRENGTH

 
:bump:

I need to visit this forum more often...

I love BASIC.  In all its varieties. :D  Gorillas.bas was a classic, true, but the real goldmine came from all those books with BASIC code listings for games and such.  Tim Hartnell FTW.  Pretty much any book that he wrote is a must-read and must-code. :D  Another must-have is the CIA adventure game from Basic Fun With Adventure Games by Susan Lipscomb and Margaret Zuanich.

How about all those classic 3.2.1 Contact magazines?  ;)
That's cool and ....disturbing at the same time o_o  - Vasudan Admiral

"Don't play games with me. You just killed someone I like, that is not a safe place to stand. I'm the Doctor. And you're in the biggest library in the universe. Look me up."

"Quick everyone out of the universe now!"

 

Offline castor

  • 29
    • http://www.ffighters.co.uk./home/
"It is practically impossible to teach good programming to students that have had a prior exposure to BASIC: as potential programmers they are mentally mutilated beyond hope of regeneration."
-- Edsger W. Dijkstra

And tbh, I agree. BASIC is ****e.
Or maybe its just an excuse by someone who is better with computers than they are with people :D

 

Offline Flipside

  • əp!sd!l£
  • 212
It is ironic, therefore that many 30-somethings, i.e. a fair percentage of the programmers around, started on something like BBC or Commodore BASIC, probably moving on to PASCAL or something like 8-Bit machine code, if they were really lucky, they would have learned something like Amiga OS, which is heading towards Linux, but for the main part, I'd suggest that quite a lot of coders were 'born in BASIC', as it were, and then moved on to something more flexible.
« Last Edit: April 11, 2009, 10:01:08 am by Flipside »

 

Offline blackhole

  • Still not over the rainbow
  • 29
  • Destiny can suck it
    • Black Sphere Studios
I started on visual basic. While anything BASIC-related is a sh*tty programming language, saying that programmer's minds are hopelessly "mutilated beyond hope of regeneration" is stupid and wrong.