equal
deleted
inserted
replaced
921 end; |
921 end; |
922 end; |
922 end; |
923 |
923 |
924 procedure HideMission; |
924 procedure HideMission; |
925 begin |
925 begin |
926 missionTimer:= 0 |
926 missionTimer:= 0; |
|
927 if missionTex <> nil then FreeTexture(missionTex); |
927 end; |
928 end; |
928 |
929 |
929 procedure ShakeCamera(amount: LongWord); |
930 procedure ShakeCamera(amount: LongWord); |
930 begin |
931 begin |
931 amount:= max(1, amount); |
932 amount:= max(1, amount); |
955 FillChar(Captions, sizeof(Captions), 0) |
956 FillChar(Captions, sizeof(Captions), 0) |
956 end; |
957 end; |
957 |
958 |
958 procedure freeModule; |
959 procedure freeModule; |
959 begin |
960 begin |
960 if missionTex <> nil then FreeTexture(missionTex); |
|
961 end; |
961 end; |
962 |
962 |
963 end. |
963 end. |