The Ring programming language version 1.7 book - Part 13 of 196

Ring Documentation, Release 1.7
glLoadIdentity();
glTranslatef(0.0,0.0,-5.0);
glRotatef(xrot,1.0,0.0,0.0);
glRotatef(yrot,0.0,1.0,0.0);
glRotatef(zrot,0.0,0.0,1.0);
glBindTexture(GL_TEXTURE_2D, texture)
glBegin(GL_QUADS)
// Front Face
glTexCoord2f(0.0, 0.0) glVertex3f(-1.0, -1.0, 1.0)
glTexCoord2f(1.0, 0.0) glVertex3f( 1.0, -1.0, 1.0)
glTexCoord2f(1.0, 1.0) glVertex3f( 1.0, 1.0, 1.0)
glTexCoord2f(0.0, 1.0) glVertex3f(-1.0, 1.0, 1.0)
// Back Face
glTexCoord2f(1.0, 0.0) glVertex3f(-1.0, -1.0, -1.0)
glTexCoord2f(1.0, 1.0) glVertex3f(-1.0, 1.0, -1.0)
glTexCoord2f(0.0, 1.0) glVertex3f( 1.0, 1.0, -1.0)
glTexCoord2f(0.0, 0.0) glVertex3f( 1.0, -1.0, -1.0)
// Top Face
// Bottom Face
// Right face
// Left Face
glEnd()
xrot += 0.3
yrot += 0.2
zrot += 0.4
class GraphicsAppBase
display event_queue ev timeout
timer redraw = true
FPS = 60
SCREEN_W = 800
SCREEN_H = 600
KEY_UP = 1
6.19. What is new in Ring 1.5.1? 92

KEY_DOWN = 2
KEY_LEFT = 3
KEY_RIGHT = 4
Key = [false,false,false,false]
TITLE = "Graphics Application"
func start
SetUp()
loadResources()
eventsLoop()
destroy()
func setup
al_init()
al_init_image_addon()
al_set_new_display_flags(ALLEGRO_OPENGL)
display = al_create_display(SCREEN_W,SCREEN_H)
al_set_Window_title(display,TITLE)
al_clear_to_color(al_map_rgb(0,0,0))
event_queue = al_create_event_queue()
al_register_event_source(event_queue,
al_get_display_event_source(display))
ev = al_new_allegro_event()
timeout = al_new_allegro_timeout()
al_init_timeout(timeout, 0.06)
timer = al_create_timer(1.0 / FPS)
al_get_timer_event_source(timer))
al_start_timer(timer)
al_install_mouse()
al_get_mouse_event_source())
al_install_keyboard()
al_get_keyboard_event_source())
func eventsLoop
while true
al_wait_for_event_until(event_queue, ev, timeout)
switch al_get_allegro_event_type(ev)
on ALLEGRO_EVENT_DISPLAY_CLOSE
exit
on ALLEGRO_EVENT_TIMER
redraw = true
on ALLEGRO_EVENT_MOUSE_AXES
mouse_x = al_get_allegro_event_mouse_x(ev)
mouse_y = al_get_allegro_event_mouse_y(ev)
on ALLEGRO_EVENT_MOUSE_ENTER_DISPLAY
mouse_x = al_get_allegro_event_mouse_x(ev)
mouse_y = al_get_allegro_event_mouse_y(ev)
on ALLEGRO_EVENT_MOUSE_BUTTON_UP
exit
on ALLEGRO_EVENT_KEY_DOWN

switch al_get_allegro_event_keyboard_keycode(ev)
on ALLEGRO_KEY_UP
key[KEY_UP] = true
on ALLEGRO_KEY_DOWN
key[KEY_DOWN] = true
on ALLEGRO_KEY_LEFT
key[KEY_LEFT] = true
on ALLEGRO_KEY_RIGHT
key[KEY_RIGHT] = true
off
on ALLEGRO_EVENT_KEY_UP
switch al_get_allegro_event_keyboard_keycode(ev)
on ALLEGRO_KEY_UP
key[KEY_UP] = false
on ALLEGRO_KEY_DOWN
key[KEY_DOWN] = false
on ALLEGRO_KEY_LEFT
key[KEY_LEFT] = false
on ALLEGRO_KEY_RIGHT
key[KEY_RIGHT] = false
on ALLEGRO_KEY_ESCAPE
exit
off
off
if redraw and al_is_event_queue_empty(event_queue)
redraw = false
drawScene()
al_flip_display()
ok
callgc()
end
func destroy
destroyResources()
al_destroy_timer(timer)
al_destroy_allegro_event(ev)
al_destroy_allegro_timeout(timeout)
al_destroy_event_queue(event_queue)
al_destroy_display(display)
func loadresources
func drawScene
func destroyResources
Screen Shot:

