;-------------
;Greed Check
--------------------------------
;The Following a text file that checks greed level
=======================================================================

IF T8, @normalcamp
GOTO @begincompare
END

@begincompare
COMPARE #<greed>, 0
IF= @ok
IF> @checkgreed2
END

@checkgreed2
COMPARE #<greed>, 1
IF= @ok
IF> @checkgreed3
END

@checkgreed3
COMPARE #<greed>, 3
IF= @turn
IF> @checkgreed4
END

@checkgreed4
COMPARE #<greed>, 5
IF= @gturn
IF> @checkgreed5

@checkgreed5
COMPARE #<greed>, 9
IF= @eturn
IF> @checkgreed6
END

@checkgreed6
COMPARE #<greed>, 10
IF= @t1
IF> @t1
END

@ok
N: Your greed is still at an ok level...
END

@turn
N: Settle your greed down, your becoming slightly corrupt
END

@gturn
N: Settle your greed down, your becoming more corrupt
END

@eturn
N: Settle your greed down, your becoming intensly corrupt
END

@t1
COMPARE #<num.hostClass>, 1
IF= @change1
IF> @compare2
END
@compare2
COMPARE #<num.HostClass>, 2
IF= @change2
IF> @compare3
END
@compare3
COMPARE #<num.HostClass>, 3
IF= @change3
IF> @unknown
END

@change1
N: You have become to greedy, you will become evil
SET num.HostClass, 4
GIVE T8
END

@change2
N: You have become to greedy, you will become evil
SET num.HostClass, 5
GIVE T8
END

@change3
N: You have become to greedy, you will become evil
SET num.HostClass, 6
GIVE T8
END