color-xwindfall的简单介绍
国外 好听的电音歌名有哪些啊……
color-X 3D-徐梦圆
Unity-TheFatRat
Monody-TheFatRat
Fade-Alan Walker
Sunburst-Tobu
Pacific Rim-Ramin Djawadi
Victory-Two Steps From Hell
Sky (Radio Edit)-Steerner / Martell
Lifeline-You Are Free
Soaring (Original Mix)-TomLeevis
PneumaticTokyo-EnV
Masked Heroes-Vexento
Leevis-Fri / TomLeevis
Windfall-TheFatRat
China-X-徐梦圆
介绍几首立体感很强的好听的歌曲!
楼主你好!!只选对的,不选多的,本人自己觉得最好听的歌,楼主一定要听听啊!(以下的超好听,推荐先听)
朴尚民-不要哭
受了点伤(英文)
.
最终幻想10主题曲-素敌だね(日文版)
sg wannabe-我的人
金钟国-如果我爱你
,
劲舞团-姐姐
今晚我感觉离你很近-仓木麻衣
far away from home
七公主-love song
黄牌-高耀太
飞翔-高耀太
为什么这样-乌龟
我爱摇滚-高耀太
唱啦啦啦-乌龟
花样-松隆子
我在那一角患过伤风
zone - despre tine
take play love
甜蜜的爱-七公主
飞机-乌龟
男人也没办法
劲舞团-question
小情歌-苏打绿
念奴娇-伊能静
老人与海-海鸣威
我们都是好孩子-王筝
My all -滨崎步
特别天使-高耀太
英雄-高耀太
起立-仓木麻衣
原地踏步-劲舞团
7公主-悲伤恋歌
结婚-朴慧京
As long as you love me-后街男孩
7 Days -Craig David
罪与罚-sg wanna be
be what you wanna be
施展咒语-七公主
hey boy-徐智英
火花-高耀太
坚持-Us
倾我所有-(DONNA LEWIS)
Swan-(劲舞团)
莫失莫忘
upside
只恨我一个人
初春踏青(音乐)
(以上的超好听)
纯音乐:(超级好听)
紫日
Kiss The Rain
神秘园之歌
天空之城
再见警察
classic river
卡农
夏日香气
迷情仙境
Tears
dream catcher
被遗忘的天使
我在那一角落患过伤风
雨的印记
罗密欧与朱丽叶
寂寞之声
很流行的韩日歌曲
rain-sadtango
李孝利 TOC TOC TOC
李孝利 不要爱上他
所以
冰淇淋 MC梦
爱情过后 劲舞歌曲
30次左右
question ha,yoo sun
i believe 劲舞歌曲
坚持 us
never say goodbye
u superjunior
听我说 papaya
不能遗忘你
tonight,i feel close to you 仓木麻衣孙燕姿
我的人 sg wannabe
试着说 WaWa
2年零2月 fod
一个人/两个人/只有你 蔡妍
花样 松隆子
Come on/飞机 乌龟
relove 徐智英
英文歌:
I'm Gonna Getcha Good!--Shania Twain 一定要听这首哦
Never Had A Dream Come True--S Club 7 最近开始听这首歌的,太好听了
Any Man Of Mine--Shania Twain 还有这个
My name is --Emimem阿姆的经典之作
Happy Boys Girls---Aqua 他\她们的歌很活泼
Barbie Girl--Aqua
When You Say Nothing At All--Alison Krauss细心品味,我很喜欢这首歌的
Candy Shop--50 Cent 相信很多人听过吧
Back to you--Bryan Adams
The Power Of Love--Celine Dion
yellow--coldplay
I COULD BE THE ONE--Donna Lewis 声音很甜
Without Me--Eminem 又一首阿姆的经典之作
Don't Turn Off the Light--Enrique Iglesias
Any one Of Us--Gareth Gates 经典
American Idiot--Green Day 朋克乐,我很喜欢
Boulevard of Broken Dreams--Green Day
Moonlight Shadow --Groove Coverage
Yesterday Yes A Day--Jane Birkin
Because You Live--Jesse McCartney 人又帅歌又好
When You Believe--Mariah-Carey 很多地方介绍这首经典的
Nothing gonna chang my love for you
We Will Rock You--Queen 摇滚中的经典
better man--Robbie Williams
第一首:Stand
第二首:peerless
第三首:floorfiller
第四首:sosforlove(又名:爱情求救号)
第五首:hey-oh
第六首:OneForDaMoney
第七首:Ein Kleines Lied
第八首:la isla alizee
第九首:groove coverage
第十首:LET'S TALK ABOUT A MAN
第十一首:Human Sacrifice
第十二首:Wet Wet Wet
第十三首: 冰河时代2
第十四首:i saw you walkinag in the rain
第十五首:You`re Not Gonna Score
第十六首:Self Control Laura Bran
第十七首:doo be di boy
第十八首:dreams come true ``
第十九首:I Saw You Walking In The Rain ``
第二十首:sound of my dream ``
DJ舞曲:
TIME TO ROCK 舞曲大帝国
大爆炸
lalalove
Its Ok
i'm gonna getcha good ! 仙尼亚 唐恩
辛巴达
皇冠一刻钟
AU坚持
ARE YOU DJ
talala
walking in the sun
one for da money
move somethin
do somethin
Close to You Radio Jay Delano
DJ Let s Talk About A Man
La Club king
chipz in black
我敢保证一定很好听 ,只选好听的,不选多的,楼主听下吧。好听记得加分哦!谢谢 !
通达信捕捉牛股利器 条件选股公式
通达信选股公式:
条件选股公式源码:
年认同价:=MA(C,240);
价格中枢:=(SUM(年认同价,0)/(BARSSINCE(年认同价0)+239));
箱顶:=价格中枢*1.2;
箱底:=价格中枢*0.8;
毛利润率:=FINANCE(21)/FINANCE(20);
成长价值:=年认同价*(1+毛利润率);
收益价值:=年认同价+FINANCE(33);
回调认同:=EMA(EXPMA(C,20),13);
多头:=(回调认同REF(回调认同,1))AND(成长价值REF(成长价值,1))AND(收益价值REF(收益价值,1))AND(DYNAINFO(7)0);
回调条件:=COUNT(C回调认同,5)=3;
回调突破:=(REF(C,1)=REF(回调认同,1))AND(C回调认同)AND(回调条件)AND多头;
成长条件:=COUNT(C成长价值,5)=3;
成长突破:=(REF(C,1)=REF(成长价值,1))AND(C成长价值)AND(成长条件)AND多头;
收益条件:=COUNT(C收益价值,5)=3;
收益突破:=(REF(C,1)=REF(收益价值,1))AND(C收益价值)AND(收益条件)AND多头;
箱底条件:=COUNT(C箱底,5)=3;
箱底突破:=(REF(C,1)=REF(箱底,1))AND(C箱底)AND(箱底条件)AND多头;
价格条件:=COUNT(C价格中枢,5)=3;
价格突破:=(REF(C,1)=REF(价格中枢,1))AND(C价格中枢)AND(价格条件)AND多头;
箱顶条件:=COUNT(C箱顶,5)=3;
箱顶突破:=(REF(C,1)=REF(箱顶,1))AND(C箱顶)AND(箱顶条件)AND多头;
突破买点:(回调突破+成长突破+收益突破+箱底突破+价格突破+箱顶突破);
专买老鼠仓
{老鼠仓}
AA1:=AMOUNT/V;
BB1:=LAA1*0.9;
CC1:=(C-REF(C,1))/REF(C,1)*1001.2;
DD1:=LMA(C,5)*0.921;
EE1:=VMA(V,5)*1.5;
FF1:=BB1 AND CC1 AND DD1 AND EE1;
DRAWTEXT(FF1,(LOW* 0.97),'老鼠仓'),COLOR4080FF;
老鼠仓是个很不错的指标,信号发出一般都在一个波段的底部起涨之时。
根据本人的实践,使用指标时候要注意几点:
1 该指标可以添加到任何一个主图里面去,比如MA均线什么的。
2 出现信号当天买进股票,第二天收阳继续持股,直到出阴为止。
3 第二天出阴考虑卖出,非常适合短线操作!
老鼠仓(选股公式)
AA1:=AMOUNT/V;
BB1:=LAA1*0.9;
CC1:=(C-REF(C,1))/REF(C,1)*1001.2;
DD1:=LMA(C,5)*0.921;
EE1:=VMA(V,5)*1.5;
老鼠仓:BB1AND CC1 AND DD1 AND EE1;
理想选股(选股公式)
VAR1:=MA((LOW+HIGH+CLOSE)/3,5);
VAR2:=CLOSE=HHV(C,4) AND REF(C,1)=LLV(C,4);
VAR3:=REF(C,1)=LLV(C,4) AND C=REF(C,2) OR REF(C,2)=LLV(C,4) ANDREF(C,1)=REF(C,3) AND REF(C,2)REF(C,4) AND C=REF(C,1);
VAR4:=VAR1REF(VAR1,1) AND REF(VAR1,1)REF(VAR1,2);
VAR5:=LOWHHV(VAR1,13) AND HIGHHHV(VAR1,13) AND CLOSEREF(C,1) ANDCLOSEOPEN;
VAR6:=VAR5 AND COUNT(VAR4,2);
VAR7:=VAR6 AND NOT(REF(VAR6,1));
VAR8:=100*EMA(EMA(C-REF(C,1),6),6)/EMA(EMA(ABS(C-REF(C,1)),6),6);
VAR9:=EMA(MA(C,13),13);
VAR10:=FILTER((LLV(VAR8,2)=LLV(VAR8,7) AND COUNT(VAR80,2) ANDCROSS(VAR8,MA(VAR8,2)))=1,5);
VAR11:=SMA(EMA((C-REF(C,1))/REF(C,1),5)*100,3,1)*10;
VAR12:=FILTER(((CROSS(VAR11,0) OR CROSS(C,VAR9)) AND VAR10)=1,3);
VAR13:=MA(C,18)=REF(MA(C,18),3) AND CROSS(C,MA(C,18));
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
金叉:=CROSS(J,D);
死叉:=CROSS(D,J);
买1:=(VAR12OR VAR13) AND VAR10;
买2:=(VAR12OR VAR13) AND VAR3;
买3:=(VAR12OR VAR13) AND VAR2;
买4:=(VAR2AND VAR10) OR (VAR3 AND VAR10);
买5:=(金叉AND VAR3) OR (金叉 AND VAR2) OR (金叉 AND VAR10);
ST:=EXIST(C/REF(C,1)1.06,50);
输出:=(买1OR 买2OR 买3OR 买4OR 买5OR VAR7) AND ST;
MA5:=MA(C,5),COLORWHITE;
X:=(3*C+L+O+H)/6;
多空线:=(20*X+19*REF(X,1)+18*REF(X,2)+17*REF(X,3)+16*REF(X,4)+15*REF(X,5)+14*REF(X,6)
+13*REF(X,7)+12*REF(X,8)+11*REF(X,9)+10*REF(X,10)+9*REF(X,11)+8*REF(X,12)
+7*REF(X,13)+6*REF(X,14)+5*REF(X,15)+4*REF(X,16)+3*REF(X,17)+2*REF(X,18)+
REF(X,20))/210,COLORFF00FF,LINETHICK1;
AB:=DRAWLINE(HIGH=HHV(HIGH,10),HIGH,LOW=LLV(LOW,3),HHV(HIGH,3),1),COLORYELLOW;
CROSS(MA5,多空线) and CROSS(C,AB) and 输出 ;
点石成金(选股公式)
KS13:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*(-100);
RSV:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;
FASTK:=SMA(RSV,3,1);K:=SMA(FASTK,3,1);D:=SMA(K,5,1);
Var1:=CLOSE/MA(CLOSE,40)*10076;
Var2:=CLOSE/MA(CLOSE,60)*10074;
Var3:=HIGHLOW*1.051;
Var4:=Var3 AND COUNT(Var3,5)1;
Var4 AND (Var1 OR Var2) AND REF(KS13,1)=10 AND REF(KS13,1)/KS13=1.13AND
CLOSE/REF(CLOSE,1)=1.02;
牛市绝底(选股公式)
VAR1:=REF(CLOSE,1);
VAR2:=((SMA(MAX((CLOSE - VAR1),0),7,1) / SMA(ABS((CLOSE - VAR1)),7,1)) * 100);
VAR3:=((SMA(MAX((CLOSE - VAR1),0),13,1) / SMA(ABS((CLOSE - VAR1)),13,1)) *100);
VAR4:=((100 * (HHV(HIGH,48) - LOW)) / HHV(HIGH,48));
VAR5:=((100 * (HIGH - LLV(LOW,48))) / LLV(LOW,48));
牛市绝底:VAR2 15 AND VAR3 20 AND (VAR2 + VAR3) 20 AND VAR4 40 ANDBARSCOUNT(CLOSE) 47;
飞弹一号(选股公式)
var1:=c/ma(c,40)*10078;
var2:=c/ma(c,60)*10074;
var3:=h=l*1.051;
var4:=var3 and count(var3,5)=2;
xg:var4 and (var1 or var2) and count(h=l and c=o and cref(c,1),3)=0
and hhv(v/capital,30)0.8;
跟庄建仓源码
A01:=DYNAINFO(7);
A03:=BARSCOUNT(CLOSE);
A04:=(SMA((CLOSE / HHV(HIGH,120)),3,1) * 100);
A05:=IF((A03 20),A04,0);
A06:=IF((LOW A01),0,IF((HIGH A01),1,(((A01 - LOW) + 0.009) / ((HIGH -LOW) + 0.009))));
A07:=DMA(A06,(VOL / CAPITAL)) * 60;
A09:=IF((((A07 0) AND (A07 REF(A07,1))) AND (A05 = 88)),A07,0);
Var1:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1);
Var2:=EMA(Var1,8);
Var3:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1);
趋势:=EMA(Var3,3)-10;
STICKLINE(趋势80,趋势,80,5,0);
DRAWICON(CROSS(趋势,0),0,1);
STICKLINE((A09 0 AND (趋势20 OR 趋势REF(趋势,1)AND趋势50)),0,A09,6,0),colorFFff00;
机构建仓区:0,LINETHICK0,colorFFFF00;
Var4:=(趋势-REF(趋势,1))/REF(趋势,1)*100;
STICKLINE(趋势=13,0,20,3,0),colorcc9900;
DRAWTEXT(FILTER(趋势=13,15),30,'准备现金'),colorcc9900;
STICKLINE(趋势=13 AND Var413,0,50,2,0),color0099ff;
Var5:=FILTER((趋势=13 AND Var413),10);
DRAWTEXT(Var5,60,'买入'),color0099ff;
STICKLINE(趋势=90 AND Var4,0,30,3,0),colorgray;
Var6:=FILTER((趋势=90 AND Var4),10);
DRAWTEXT(Var6,40,'清仓'),colorgray;
Var7:=LLV(LOW,30);
Var8:=HHV(HIGH,30);
Var9:=EMA((CLOSE-Var7)/(Var8-Var7)*4,4)*25;
STICKLINE(Var990,100,105,3,2),COLORRED;
Var10:=(Var9-LLV(Var9,4))/(HHV(Var9,4)-LLV(Var9,4))*100;
DRAWTEXT(IF(CROSS(Var9,Var10) AND Var987,95,0),88,'险'),Color00FF00;
DRAWICON(CROSS(90,Var9),95,9);
Var11:=SMA(ABS(L-REF(L,1)),3,1)/SMA(MAX(L-REF(L,1),0),3,1)*100;
Var12:=HHV(Var11,30)*8;
火焰山:EMA(IF(LOW=Var7AND 趋势40,(Var11+Var12),0),3)/618,COLORRED,linethick2;
STICKLINE(火焰山0,0 ,火焰山*1.2,4,0 ),COLORRED;
Var13:=(MA(C,1)+MA(C,3)+MA(C,5)+MA(C,7)+MA(C,9))/5;
Var14:=(MA(C,2)+MA(C,4)+MA(C,6)+MA(C,8)+MA(C,10))/5;
趋势线:趋势,colorff0000;
Var16:=MAX(EMA(Var13,2)-EMA(Var14,5),0)*200;
Var17:=EMA(Var16,5);
波浪峰:Var17,stick,colorff00ff;
STICKLINE(Var17REF(Var17,1),0,Var17,1,0),color00ff00;
Var18:=MA(趋势线,8);
if(CROSS(Var2,Var18) AND Var215,50,0),COLORRED;
DRAWTEXT(CROSS(趋势线,Var2)AND 趋势线REF(趋势线,1)AND 趋势线50,50,'追涨'),COLORff00ff;
风险区:IF(趋势80,趋势,80),colorff00ff;
双信号"全仓"选股(选股公式)
FF:=EMA(CLOSE,3);
MA15:=EMA(CLOSE,21);
TTJ:=CROSS(FF,MA15);
上:=EMA(C,3),COLORBLUE,LINETHICK1;
中:=EMA(C,5),COLORWHITE,LINETHICK1;
下:=EMA(中,5),COLOR00FF00,LINETHICK1;
QQ:= C中;
MM:=上REF(上,1)AND REF(上,1)REF(上,2) ;
V1:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
V2:=(1-7/100)*(DMA(CLOSE,V1));
V3:=(1+7/100)*(DMA(CLOSE,V1));
V5:=MA((LOW+HIGH+CLOSE)/3,5);
MA1:=MEMA(CLOSE,5);
MA2:=ATAN((MA1/REF(MA1,1)-1)*100)*180/3.1416;
MA3:=IF(MA20,MA2,MA2);
MA5:=MA(CLOSE,5),COLOR888899;
MA13:=MA(CLOSE,13),COLORFF00F0,LINETHICK2;
VAR01:=CLOSE=HHV(C,4) AND (REF(C,1)=REF(C,2) OR REF(C,1)=REF(C,3))
OR REF(C,1)=HHV(C,4) AND CLOSE=REF(C,2) OR REF(C,2)=HHV(C,4) AND
REF(C,3)=LLV(C,4) AND C=REF(C,1) OR REF(C,3)=HHV(C,4) AND
C=REF(C,1) AND C=REF(C,2);
{收盘价=4日内收盘价的最高值AND 昨收=2日前的收盘价}
VAR02:=CLOSE=HHV(C,4) AND REF(C,1)=LLV(C,4);
{收盘价=4日内收盘价的最高值AND 昨收=4日内收盘价的最低值}
VAR03:=CLOSE=LLV(C,4) AND (REF(C,1)REF(C,2) OR REF(C,1)REF(C,3)) OR
REF(C,1)=LLV(C,4) AND CREF(C,2) OR REF(C,2)=LLV(C,4) AND
REF(C,1)=HHV(C,4) AND CREF(C,1) OR REF(C,3)=LLV(C,4) AND
CREF(C,1) AND CREF(C,2);
{收盘价=4日内收盘价的最低值AND (昨收2日前的收盘价}
VAR04:=REF(C,1)=LLV(C,4) AND C=REF(C,2) OR REF(C,2)=LLV(C,4) AND
REF(C,1)=REF(C,3) AND REF(C,2)REF(C,4) AND C=REF(C,1);
{昨收=4日内收盘价的最低值AND 收盘价=2日前的收盘价}
VAR05:=REF(C,1)=HHV(C,4) AND CREF(C,2) OR (REF(C,2)=HHV(C,4) AND
REF(C,1)REF(C,3) OR REF(C,3)=HHV(C,4) AND REF(C,1)REF(C,2)) AND
REF(C,2)=REF(C,4) AND CREF(C,1);
{昨收=4日内收盘价的最高值AND 收盘价2日前的收盘价}
VAR06:=V5REF(V5,1) AND REF(V5,1)REF(V5,2);
{今日V5向上形成拐点}
VAR07:=LOWHHV(V5,13) AND HIGHHHV(V5,13) AND CLOSEREF(C,1) ANDCLOSEOPEN;
VAR08:=VAR07 AND COUNT(VAR06,2);
VAR09:=100*EMA(EMA(C-REF(C,1),6),6)/EMA(EMA(ABS(C-REF(C,1)),6),6);
VAR10:=EMA(MA(C,13),13);
VAR11:=FILTER((LLV(VAR09,2)=LLV(VAR09,7) AND COUNT(VAR090,2) AND
CROSS(VAR09,MA(VAR09,2)))=1,5);
VAR12:=FILTER((HHV(VAR09,2)=HHV(VAR09,7) AND COUNT(VAR0950,2) AND
CROSS(MA(VAR09,2),VAR09))=1,1);
VAR13:=SMA(EMA((C-REF(C,1))/REF(C,1),5)*100,3,1)*10;
VAR14:=FILTER(((CROSS(VAR13,0) OR CROSS(C,VAR10)) AND VAR11)=1,3);
VAR15:=MA(C,18)=REF(MA(C,18),3) AND CROSS(C,MA(C,18));
VAR16:=VAR08 AND NOT(REF(VAR08,1));
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
金叉:=CROSS(J,D);
死叉:=CROSS(D,J);
买1:=(VAR14OR VAR15) AND VAR11;
买2:=(VAR14OR VAR15) AND VAR04;
买3:=(VAR14OR VAR15) AND VAR02;
买4:=(VAR02AND VAR11) OR (VAR04 AND VAR11);
买5:=(金叉AND VAR04) OR (金叉 AND VAR02) OR (金叉 AND VAR11);
TTJ0:=VAR16;
TTJ1:=买1OR 买2OR 买3OR 买4OR 买5AND MM;
XG0:=TTJ AND TTJ0;
XG1:=TTJ AND TTJ1;
XG11:=XG0 OR XG1;
{以下波浪理论浪底重叠"买底"选股原码}
PL5:=ZIG(3,5);
EN1:=ZIG(3,5)REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)=REF(ZIG(3,5),2) ANDREF(ZIG(3,5),2)=REF(ZIG(3,5),3);
EX1:=ZIG(3,5)REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)=REF(ZIG(3,5),2) ANDREF(ZIG(3,5),2)=REF(ZIG(3,5),3);
PL10:=ZIG(3,10);
EN2:=ZIG(3,10)REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)=REF(ZIG(3,10),2)AND REF(ZIG(3,10),2)=REF(ZIG(3,10),3);
EX2:=ZIG(3,10)REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)=REF(ZIG(3,10),2)AND REF(ZIG(3,10),2)=REF(ZIG(3,10),3);
PL20:=ZIG(3,20);
EN3:=ZIG(3,20)REF(ZIG(3,20),1) AND REF(ZIG(3,20),1)=REF(ZIG(3,20),2)AND REF(ZIG(3,20),2)=REF(ZIG(3,20),3);
EX3:=ZIG(3,20)REF(ZIG(3,20),1) AND REF(ZIG(3,20),1)=REF(ZIG(3,20),2)AND REF(ZIG(3,20),2)=REF(ZIG(3,20),3);
PL40:=ZIG(3,40);
走强1:=BARSLAST(PL5REF(PL5,1));
走弱1:=BARSLAST(PL5REF(PL5,1));
走强2:=BARSLAST(PL10REF(PL10,1));
走弱2:=BARSLAST(PL10REF(PL10,1));
走强3:=BARSLAST(PL20REF(PL20,1));
走弱3:=BARSLAST(PL20REF(PL20,1));
ZTJZ5:=IF(PL10REF(PL10,1),COUNT(EN1,走强2),0);
ZTJD5:=IF(PL10REF(PL10,1),COUNT(EX1,走强2),0);
DTJZ5:=IF(PL10REF(PL10,1),COUNT(EN1,走弱2),0);
DTJD5:=IF(PL10REF(PL10,1),COUNT(EX1,走弱2),0);
ZTJZ10:=IF(PL20REF(PL20,1),COUNT(EN2,走强3),0);
ZTJD10:=IF(PL20REF(PL20,1),COUNT(EX2,走强3),0);
DTJZ10:=IF(PL20REF(PL20,1),COUNT(EN2,走弱3),0);
DTJD10:=IF(PL20REF(PL20,1),COUNT(EX2,走弱3),0);
TJ11:=EN2 AND ZTJZ5=1;
TJ22:=EN1 AND PL10REF(PL10,1) AND ZTJZ5=2;
TJ33:=EN2 AND DTJZ10=1;
TJ44:=EN3 AND ZTJZ10=1;
TJ55:=EN2 AND PL20REF(PL20,1) AND ZTJZ10=2;
XG22:=TJ11 OR TJ22 OR TJ33 OR TJ44 OR TJ55;
{以下二者结合共同选股}
XG:=XG11 OR XG22;
W18:EXIST(XG,1);
房间问题 Pascal 详解 急!
USACO的房间问题?
用一个二维数组记录每个格的四面是否有墙,根据输入,利用位运算得出每个格的墙的情况(8 = 23,4 = 22,2 = 21,1 = 20)。 然后用floodfill,对每个房间染色,求出房间数,和每个房间的面积,输出其中最大的。
枚举每堵墙,如果墙的两边不是同一个房间且其面积和更大,更新结果,为了结果唯一,我们从左下向右上,一列一列枚举格子,并且先枚举该格上面的墙再枚举右边的。
墙 1:西,2:北,4:东;8:南 我们可以用一个三维的布尔型数组来判断有没有墙,false即为有墙,TRUE为无墙。那么我们在读入时可以做以下操作:
fillchar(g,sizeof(g),1);
for i:=1 to n do
for j:=1 to m do
begin
read(k);
if k=8 then begin dec(k,8);g[i,j,4]:=false;end;
if k=4 then begin dec(k,4);g[i,j,3]:=false;end;
if k=2 then begin dec(k,2);g[i,j,2]:=false;end;
if k=1 then begin dec(k,1);g[i,j,1]:=false;end;
end;
pascal程序:
program dfsdl;
var
a:array[1..50,1..50] of longint;
g:array[1..50,1..50,1..4] of boolean;
color:array[0..51,0..51] of longint;
room:array[1..3000] of longint;
i,j,k,m,n,colors,max,h,l:longint;
ch:char;
procedure floodfill(x,y:longint);
const
dy:array[1..4] of shortint=(-1,0,1,0);
dx:array[1..4] of shortint=(0,-1,0,1);
var
i,nx,ny:longint;
begin
color[x,y]:=colors;
for i:=1 to 4 do
begin
nx:=x+dx[i];ny:=y+dy[i];
if (nx0) and (nx=n) and (ny0) and (ny=m) and (not g[x,y,i]) and (color[nx,ny]=0)then
begin
inc(room[colors]);
floodfill(nx,ny);
end;
end;
end;
begin
assign(input,'castle.in');reset(input);
assign(output,'castle.out');rewrite(output);
readln(m,n);
fillchar(g,sizeof(g),0);
for i:=1 to n do
for j:=1 to m do
begin
read(k);
if k=8 then
begin
k:=k-8;
g[i,j,4]:=true;
end;
if k=4 then
begin
k:=k-4;
g[i,j,3]:=true;
end;
if k=2 then
begin
k:=k-2;
g[i,j,2]:=true;
end;
if k=1 then
begin
k:=k-1;
g[i,j,1]:=true;
end;
end;
fillchar(color,sizeof(color),0);
colors:=0;
max:=0;
for i:=1 to n do
for j:=1 to m do
if color[i,j]=0 then
begin
inc(colors);
room[colors]:=1;
floodfill(i,j);
if room[colors]max then max:=room[colors];
end;
writeln(colors);
writeln(max);
max:=0;
for i:=1 to m do
for j:=n downto 1 do
begin
if (g[j,i,2]) and (j-10) and (color[j,i]color[j-1,i]) and (room[color[j,i]]+room[color[j-1,i]]max) then
begin
max:=room[color[j,i]]+room[color[j-1,i]];
h:=j;l:=i;ch:='N';
end;
if (g[j,i,3]) and (i+1=m) and (color[j,i]color[j,i+1]) and (room[color[j,i]]+room[color[j,i+1]]max) then
begin
max:=room[color[j,i]]+room[color[j,i+1]];
h:=j;l:=i;ch:='E';
end;
end;
writeln(max);
writeln(h,' ',l,' ',ch);
close(input);close(output);
end.
求几首搞笑的纯音乐,欢快,滑稽的,作视频的背景音乐用,求大神了!
1、Title Theme
2、Grasswalk
3、地上BGM
4、玉满堂·变调
5、滑稽
6、恶作剧
7、The Entertainer
8、放课后
9、胜って! 买って! 駆って!
10、トラブルメーカー
有好听的纯音乐吗 最好是类似于Fade -Alan Walker的
Tobu的都比较好听:个人喜欢Mesmerize,Cloud 9,higher,colors
Alan walker:Spectre,flying dream
Alan walker较早的歌抒情较重,现在更偏节奏