东东的高速之旅 （线段树维护区间最小值）（模拟赛）

东东的高速之旅(highway.pas/.c/.cpp)
题目描述
一天东东爸 带东东回老家，开车行驶在宽阔的高速公路上。东东思维本来就发散，让他无聊的坐几个小时他一定会无聊的。所以东东爸 就给他准备一道有关高速公路的问题，让他在无聊的旅途中平添些乐趣。
题目是这样的：行驶在高速上的车辆会对高速造成一定的损伤。假设一条高速公路被收费站分成了若干段，整条高速公路有一个耐久度W。如果一辆汽车从s到t，s到t之间的高速公路的耐久度就会减少d。一旦某段公路的耐久度小于或等于0，这段公路就会永久性地毁坏，任何汽车也就无法通过已经毁坏的地方。
有一种维护车从s到t，可以将途中高速公路的耐久度增加r，并且不会造成公路耐久度的降低。虽然有维护车的存在，但是已经毁坏的某段路仍然无法修复。
东东的任务就是统计一下一共有多少辆汽车可以成功通行。
东东拿到题目，异常兴奋，争取在下高速的时候得到答案。但是题目真的太难了，快下高速了，东东还是没有得到结果，急的满头大汗，就给你打了电话，你能帮东东得到正确的结果么？
输入格式
第一行是三个正整数N、M和W。表示高速公路被分成了N段，有M辆车依次通过，整段高速公路的初始的耐久度为W。
以下M行每行描述一辆车，格式如下：
1 s t d：一辆汽车准备通过区间[s,t]。如果区间[s,t]里面有任何一个地方损毁了，这辆汽车就会取消整个通行计划；否则这辆汽车就可以成功通过区间[s,t]，并且使这个区间的耐久度减少d。即使通过之后会把某些地方毁坏了也是能够通过的。
2 s t r：一辆维修车通过区间[s,t]，为这段公路的耐久度增加r。如果区间[s,t]里面有任何一个地方损毁了，这辆维修车也会取消整个通行计划。
其中对于所有的区间[s,t]：表示从第s段的开始，到达第t段的结尾。
输出格式
输出一个数，表示有多少汽车可以成功通行。
样例输入
3 4 2
2 1 3 3
1 1 2 3
1 2 3 2
1 1 3 1

样例输出
3
数据范围与约定
对于30%的数据 N,M <= 100
对于50%的数据 N,M <= 1000
对于100%的数据 N,M<= 100000
1≤W≤1000，1≤s≤t≤N，1≤d≤1000，1≤r≤1000

本题用lazy标记的线段树去维护数据，即可。需要注意的是维护车辆也是汽车，也要统计到答案中。

program mys;

type
ab=record
l,r,w,c:longint;
end;
var n,m,e,z,s,t,p,i,tot,ans,sum:longint;
f:array[0..1000000]of ab;

procedure built(x,y,i:longint);
var mid:longint;
begin
f[i].l:=x;
f[i].r:=y;
if x=y then
<