// ESEMPIO DI ORGANIZZAZIONE DI CODICE MAL
// I BLOCCHI DO-WHILE
//
// X = Y;
// DO
//      Y = Y + 1
//      Y = Y / 2
//      X = X - 1
// WHILE (X > 0)
// Z = X + Y
// 
// dove H=X, TOS=Y, SP=Z
//
//

.label inizio 0x00
.default goto errore
        
inizio       H = TOS
DO           TOS = TOS + 1
             TOS = TOS >> 1
             CPP = H
             H = CPP - 1
             Z = H; if (Z) goto ENDWHILE; else goto DO
ENDWHILE     SP = H + TOS
FINE         goto FINE
errore       goto errore