prog8/examples/test.p8

%import textio
%import floats
%zeropage basicsafe
%import test_stack

main {

    sub start() {

        byte ub1
        byte ub2
        byte bb1
        byte bb2
        uword uw1
        uword uw2
        word ww1
        word ww2

        uw1 = $1000
        uw2 = $1100
        if uw1<uw2
            txt.chrout('.')
        else
            txt.chrout('!')
        if uw1<=uw2
            txt.chrout('.')
        else
            txt.chrout('!')
        if uw1>uw2
            txt.chrout('!')
        else
            txt.chrout('.')

        if uw1>=uw2
            txt.chrout('!')
        else
            txt.chrout('.')
        if uw1==uw2
            txt.chrout('!')
        else
            txt.chrout('.')
        if uw1!=uw2
            txt.chrout('.')
        else
            txt.chrout('!')


        txt.chrout(' ')
        uw1 = $1000
        uw2 = $1000

        if uw1<uw2
            txt.chrout('!')
        else
            txt.chrout('.')
        if uw1<=uw2
            txt.chrout('.')
        else
            txt.chrout('!')
        if uw1>uw2
            txt.chrout('!')
        else
            txt.chrout('.')

        if uw1>=uw2
            txt.chrout('.')
        else
            txt.chrout('!')
        if uw1==uw2
            txt.chrout('.')
        else
            txt.chrout('!')
        if uw1!=uw2
            txt.chrout('!')
        else
            txt.chrout('.')

        test_stack.test()
        txt.chrout('\n')
    }
}
auto select correct library to import based on target, instead of having c64- and cx16- prefix variants some programs are now 100% source compatible between C64 and Cx16 targets! import libraries have been rena;med 2020-09-20 21:49:36 +00:00			`%import textio`
refactoring asmassignment code blocks into utility functions 2020-11-15 16:44:47 +00:00			`%import floats`
refactoring asmassignment code blocks into utility functions 2020-11-15 14:04:23 +00:00			`%zeropage basicsafe`
optimize for loops over non const range, without translateExpression() 2020-11-20 21:15:14 +00:00			`%import test_stack`
implemented remaining float operations 2020-08-27 17:47:50 +00:00
do..until condition can now refer to variables defined in the loop's inner scope. 2020-09-24 17:26:07 +00:00			`main {`
allow creating string arrays. Fixed array index scaling for word arrays. 2020-09-28 00:23:36 +00:00
textelite 2020-10-09 20:47:42 +00:00			`sub start() {`
fix missing float casts 2020-11-09 22:57:50 +00:00
byte comparison jumps now without translateExpression() 2020-11-21 22:28:51 +00:00			`byte ub1`
			`byte ub2`
			`byte bb1`
			`byte bb2`
			`uword uw1`
			`uword uw2`
			`word ww1`
			`word ww2`

word comparison jumps now without translateExpression() 2020-11-21 22:46:18 +00:00			`uw1 = $1000`
			`uw2 = $1100`
			`if uw1<uw2`
byte comparison jumps now without translateExpression() 2020-11-21 22:28:51 +00:00			`txt.chrout('.')`
			`else`
			`txt.chrout('!')`
word comparison jumps now without translateExpression() 2020-11-21 22:46:18 +00:00			`if uw1<=uw2`
byte comparison jumps now without translateExpression() 2020-11-21 22:28:51 +00:00			`txt.chrout('.')`
			`else`
			`txt.chrout('!')`
word comparison jumps now without translateExpression() 2020-11-21 22:46:18 +00:00			`if uw1>uw2`
byte comparison jumps now without translateExpression() 2020-11-21 22:28:51 +00:00			`txt.chrout('!')`
			`else`
			`txt.chrout('.')`
word comparison jumps now without translateExpression() 2020-11-21 22:46:18 +00:00
			`if uw1>=uw2`
			`txt.chrout('!')`
			`else`
			`txt.chrout('.')`
			`if uw1==uw2`
byte comparison jumps now without translateExpression() 2020-11-21 22:28:51 +00:00			`txt.chrout('!')`
			`else`
			`txt.chrout('.')`
word comparison jumps now without translateExpression() 2020-11-21 22:46:18 +00:00			`if uw1!=uw2`
			`txt.chrout('.')`
			`else`
			`txt.chrout('!')`


			`txt.chrout(' ')`
			`uw1 = $1000`
			`uw2 = $1000`

			`if uw1<uw2`
byte comparison jumps now without translateExpression() 2020-11-21 22:28:51 +00:00			`txt.chrout('!')`
			`else`
			`txt.chrout('.')`
word comparison jumps now without translateExpression() 2020-11-21 22:46:18 +00:00			`if uw1<=uw2`
byte comparison jumps now without translateExpression() 2020-11-21 22:28:51 +00:00			`txt.chrout('.')`
			`else`
			`txt.chrout('!')`
word comparison jumps now without translateExpression() 2020-11-21 22:46:18 +00:00			`if uw1>uw2`
			`txt.chrout('!')`
			`else`
			`txt.chrout('.')`

			`if uw1>=uw2`
			`txt.chrout('.')`
			`else`
			`txt.chrout('!')`
			`if uw1==uw2`
			`txt.chrout('.')`
			`else`
			`txt.chrout('!')`
			`if uw1!=uw2`
			`txt.chrout('!')`
			`else`
			`txt.chrout('.')`
optimize for loops over non const range, without translateExpression() 2020-11-20 21:15:14 +00:00
			`test_stack.test()`
			`txt.chrout('\n')`
version 4.2 2020-09-16 21:04:18 +00:00			`}`
implemented remaining float operations 2020-08-27 17:47:50 +00:00			`}`