mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-07-09 14:15:12 +00:00
Add libglu1-mesa-dev installation
This commit is contained in:
parent
58b82dff13
commit
4223797ad7
|
@ -8,12 +8,6 @@ matrix:
|
||||||
compiler: clang
|
compiler: clang
|
||||||
- os: linux
|
- os: linux
|
||||||
compiler: gcc
|
compiler: gcc
|
||||||
notifications:
|
|
||||||
irc:
|
|
||||||
channels: chat.freenode.net#qb64
|
|
||||||
skip_join: true
|
|
||||||
template:
|
|
||||||
- 'Autobuild of branch %{branch}: %{message}'
|
|
||||||
addons:
|
addons:
|
||||||
ssh_known_hosts: qb64.org
|
ssh_known_hosts: qb64.org
|
||||||
apt:
|
apt:
|
||||||
|
@ -34,3 +28,5 @@ deploy:
|
||||||
- development
|
- development
|
||||||
- master
|
- master
|
||||||
before_install:
|
before_install:
|
||||||
|
- sudo apt-get update
|
||||||
|
- sudo apt-get install -y libglu1-mesa-dev
|
||||||
|
|
|
@ -1,101 +0,0 @@
|
||||||
$CONSOLE:ONLY
|
|
||||||
_DEST _CONSOLE: _SOURCE _CONSOLE
|
|
||||||
|
|
||||||
COLOR 15
|
|
||||||
PRINT "Welcome to a demostration of the Windows Console System for QB64,"
|
|
||||||
PRINT "as overhauled by Steve!"
|
|
||||||
PRINT
|
|
||||||
PRINT "First, allow me to illustrate two newly implemented commands: SLEEP and CLS"
|
|
||||||
Pause
|
|
||||||
CLS
|
|
||||||
PRINT "And now, I'll illustrate how to change colors in the console:"
|
|
||||||
FOR i = 0 TO 15
|
|
||||||
COLOR i, 15 - i
|
|
||||||
PRINT "COLORS:"; i; "ON"; 15 - i
|
|
||||||
NEXT
|
|
||||||
PRINT
|
|
||||||
Pause
|
|
||||||
CLS
|
|
||||||
PRINT "And now, we're going to have fun with the console size."
|
|
||||||
PRINT "Our original screen should be set at 80x25 for default."
|
|
||||||
PRINT "Press <ANY KEY> when ready to change modes."
|
|
||||||
Pause
|
|
||||||
WIDTH 120, 50
|
|
||||||
PRINT
|
|
||||||
PRINT "Here we're set at 120x50."
|
|
||||||
Pause
|
|
||||||
WIDTH 120, 50, 120, 50
|
|
||||||
PRINT
|
|
||||||
PRINT "And here we no longer have a scroll buffer; it's also 120x50."
|
|
||||||
PRINT "Notice the vertical scroll bar is gone?"
|
|
||||||
Pause
|
|
||||||
WIDTH 100, 33, 300, 150
|
|
||||||
PRINT "And here we now have both a vertical and a hortizontal scroll bar."
|
|
||||||
FOR i = 1 TO 50
|
|
||||||
PRINT "See? ";
|
|
||||||
_LIMIT 10
|
|
||||||
NEXT
|
|
||||||
PRINT
|
|
||||||
PRINT "Be certain to scroll the bar so you can 'See' all the text."
|
|
||||||
PRINT
|
|
||||||
Pause
|
|
||||||
WIDTH 100, 33, 100, 33
|
|
||||||
CLS
|
|
||||||
PRINT "And now, prepare as I do something amazing!"
|
|
||||||
Pause
|
|
||||||
_CONSOLEFONT "Courier New", 16
|
|
||||||
PRINT "TaDa!! Your font is now size 16!"
|
|
||||||
Pause
|
|
||||||
_CONSOLEFONT "Courier New", 24
|
|
||||||
PRINT "And just in case yours was already size 16, it's now size 24!"
|
|
||||||
Pause
|
|
||||||
_CONSOLEFONT "Courier New", 16
|
|
||||||
CLS
|
|
||||||
PRINT "And now, let's take a look at... MOUSE SUPPORT!!"
|
|
||||||
LOCATE 10, 10
|
|
||||||
PRINT "<<CLICK HERE TO CONTINUE>>"
|
|
||||||
DO
|
|
||||||
x = _CONSOLEINPUT
|
|
||||||
LOCATE 12, 2: PRINT _MOUSEX, _MOUSEY, _MOUSEBUTTON(1)
|
|
||||||
IF _MOUSEX >= 10 AND _MOUSEX <= 38 AND _MOUSEY = 10 AND _MOUSEBUTTON(1) THEN EXIT DO
|
|
||||||
LOOP
|
|
||||||
PRINT
|
|
||||||
PRINT
|
|
||||||
PRINT "WAAAAAAIIIIIIT A MOMENT!!"
|
|
||||||
PRINT
|
|
||||||
PRINT
|
|
||||||
FOR i = 1 TO 40
|
|
||||||
PRINT MID$("THE CONSOLE NOW HAS MOUSE SUPPORT?!!", i, 1);
|
|
||||||
_DELAY .1
|
|
||||||
NEXT
|
|
||||||
PRINT
|
|
||||||
PRINT
|
|
||||||
PRINT "WOOOOOOOO!!!!!"
|
|
||||||
PRINT
|
|
||||||
Pause
|
|
||||||
CLS
|
|
||||||
PRINT "And, of course, I can now work with LOCATE..."
|
|
||||||
LOCATE 10, 10: PRINT "LOCATE 10,10"
|
|
||||||
LOCATE 20: PRINT "LOCATE 20"
|
|
||||||
LOCATE , 20: PRINT "LOCATE ,20"
|
|
||||||
Pause
|
|
||||||
CLS
|
|
||||||
PRINT "And, of course, I can now get back single character returns..."
|
|
||||||
PRINT "Press any key, and I'll give you the scan code for it. <ESC> quits the demo."
|
|
||||||
PRINT
|
|
||||||
PRINT
|
|
||||||
DO
|
|
||||||
x = _CONSOLEINPUT
|
|
||||||
IF x = 1 THEN 'don't update for mouse input
|
|
||||||
c = _CINP
|
|
||||||
PRINT c;
|
|
||||||
END IF
|
|
||||||
LOOP UNTIL c = 1
|
|
||||||
END
|
|
||||||
|
|
||||||
SUB Pause
|
|
||||||
PRINT
|
|
||||||
PRINT "Press <ANY KEY> to continue."
|
|
||||||
SLEEP
|
|
||||||
END SUB
|
|
||||||
|
|
Loading…
Reference in a new issue