Comparing Dir4Angle to Dir4ToAngle, 1: ZASM Output Dir4Angle

import "std.zh"

//Returns angle of the given direction.
int Dir4Angle(int dir){
    dir &=7;
    if (dir==DIR_UP) return 90;
    if (dir==DIR_DOWN) return 270;
    if (dir==DIR_LEFT) return 180;
    if (dir==DIR_RIGHT) return 0;
    return -1;
}
ffc script f{
    void run(){
        int x = Dir4Angle(DIR_LEFT);
    }
}

f
 SETV d2,0
 PUSHR d2
 PUSHR d2
 SETR d3,REFFFC
 PUSHR d3
 SETR d4,SP
 PUSHR d4
 SETV d2,13
 PUSHR d2
 SETV d2,2
 PUSHR d2
 GOTO 21
 POP d4
 SETR d6,d4
 ADDV d6,1
 STOREI d2,d6
 SETV d3,0
 POP d3
 POP d3
 QUIT
 SETV d2,0
 SETR d4,SP
 SETR d6,d4
 ADDV d6,0
 LOADI d2,d6
 PUSHR d2
 SETV d2,7
 POP d3
 ANDR d2,d3
 SETR d6,d4
 ADDV d6,0
 STOREI d2,d6
 SETR d6,d4
 ADDV d6,0
 LOADI d2,d6
 PUSHR d2
 SETV d2,0
 POP d3
 COMPARER d2,d3
 SETTRUE d2
 COMPAREV d2,0
 GOTOTRUE 45
 SETV d2,90
 GOTO 87
 SETV d2,0
 SETR d6,d4
 ADDV d6,0
 LOADI d2,d6
 PUSHR d2
 SETV d2,1
 POP d3
 COMPARER d2,d3
 SETTRUE d2
 COMPAREV d2,0
 GOTOTRUE 58
 SETV d2,270
 GOTO 87
 SETV d2,0
 SETR d6,d4
 ADDV d6,0
 LOADI d2,d6
 PUSHR d2
 SETV d2,2
 POP d3
 COMPARER d2,d3
 SETTRUE d2
 COMPAREV d2,0
 GOTOTRUE 71
 SETV d2,180
 GOTO 87
 SETV d2,0
 SETR d6,d4
 ADDV d6,0
 LOADI d2,d6
 PUSHR d2
 SETV d2,3
 POP d3
 COMPARER d2,d3
 SETTRUE d2
 COMPAREV d2,0
 GOTOTRUE 84
 SETV d2,0
 GOTO 87
 SETV d2,0
 SETV d2,-1
 GOTO 87
 SETV d3,0
 POP d3
 POP d3
 GOTOR d3