1 fn clear-screen screen: (addr screen) {
 2   var y/eax: int <- copy 0
 3   {
 4     compare y, 0x300  # 768
 5     break-if->=
 6     var x/edx: int <- copy 0
 7     {
 8       compare x, 0x400  # 1024
 9       break-if->=
10       pixel 0, x, y, 0  # black
11       x <- increment
12       loop
13     }
14     y <- increment
15     loop
16   }
17 }