| Welcome, Guest |
You have to register before you can post on our site.
|
| Online Users |
There are currently 46 online users.
» 0 Member(s) | 46 Guest(s)
|
| Latest Threads |
Cursor avec typewriter ef...
Forum: QB Discussion & Programming Help
Last Post: jofers_
01-21-2021, 05:20 PM
» Replies: 1
» Views: 101
|
Oldies still around?
Forum: General/Misc
Last Post: Pete
10-21-2020, 11:20 AM
» Replies: 102
» Views: 68,393
|
Can I use labels in SUBs
Forum: QB Discussion & Programming Help
Last Post: jofers_
08-11-2020, 01:12 PM
» Replies: 1
» Views: 361
|
Old forum still viewable
Forum: Site/Forum Issues
Last Post: Kitto
07-06-2020, 03:23 PM
» Replies: 5
» Views: 14,537
|
Fixing QBOHO
Forum: Site/Forum Issues
Last Post: wildcard
03-06-2020, 02:49 PM
» Replies: 1
» Views: 480
|
Holy **** it's been 8 f--...
Forum: General/Misc
Last Post: Deleter
12-15-2019, 04:13 AM
» Replies: 14
» Views: 11,113
|
Just updated Pete's QB Si...
Forum: General/Misc
Last Post: wildcard
10-15-2018, 02:00 PM
» Replies: 3
» Views: 2,026
|
"A Love Letter To FreeBAS...
Forum: QB/FB News
Last Post: wildcard
10-12-2018, 02:29 PM
» Replies: 0
» Views: 4,213
|
V Planet! archive now ava...
Forum: QB/FB News
Last Post: wildcard
10-12-2018, 02:18 PM
» Replies: 0
» Views: 2,829
|
Anyone have a copy of QBR...
Forum: General/Misc
Last Post: Pete
10-12-2018, 04:19 AM
» Replies: 16
» Views: 10,862
|
|
|
Cursor avec typewriter effect |
|
Posted by: vegetalain - 12-08-2020, 12:10 AM - Forum: QB Discussion & Programming Help
- Replies (1)
|
 |
Hello world, hm, my name is Alain, i'm French (sorry if my english can be weird), so i would like to make the same display like this with a cursor :
![[Image: AncientHonorableHog-size_restricted.gif]](https://thumbs.gfycat.com/AncientHonorableHog-size_restricted.gif)
And i can do this "bas" file, now :
Code: _FULLSCREEN: SCREEN 9
DIM Text AS STRING
DIM Count AS INTEGER
DIM Start AS SINGLE
Text$ = "GREATINGS PROFESSOR FALKEN."
Curs$ = "Û"
COLOR 11, 0
CLS
gogo:
COLOR 11, 0
PRINT: PRINT
PRINT "";: INPUT "", A$
hop:
TIMER ON
FOR Count = 1 TO LEN(Text$)
Start = TIMER
COLOR 11, 0: PRINT MID$(Text$, Count, 1);
DO
LOOP UNTIL TIMER > Start + .01
NEXT Count
TIMER OFF
GOTO gogo
But, i don't know, how to diplay 'Curs$', after each letter of 'Text$', that the program display. And disappear at the end, to let the place for the cursor of the user...
Any idea to do that, please?
Thanks for your advice, and have a nice week 
Alain.
|
|
|
| Can I use labels in SUBs |
|
Posted by: jhesski - 06-04-2020, 10:05 PM - Forum: QB Discussion & Programming Help
- Replies (1)
|
|
I have recently returned to Qbasic after many years.
I never used SUBs before but I am attempting to learn and use them as I think they will make the code cleaner.
I moved some code from the main code to a SUB and it appears labels or line numbers are not allowed in a SUB?
I looked in the help and I don't see any place in the documentation that says this will not work.
Can someone explain if I need to do something different or why this would not work?
Code: SUB init
KEY 16, CHR$(0) + CHR$(1)
ON KEY(16) GOSUB foo
KEY(16) ON
foo:
print "you did it"
END SUB
I get an error of "Label not defined" when I try to run the code.
Thank you for your help.
|
|
|
|
| Fixing QBOHO |
|
Posted by: jofers_ - 03-05-2020, 09:15 AM - Forum: Site/Forum Issues
- Replies (1)
|
|
New forum looks nice! Um, anybody here though?
I was doing some nostalgia clicking, and I noticed QBOHO was in pretty bad shape:
http://www.qbasicnews.com/qboho/
I scraped that together years ago with a python script that parsed the rtf output of HELPMAKE.EXE and dumped it into a bunch of HTML files, which wildcard translated and uploaded. It used the IE-only "terminal" font, tables,   padding, and other horrors to replicate that loving "DOS" look, and it's all horribly broken now of course.
Nowadays browser support for Unicode, custom fonts, CSS, etc. is much better. Even the QuickHelp tooling is better. I found this C# tool which already converts quickhelp files to UTF-8 encoded HTML:
https://github.com/fancidev/DosHelp
So I wrote another Python script to reprocess that a bit further. I used one of the fonts from here:
https://int10h.org/oldschool-pc-fonts/fontlist/
And then packed everything into one CSS-only HTML page that uses anchor links to jump between topics, and the :target selector to show one topic at a time. Having only one page should make it a little easier to embed somewhere else. Sure, it's a 1.2MB but since it's all whitespace and English, that gzips down to 240kb. And the average webpage is 3MB so who cares?
Anyway, the result:
https://parkertomatoes.github.io/qboho/
https://github.com/parkertomatoes/parker...ster/qboho
Possible to get it updated here?
|
|
|
|
| Removed links to sites that are no longer active or QBasic related |
|
Posted by: wildcard - 09-03-2017, 12:14 AM - Forum: QB/FB News
- Replies (2)
|
 |
It's been a long while since the last update to the website but I've finally checked the links on the front page. It's unfortunate several high profile sites are no longer working or have been replaced with spam or unrelated content. If you notice anything wrong or looking strange on the website please leave a comment below or email me. Qbasic may be a little less popular than it used to be but I'm keen to keep this site running well even if it's a little quiet.
|
|
|
|
| Relsoft needs help... for real. |
|
Posted by: Dr_Davenstein - 03-20-2017, 12:44 AM - Forum: General/Misc
- Replies (1)
|
|
His wife has cervical cancer and he's being forced to sell his property to pay medical expenses. You guys know him and how good of a person he is. How many of us has he tutored for free? Let's show him how much we appreciate that. Not only that, but it's just love. I don't know about the rest of you guys, but I've gotten so close to him over the years, he's like my brother. Let's see how much we can help. Please contribute if you can. Don't feel bad if you can't.
https://www.gofundme.com/helping-relsoft-and-his-family
|
|
|
|
|
![[Image: DfGedDO.png]](https://i.imgur.com/DfGedDO.png)
![[Image: ED592TZ.png]](https://i.imgur.com/ED592TZ.png)