6.20 What is new in Ring 1.5.2?
• Documentation - Chapter “Applications developed in little hours” is updated
• Ring Notepad - Display programs output in the output window on all platforms
• Form Designer - Help Menu - Open CHM/PDF files without displaying the console window
• Form Designer - Better response to Resize/Move Events when moving the Mouse quickly
• Form Designer - New/Open/Save As, will open the Controller class in Ring Notepad
• Form Designer - Added “Close Form” option to the file menu
• Ring Notepad - Run, will save the current file (Also the opened Form) automatically
• GetQuotesHistory Application - Updated to work on MacOS X and Qt 5.2
• Calculator Application - Updated to include more features!
• RingVM - Classification for Environment Errors (Check Chapter : Language Reference)
• RingQt - New methods added to QAllEvents for faster Events execution
• RingQt - Fusion Black Style - Better colors for disabled controls
• Scripts - For building Ring on Fedora Linux (Check Chapter : Building From Source Code)
Screen Shot:

• Form Designer : Close Action will notify Ring Notepad to be able to open the Form again
• Form Designer : Save Action will open the controller class in Ring Notepad
• Form Designer : Keep current control selected when selecting many controls using CTRL Key
• Form Designer : Nice form back color when used in Ring Notepad (Style: Modern Black)
• RingOpenSSL : Updated to support newer versions like OpenSSL 1.1
• Building Scripts : Updated to work on Fedora 26 (64bit)
• OpenGL : New Sample - Many Cubes (samples/3D/manycubes)
Screen Shot:

• RingQt : Add QDateTime Class
• RingQt : New methods added to QMenu and QCursor Classes
Example:
load "guilib.ring"
new qApp {
win = new qwidget() {
setwindowtitle("Context Menu")
resize(400,400)
myfilter = new qAllEvents(win) {
setContextmenuEvent("mymenu()")
}
installeventfilter(myfilter)
show()
}
exec()
}
func mymenu
new qMenu(win) {

oAction = new qAction(win) {
settext("new")
SetCLickevent("See :New")
}
addaction(oAction)
settext("open")
SetCLickevent("See :Open")
}
addaction(oAction)
settext("save")
SetCLickevent("See :Save")
}
addaction(oAction)
settext("close")
SetCLickevent("See :Close")
}
addaction(oAction)
oCursor = new qCursor()
exec(oCursor.pos())
}
• Compiler : Support using _ in numbers
Example:
x = 1_000_000
see type(x)+nl
see x+1+nl
Output:
NUMBER
100000001
• Compiler : Support using f after numbers
Example:
x = 19.99f
see type(x) + nl
Output:
NUMBER
• Google API Shortener Application
Screen Shots:

• TicTacToe 3D Game
Screen Shot:
• CalmoSoft Fifteen Puzzle Game 3D
• Ring Notepad - New Styles

• Ring Notepad - Better Toolbar Style
• Ring Notepad - View Modes
• Ring Notepad - QPlainTextEdit - don’t set back color for the scroll bars
• Ring Notepad - Style Fusion (White) - use Silver color for comments
• Ring Notepad - Tab and Shift-Tab - Indent multiple lines
• Form Designer - Better Toolbar Style
• Form Designer - Nice backcolor for Window Flags and Menubar Designer
• Form Designer - Default back color for controls
• RingQt - Added grab() and windowHandle() methods to QWidget class
• RingQt - Added new methods to QPixmap Class
• RingQt - Added Classes :-
– QScreen
– QWindow
– QGuiApplication
– QTextBrowser
• Code Generator for Extensions - Nonew Option - Support Parent Class
• Ring VM - Internal Implementation - Pass state to Strings and Lists objects
• Ring VM - Garbage Collector - Memory Pool for Small Objects
• Ring VM - Better code for Saving/Restoring the State

CHAPTER
SEVEN
WHAT IS NEW IN RING 1.4?
In this chapter we will learn about the changes and new features in Ring 1.4 release.
7.1 List of changes and new features
Ring 1.4 comes with many new features
• Change: Basic Extensions are separated from RingVM
• The Natural Library
• New Style is added to Ring Notepad
• RingREPL
• Convert between Numbers and Bytes
• Better StdLib
• Better WebLib
• Better RingQt
• Qt Class Convertor
7.2 Change: Basic Extensions are separated from RingVM
In Ring 1.4 the next libraries are separated from RingVM
• RingODBC
• RingMySQL
• RingSQLite
• RingOpenSSL
• RingInternet
To use these libraries, Use the Load command.
load "odbclib.ring"
# use ODBC Functions
load "mysqllib.ring"
# use MySQL Functions
101

The Ring programming language version 1.7 book - Part 13 of 196

More Related Content

What's hot (20)

Similar to The Ring programming language version 1.7 book - Part 13 of 196 (20)

More from Mahmoud Samir Fayed (20)

Recently uploaded (20)

The Ring programming language version 1.7 book - Part 13 of 196