#Qb64

[dimalink]

Near the shore – to do dreams and programming

Mysterious story. Text quest. You find yourself at the shore. This is island. From one side - it is ocean. Blue sea. And, from other side – it is forest. And, you are walking the sand beach. Read text. And do actions. There are not a lot of them. With every game scene, you need to do something. And, reading the text, you learning the story. Sometimes, you can go in a different way. But, story is linear.

You find out yourself at the shore. Sand. Yellow sandy beach. Sandy line, it is going far in a distance, along the island. And ocean. Blue light blue sea. Blue sky. Bright sunny weather. Deeper to the island – it is forest. And, you are with wide sandy line.

Text story, as old games. Where you need to read text and write commands with actions. There are not a lot of actions here. And story is not very long. Some places, you can turn to the different directions. And, anyway, story is linear. Everything will be going to a key point.

Little of actions. A direction of move. And some actions. North, south, west, east, speak, take, use, list. Mainly, commands with directions. And little of items.

Decoration is so blue. And so sunny. You are at the island, and going along sand. Sea – big sea from one side. And blue sky. In a bright sunny day. True huge ocean. And sand. And, you walk with it. Mysterious story.

I dream, for a long time, to make some text quests. With a simple form. To have some background. And text. And simple commands. And, it can to be most different stories. I like to have a dreams and to write. Of course, I watched, also, how it is to play very first Zork. But, I have here not a Zork, absolutely, of course. Much more simple. Zork - it is, well known, text quest. It is very complicated about realization. And, I have everything simple.

Beach and sand. Yellow sand. You are walking along the sand. Ocean makes a noise nearby. It is so endless and blue. And sky. Cloudless sky. This is a text story. And you write your commands. For example, north. This means go to north. Or south. This means go to south. And it will be written with text. For the south you see a road, for example. This means, by story, you need to go to south. Little game is linear.

Some places, there are two paths. To the different sides. For example. At the north it is forest, and at the south it is water. And you can go with one of the directions. But, with next turn, story will, anyway, go to one single point. A little of variations for the story.   

Game is not long. And, there are some items here, but not a lot. A little of interactions. For example, it is with the description. You see before your eyes a stick. And, you can to write command take stick. And to see what items do you, already, have there is command – list. Sometimes, you need to talk. For example, with the text it is written, before you it is standing magical creature. And you write speak magic creature.

Mainly, you need to make a steps with directions. North, south, west, east. And read text. Sometimes, to do something. Valuable part of the game. You are collecting shells. Read text. And watch, it will be written, that before your eyes it is a shell. Green shell, for example. And write take green shell. It is very valuable thing with this story. You need to collect shells, which are all over the place.

There are moments, which you can to lose. For example, you can be drowning in a swamp. There is one place – where you do not need to go. It will be immediately game over. Dangerous dark place. And there are places, where if you do not have shells, so you never go next. And game will over. Or without some item. Stick, for example. So, there is here such a spiral stick. With patterns. Sometimes, you need to use items. To go right to next scene. Other case, in a next, it will be - game over for you.

It looks all like Norton Commander for Ms Dos. Blue background. At the low part – commands, which you can write. And text. And you write your command. There are scenes, where you need just to read – there is command next, in those scenes. Only one is shown.

I am learning and these things too. So here it is good to write a story. To have a dreams, this means. And do programming. It is interesting things. I dream for a long time to learn these things. You are at the sand. What will you do?

Basic Pascal version 1.18 "Duckling" – most newest version. In this version there are 4 new games! Puddles at Countryside, Duckling Pseudo 3D, Road to Countryside, Duckling Goes 2D. And even more retro games! It is a pack of retro games with modern versions of Basic and Pascal.

It is now in development new version Basic Pascal pack games. This game will be included in a new version.

Basic Pascal: http://www.dimalink.tv-games.ru/games/basicpascal/index_eng.html Website: http://www.dimalink.tv-games.ru/home_eng.html Itchio: https://dimalink.itch.io/basic-pascal

[mistfunk]

