Apple-2-SW/prog8
1
0
Fork 0
mirror of https://github.com/irmen/prog8.git synced 2024-11-26 11:49:22 +00:00
Code Issues Projects Releases Wiki Activity

code style

Browse Source
This commit is contained in:
Irmen de Jong 2020-10-08 21:47:07 +02:00
parent c282b4cb9f
commit 151dcfdef9
1 changed files with 6 additions and 31 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

37
examples/test.p8
View File

@ -5,39 +5,14 @@
main {
str planet_name = "12345678"
struct Planet {
ubyte x
ubyte y
str name
}
sub start() {
uword[] warray = [1,2,3,4,5]
uword sums
ubyte ii
uword ww
uword wptr = &warray
ubyte wmap
ii = 2
wmap = %11110000
wmap >>= 3
txt.print_ubbin(wmap, 1)
txt.chrout('\n')
wmap <<= 3
txt.print_ubbin(wmap, 1)
txt.chrout('\n')
wmap = 9
wmap *= 17
txt.print_ub(wmap)
txt.chrout('\n')
wmap /= 17
txt.print_ub(wmap)
txt.chrout('\n')
wmap = 211
wmap %= 40
txt.print_ub(wmap)
txt.chrout('\n')
txt.chrout('\n')
Planet p1
txt.print(planet_name)
txt.chrout('\n')