1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-07-03 13:31:23 +00:00

Add libglu1-mesa-dev installation

This commit is contained in:
Luke Ceddia 2019-12-17 23:18:36 +11:00
parent 58b82dff13
commit 4223797ad7
2 changed files with 2 additions and 107 deletions

View file

@ -8,12 +8,6 @@ matrix:
compiler: clang
- os: linux
compiler: gcc
notifications:
irc:
channels: chat.freenode.net#qb64
skip_join: true
template:
- 'Autobuild of branch %{branch}: %{message}'
addons:
ssh_known_hosts: qb64.org
apt:
@ -34,3 +28,5 @@ deploy:
- development
- master
before_install:
- sudo apt-get update
- sudo apt-get install -y libglu1-mesa-dev

View file

@ -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