Mistigram: Tapio of @unculturedgames has taken the smallscale #ANSIart aesthetic and extended it into an entire #QB64 #textmode #JRPG, #WhispersInTheMoss, available at most major PC game electronic storefronts. We included some scenes from the game, such as this conversation with a dragon, in the recent unthemed MIST0624 artpack collection.

[magnetictapedatastorage]

(Nah, it's just a drawing in QuickBASIC.)

SCREEN 12 LINE (150, 150)-(400, 400), 12, B LINE (0, 0)-(150, 150), 12 LINE (0, 480)-(150, 400), 7 LINE (640, 0)-(400, 150), 12 LINE (400, 400)-(640, 480), 7 LINE (225, 275)-(300, 400), 7, B

COLOR 14 PRINT "This alley, however, is a total washout." PRINT: PRINT PRINT ">"

SLEEP

[basic-retro-programming]

QBasic Tutorial #49 - Bouncing Balls Animation ...

Note: It only runs with QB64 ...

Post #308: YouTube, School Freeware, QBasic Tutorial, #49 Bouncing Balls Animation, 2024.

[loomworld]

PONG GAME IN QB64!! :D if you doo answer this tysm for always making codes!! your a life saver and like half the time I have noooo idea what my teach is saying in class.. thank you!!

haha thxx anon I get it code is tiring for me too, I'm glad to be able to help

to run this code, ull need a qb64 interpreter or an emulator that supports qb64. Save the code with a .BAS extension and run it using the interpreter.

This basic Pong game uses simple graphics commands to draw the game elements, and it handles keyboard input to move the player's paddle. The computer-controlled paddle automatically tracks the ball's movement. The game keeps score and declares a winner when a player reaches a score of 10. The game loop continuously updates the game logic, redraws the game screen, and checks for key presses to control the player's paddle.

SCREEN 12

COLOR 15, 0

CLS

' Set up the game variables

DIM SHARED AS INTEGER ballX, ballY, ballSize

DIM SHARED AS INTEGER playerX, playerY, playerWidth, playerHeight

DIM SHARED AS INTEGER computerX, computerY, computerWidth, computerHeight

DIM SHARED AS INTEGER ballDirX, ballDirY

DIM SHARED AS INTEGER playerScore, computerScore

DIM SHARED AS STRING gameOver

' Initialize the game variables

SUB InitializeGame()

ballSize = 10

playerWidth = 10

playerHeight = 60

computerWidth = 10

computerHeight = 60

ballX = 320

ballY = 240

playerX = 10

playerY = 240 - (playerHeight / 2)

computerX = 620

computerY = 240 - (computerHeight / 2)

ballDirX = -1

ballDirY = -1

playerScore = 0

computerScore = 0

gameOver = ""

END SUB

' Draw the game elements

SUB DrawGame()

' Draw the ball

CIRCLE (ballX, ballY), ballSize, 14

' Draw the player's paddle

LINE (playerX, playerY)-(playerX, playerY + playerHeight), 11

' Draw the computer's paddle

LINE (computerX, computerY)-(computerX, computerY + computerHeight), 12

' Display the scores

PRINT "Player: "; playerScore

PRINT "Computer: "; computerScore

' Display the game over message if the game is over

IF gameOver <> "" THEN

PRINT gameOver

PRINT "Press any key to play again"

END IF

END SUB

' Move the player's paddle

SUB MovePlayerPaddle()

IF INKEY$ = "w" THEN

playerY = playerY - 10

END IF

IF INKEY$ = "s" THEN

playerY = playerY + 10

END IF

END SUB

' Move the computer's paddle

SUB MoveComputerPaddle()

IF ballY < computerY + (computerHeight / 2) THEN

computerY = computerY - 5

ELSEIF ballY > computerY + (computerHeight / 2) THEN

computerY = computerY + 5

END IF

END SUB

' Update the game logic

SUB UpdateGame()

' Move the ball

ballX = ballX + ballDirX

ballY = ballY + ballDirY

' Check collision with the player's paddle

IF ballX <= playerX + playerWidth AND ballY >= playerY AND ballY <= playerY + playerHeight THEN

ballDirX = -ballDirX

END IF

' Check collision with the computer's paddle

IF ballX >= computerX AND ballY >= computerY AND ballY <= computerY + computerHeight THEN

ballDirX = -ballDirX

END IF

' Check collision with the top and bottom walls

IF ballY <= 0 OR ballY >= 480 THEN

ballDirY = -ballDirY

END IF

' Check if the ball goes out of bounds on the left or right

IF ballX < 0 THEN

computerScore = computerScore + 1

ballX = 320

ballY = 240

ballDirX = -ballDirX

ELSEIF ballX > 640 THEN

playerScore = playerScore + 1

ballX = 320

ballY = 240

ballDirX = -ballDirX

END IF

' Check if the game is over

IF playerScore >= 10 OR computerScore >= 10 THEN

gameOver = "Game Over"

END IF

END SUB

' Main game loop

DO

CLS

InitializeGame()

DO

DrawGame()

MovePlayerPaddle()

MoveComputerPaddle()

UpdateGame()

SLEEP 10

LOOP UNTIL gameOver <> "" AND INKEY$ <> ""

LOOP UNTIL INKEY$ = CHR$(27)

[reviewgazette]

Remembering Quick Basic 4.5 of yesteryear, maybe no longer be sold commercially or bundled with computers but there is another called QB64 a clone of Quick Basic, if you like me and love Quick Basic download it and start programming!!

[small-basic-programming]

For BASIC's 60th, three modern BASICs release new versions • The Register

Post 227: TheRegister.Com, For Basic's 60th, three modern BASICs release new versions, 2024.

[kennak]

Free Pascal と QB64 はどちらも維持され、比較的活発に開発が行われており、最新リリースは 2021 年に予定されています…しかし、最近ではほとんどの人が興味を持たない難解な言語を公開しているため、ほとんど無視されています。 「本物の」現代的なコンソール IDE には何が残されているのでしょうか? それでは、今日の現代 言語 最先端のものは、 Neovim 、 Doom Emacs 、さらには Helix のようです。 これらのエディタは非常に強力で、さまざまなプラグインのおかげで、合理的な IDE ��ようなエクスペリエンスを提供します。 とはいえ、私に言わせれば、これらは以前の Borland 製品が提供していたものと同じ種類のエクスペリエンスを提供するものではありません。インターフェイスはわかりにくく、多言語に対応しているため、ほとんどすべての機能で問題なく動作しますが、素晴らしいものではありません。何でも。 言うなれば「何でも屋、何の達人でもない」。 いずれにせよ、 microsoft/terminal#16440 の のようです 混乱した議論で私が観察した内容に基づくと、推奨される「シンプルな」TUI エディタは… GNU Nano … これはOK、動作しますが、第一に、これは IDE ではありません。第二に、私にはこれが WordStar のように見えます。 ええ、それが WordStar ではないことはわかっています。WordStar が必要な場合、最も近いものは Joe です。しかし、 Nano の外観は 、CP/M の時代にワード プロセッサを使った最初の経験を思い出させます。 ここで見てください:

30 年前にあった IDE...そして失われてしまった

[georgemcginn]

Moon Lander Simulator: A Text-Based Ode to Apollo-Era Engineering

Platforms: Linux, Windows, macOS (Terminal/CLI) License: Creative Commons Attribution-NonCommercial-ShareAlike 4.0 (CC BY-NC-SA 4.0) Languages: C, Python, Rust, BASIC (QB64, FreeBASIC) Author: George McGinn GitHub: https://github.com/GeorgeMcGinn/MoonLander (Source Code & Binaries) On July 20, 1969, Neil Armstrong’s heartbeat doubled as he manually guided Apollo 11’s Lunar Module to a safe…

[mbergmann-sh]

QuickBasic für Linux - QB64 unter Debian Linux Bookworm installieren

[jezuk]

BASICally still alive: Classic language celebrates 60 years with new code and old quirks • The Register

[dimalink]

Tv in constellation

Tele universe - it is true space. Especially, when you moving with using of TV translation with channel or with usage of VHS cassette in a new world. In a far-far galaxy. Or in world of Star Gate. Start Trek. Star Wars. Action movie. Action. All of these - it is so entertaining, and so pulling into. And it drags you in! World of television – universe in a box. High technology.

And space. Unlimited space with millions of stars at the sky. Around stars, planets are rotating. And, there are, even, more of them, than stars. More than stars. Nebulas. And galaxies. All of these are unlimited.

Such a feeling of freedom and flight. Television – universe. Magical. Even mystical theme. Modern theme of a modern man. To watch tv. Especially, if it goes there interesting movie or a tv series.

Tv set can be big or not big. Mainly, medium format is rather enough. And, of course, all of these, about a retro theme. TV level of 90s. Or 2000s. Crt tv. Those tv, that you can use to play with cable with three colors in Nes or Sega. And, maybe, even, in first PlayStation.

Whole world – inside television. Mystery. Mystery, which you can look at and, maybe, even, to take a part in format of videogame.

Music theme – it, also, sounds like something mysterious and dragging in. Into the space. Into the tv watching period. Theme is more like stylish and cool 90s or 2000s. When you sit before Tv in the evening. And, try to find something interesting. And, maybe, you can play a console. Music is electronic. Synthesizers. Retrowave. Synthwave.

Retro nostalgia moment. Dedicated to tv. Age of 90s and 2000s. Time, when you spent before tv. While watching some channels and game consoles to play. It is so interesting to turn on television and watch for yourself - does it have for today something interesting! So, this way, one day, I see for the first time Star Gate! They were going by Tv! Or, tv series, or sci fi. Or X-files.

Such an intro. Visual theme. About tv in space. It flies in space. With a random way. And, this is a small program. Program intro. Just, start and watch. At the visual side. With the music. Music is synthesized. Tv is flying in space. Mystery of 20 century. Tv mystery. And space. Tv space. Also, you can see a popular musician by tv. To see cool music clip. Why not – it is a virtual universe. Universe inside universe. Such recursion.  As, nesting doll. One inside another one.

Visual fantasy about this theme. A little of mystical. Stars and space. With television, which, simply, is moving there, flying. A little moving, twitching. Stars, stars. To watch a space image – it is, also, standalone thing. And, what is it there amongst the stars? There, it is a tv is flying! So this is a joke answer. It is, simply, intro.  It is written with programming language Qb64. In terms of practice and search for a new themes. For point of interest. It is, always, interesting to do something, to try something.  Especially, if it goes good. If It turns out. Such idea for simple little programs intros. As intro for some cinema company before movies itself. But, with a form of a small program. With Basic.

It is so nice, in the little evening, to launch little program and to watch, simply, sit and watch! Relax, such modern meditation! Before your eyes – Tv in constellation! In its own constellation. Tele universe. Real one universe. TV moment!

Dima Link is making retro videogames, apps, a little of music, write stories, and some retro more.

WEBSITE: http://www.dimalink.tv-games.ru/home_eng.html ITCHIO: https://dimalink.itch.io/

TUMBLR: https://dimalink.tumblr.com/ BLOGGER: https://dimalinkeng.blogspot.com/ MASTODON: https://mastodon.social/@DimaLink

[mistfunk]

Mistigram: @grymmjack 's monstrous #ANSIart screen seen here, long in the making, promotes a #QB64 adaptation of TSR's #Dungeon board game that he's been working on. This piece was included in the spooky new MIST1023 artpack collection.

[magnetictapedatastorage]

i always interpreted "LPRINT" as "literally print"

[basic-retro-programming]

QBasic Tutorial #48 - Bouncing Ball Animation ...

Post #304: YouTube, School Freeware, QBasic Tutorial, #48 Bouncing Ball Animation in QB64, 2024.

[loomworld]

me trying to predict what language we're gna learn in the next school year ;-----; hopefully not anything becoz I can't handle learning another language!! died and came to life when I was learning c++, cried while learning html and almost threw my laptop learning python! we learnt abt qb64 like 2 years ago and ofc I had to learn every single thing about it