bzoj1500维修序列（splay）

感觉已经是一个很好的模版了，手机上再理顺一下思路，明天写个思路清晰，代码清楚的

更新代码，感觉这次的代码真是决了，绝对优美通俗易懂的代码风格

不过代码长难免bug多，还是要练代码能力的

#include<cstdio>
#include<algorithm>
#include<cstring>
#include<cmath>
#include<iostream>
#define debug(x) cout<<#x<<"="<<x<<endl;
using namespace std;
const int inf=0x3f3f3f3f;
const int N=700100;

int s[N*4],top=0;//回收栈
int rt,fa[N],ch[N][2],qz[N],hz[N],mx[N],sum[N],size[N],set[N],rev[N],val[N];
int n,m,a[N],tot,pos,c;
inline int read()//读入优化
{
	char ch;int ans,f=1;
	while ((ch=getchar())<'0'||ch>'9') if (ch=='-') f=-1;
	ans=ch-'0';
	while ((ch=getchar())>='0'&&ch<='9') ans=ans*10+ch-'0';
	return ans*f;
}
void up(int x)//updata
{
	int l=ch[x][0],r=ch[x][1];
	size[x]=size[l]+size[r]+1;
	sum[x]=sum[l]+sum[r]+val[x];
	mx[x]=max(mx[l],mx[r]);
	mx[x]=max(mx[x],qz[r]+hz[l]+val[x]);<span style="font-family: Arial, Helvetica, sans-serif;">//保证子节点，不会出现空子序列，在up时进而保证序列不为空，如果可以有空子序列时，改一下边界就好</span>
	qz[x]=max(qz[l],sum[l]+val[x]+qz[r]);
	hz[x]=max(hz[r],sum[r]+val[x]+hz[l]);
}
void down(int x)//downdata
{
	if (set[x])
	{
		set[x]=rev[x]=0;
		for (int l=0;l<=1;l++)
		if (ch[x][l])//保证孩子不为空
		{
			set[ch[x][l]]=1;
			sum[ch[x][l]]=size[ch[x][l]]*val[x];
			val[ch[x][l]]=val[x];
			if (val[x]>0) mx[ch[x][l]]=qz[ch[x][l]]=hz[ch[x][l]]=sum[ch[x][l]];
			else qz[ch[x][l]]=hz[ch[x][l]]=0,mx[ch[x][l]]=val[x];//保证子节点，不会出现空子序列
		}
	}
	if (rev[x])
	{
		int l=ch[x][0],r=ch[x][1];
		rev[x]=0;rev[l]^=1;rev[r]^=1;
		swap(ch[x][0],ch[x][1]);
		swap(qz[l],hz[l]);
		swap(qz[r],hz[r]);
	}
}
void rotate(int x)
{
	int y=fa[x],z=fa[y],l,r;
	if (ch[y][0]==x) l=0;else l=1;r=l^1;
	if (z)
	if (ch[z][0]==y) ch[z][0]=x;else ch[z][1]=x;
	fa[x]=z;fa[y]=x;fa[ch[x][r]]=y;
	ch[y][l]=ch[x][r];ch[x][r]=y;
	up(y);//记住要up
}
void splay(int x,int k)
{
	int y,z;
	while (fa[x]!=k)
	{
		y=fa[x],z=fa[y];
		if (z!=k)
		if (ch[z][0]==y^ch[y][0]==x) rotate(x);else rotate(y);
		rotate(x); 
	}
	if (k==0) rt=x;
	up(x);//up up up
}
void clear(int x)
{
	fa[x]=ch[x][0]=ch[x][1]=size[x]=set[x]=val[x]=rev[x]=mx[x]=qz[x]=hz[x]=sum[x]=0;
}
int build(int l,int r,int f)//个人独有的build方式
{
	if (l>r) return 0;//注意，下面是有l，mid-1和mid+1，r的，所以当l+1==r，即mid==l，mid-1<l可能，r会小于l，注意特判
	int mid=(l+r)>>1,id;
	if (top>0) id=s[top--];else id=++tot;//给它一个下标地址
	val[id]=a[mid]; 
	fa[id]=f;
	if (l==r)
	{
		sum[id]=mx[id]=val[id];
		size[id]=1;
		if (val[id]>0) qz[id]=hz[id]=val[id];
		else qz[id]=hz[id]=0;//<span style="font-family: Arial, Helvetica, sans-serif;">如果可以有空子序列时，改一下这里的边界就好，就是如果小于零，mx和其他一样不选，保证=0</span>
		return id;
	}
	ch[id][0]=build(l,mid-1,id);
	ch[id][1]=build(mid+1,r,id);
	up(id);//
	return id;
}
int find(int i,int k)
{
	if (i==0) return 0;
	down(i);//时刻反问自己，在写一个东西的时候，用不用updata 或者 downdata
	if (size[ch[i][0]]+1==k) return i;
	if (size[ch[i][0]]>=k) return find(ch[i][0],k);
	else return find(ch[i][1],k-size[ch[i][0]]-1); 
}
void insert()
{
	pos=read();n=read();
	for (int i=1;i<=n;i++) a[i]=read();
	int k=find(rt,pos+1);splay(k,0);
	int h=find(rt,pos+2);splay(h,k);
	ch[h][0]=build(1,n,h);
	up(h);up(k);
}
void dell(int x)
{
	if (!x) return;
	dell(ch[x][0]);dell(ch[x][1]);
	s[++top]=x;clear(x);//回收，否则MLE
}
void del()
{
	pos=read();n=read();
	int k=find(rt,pos);splay(k,0);
	int h=find(rt,pos+n+1);splay(h,k);
	dell(ch[h][0]);
	ch[h][0]=0;
	up(h);up(k);//remmember updata and updata
}
void sett()
{
	pos=read();n=read();c=read();
	int k=find(rt,pos);splay(k,0);
	int h=find(rt,pos+n+1);splay(h,k);
	int x=ch[h][0];
	set[x]=1;sum[x]=size[x]*c;//打标记后，更新信息
	val[x]=c;
	if (c>0) qz[x]=hz[x]=mx[x]=sum[x];
	else qz[x]=hz[x]=0,mx[x]=c;
	up(h);up(k);
}
void rever()
{
	pos=read();n=read();
	int k=find(rt,pos);splay(k,0);
	int h=find(rt,pos+n+1);splay(h,k);
	rev[ch[h][0]]^=1;
	swap(hz[ch[h][0]],qz[ch[h][0]]);//打标记后要更新信息
	up(h);up(k);//只要有任何修改，就要反问自己需不需要up，更新
}
void summ()
{
	pos=read();n=read();
	int k=find(rt,pos);splay(k,0);
	int h=find(rt,pos+n+1);splay(h,k);
	printf("%d\n",sum[ch[h][0]]);
}
int main()
{
	n=read();m=read();
	mx[0]=a[1]=a[n+2]=-inf;
	for (int i=1;i<=n;i++) a[i+1]=read();
	rt=build(1,n+2,0);
	while (m--)
	{
		char c[20];
		scanf("%s",c);
		if (c[0]=='I') insert();
		if (c[0]=='D') del();
		if (c[0]=='M'&&c[2]=='K') sett();
		if (c[0]=='R') rever();
		if (c[0]=='G') summ();
		if (c[0]=='M'&&c[2]=='X') printf("%d\n",mx[rt]); 
	}
	return 0;
}