Show ASCII table: Difference between revisions
Content added Content deleted
| Line 23: | Line 23: | ||
x = 150+m*60 |
x = 150+m*60 |
||
y = 30 + n*30 |
y = 30 + n*30 |
||
ind = string((m-1)*16+n+31) |
|||
setgeometry(x,y,30,30) |
setgeometry(x,y,30,30) |
||
settext( |
settext(ind) |
||
} |
} |
||
next |
next |
||
Revision as of 05:31, 9 August 2018
Show ASCII table is a draft programming task. It is not yet considered ready to be promoted as a complete task, for reasons that should be found in its talk page.
Show Ascii table from value 32 to 127 in table format.
Ring
Show ASCII table is a draft programming task. It is not yet considered ready to be promoted as a complete task, for reasons that should be found in its talk page.
<lang ring>
- Project : Show Ascii table
load "guilib.ring" load "stdlib.ring"
paint = null decarr = newlist(16,6) ascarr = newlist(16,6)
new qapp
{
win1 = new qwidget() {
setwindowtitle("Show Ascii table")
setgeometry(100,100,800,600)
for n = 1 to 16
for m = 1 to 6
decarr[n][m] = new qpushbutton(win1) {
x = 150+m*60
y = 30 + n*30
ind = string((m-1)*16+n+31)
setgeometry(x,y,30,30)
settext(ind)
}
next
next
for n = 1 to 16
for m = 1 to 6
ascarr[n][m] = new qpushbutton(win1) {
x = 180+m*60
y = 30 + n*30
ind = (m-1)*16+n+31
setgeometry(x,y,30,30)
if ind = 32
settext("Spc")
loop
ok
if ind = 127
settext("Del")
loop
ok
settext(char(ind))
}
next
next
show()
}
exec()
}
</lang> Output: