prog8/examples/test.p8

%import textio

main {

    sub start() {

        ubyte xx = 1
        ubyte yy = 2
        byte b1
        byte b2

;; TODO add these constant folders:
;; (X - C1) <plusmin> (Y - C2)  =>  (X <plusmin> Y) - (C1 <plusmin> C2)
;; (X - C1) - (Y - C2)  =>  (X - Y) - (C1 - C2)
;


        ; result should be:  29  42  40  87  75  35

        xx=6
        yy=8
        yy = (xx+5)+(yy+10)
        txt.print_ub(yy)        ; 29
        txt.nl()

        xx=6
        yy=8
        yy = (xx*3)+(yy*3)
        txt.print_ub(yy)        ; 42
        txt.nl()

        xx=13
        yy=5
        yy = (xx*5)-(yy*5)
        txt.print_ub(yy)        ; 40
        txt.nl()

        b1=100
        b2=8
        b2 = (b1+5)-(b2+10)
        txt.print_b(b2)        ; 87
        txt.nl()

        b1=50
        b2=40
        b2 = (b1-5)+(b2-10)
        txt.print_b(b2)        ; 75
        txt.nl()

        b1=50
        b2=20
        b2 = (b1-5)-(b2-10)
        txt.print_b(b2)        ; 35
        txt.nl()

        repeat {
        }
    }
}