function [out]=Plcp_preamble_gen(tfc,pt)
Sbase(1,:)=[0.6564,-1.3671,-0.9958,-1.3981,0.8481,1.0892,-0.8621,1.1512,0.9602,-1.3581,-0.8354,-1.3249,1.0964,1.3334,...
 -0.7378,1.3565,0.9361,-0.8212,-0.2662,-0.6866,0.8437,1.1237,-0.3265,1.0511,0.7927,-0.3363,-0.1342,-0.1546,0.6955,...
 1.0608,-0.1600,0.9442,-0.0844,1.1974,1.2261,1.4401,-0.5988,-0.4675,0.8520,-0.8922,-0.5603,1.1886,1.1128,...
 1.0833,-0.9073,-1.6227,1.0013,-1.6067,0.3360,-1.3136,-1.4447,-1.7238,1.0287,0.6100,-0.9237,1.2618,0.5974,-1.0976,...
 -0.9776,-0.9982,0.8967,1.7640,-1.0211,1.6913,-0.2095,1.1640,1.2334,1.5338,-0.8844,-0.3857,0.7730,-0.9754,-0.2315,...
 0.5579,0.4035,0.4248,-0.3359,-0.9914,0.5975,-0.8408,0.3587,-0.9604,-1.0002,-1.1636,0.9590,0.7137,-0.6776,0.9824,...
 -0.5454,1.1022,1.6485,1.3307,-1.2852,-1.2659,0.9435,-1.6809,0.4232,-1.2684,-1.8151,-1.4829,1.0302,0.9419,-1.1472,...
 1.4858,-0.6794,0.9573,1.0807,1.1445,-1.2312,-0.6643,0.3836,-1.1482,-0.0353,-0.6747,-1.1653,-0.8896,0.2414,0.1160,...
 -0.6987,0.4781,0.1821,-1.0672,-0.9676,-1.2321,0.5003,0.7419,-0.8934,0.8391];

Sbase(2,:)=[0.9679,-1.0186,0.4883,0.5432,-1.4702,-1.4507,-1.1752,-0.0730,-1.2445,0.3143,-1.3951,-0.9694,0.4563,0.3073,0.6408,...
-0.9798,-1.4116,0.6038,-1.3860,-1.0888,1.1036,0.7067,1.1667,-1.0225,-1.2471,0.7788,-1.2716,-0.8745,1.2175,0.8419,...
1.2881,-0.8210,-1.2905,1.1040,-1.2408,-0.8062,1.5425,1.0955,1.4284,-0.4593,-1.0408,1.0542,-0.4446,-0.7929,1.6733,...
1.7568,1.3273,-0.2465,1.6850,-0.7091,1.1396,1.5114,-1.4343,-1.5005,-1.2572,0.8274,-1.5140,1.1421,-1.0135,-1.0657,...
1.4073,1.8196,1.1679,-0.4131,1.5280,-0.9193,1.1246,1.2622,-1.4406,-1.4929,-1.1508,0.4126,-1.0462,0.7232,-1.1574,...
-0.7102,0.8502,0.6260,0.9530,-0.4971,-0.8633,0.6910,-0.3639,-0.8874,1.5311,1.1546,1.1935,-0.2930,1.3285,-0.7231,1.2832,...
0.7878,-0.8095,-0.7463,-0.8973,0.5560,0.5193,-0.3439,0.1428,0.6251,-1.0468,-0.5798,-0.8237,0.2667,-0.9564,0.6016,-0.9964,...
-0.3541,0.3965,0.5201,0.4733,-0.2362,-0.6892,0.4787,-0.2605,-0.5887,0.9411,0.7364,0.6714,-0.1746,1.1776,-0.8803,1.2542,...
0.5111,-0.8209,-0.8975,-0.9091,0.2562];

Sbase(3,:)=[0.4047,0.5799,-0.3407,0.4343,0.0973,-0.7637,-0.6181,-0.6539,0.3768,0.7241,-1.2095,0.6027,0.4587,-1.3879,-1.0592,-1.4052,...
-0.8439,-1.5992,1.1975,-1.9525,-1.5141,0.7219,0.6982,1.2924,-0.9460,-1.2407,0.4572,-1.2151,-0.9869,1.2792,0.6882,1.2586,...
-0.9671,-0.9819,0.7980,-0.8158,-0.9188,1.5146,0.8138,1.3773,0.2108,0.9245,-1.2138,1.1252,0.9663,-0.8418,-0.6811,-1.3003,...
-0.3397,-1.1051,1.2400,-1.3975,-0.7467,0.2706,0.7294,0.7444,-0.3970,-1.0718,0.6646,-1.1037,-0.5716,0.9001,0.7317,0.9846,... 
-0.7298,-0.9662,0.9694,-0.8053,-0.9052,1.5933,0.8418,1.5363,0.3085,1.3016,-1.5546,1.5347,1.0935,-0.8978,-0.9712,-1.3763,...
-0.6360,-1.2947,1.6436,-1.6564,-1.1981,0.8719,0.9992,1.4872,-0.4586,-0.8404,0.6982,-0.7959,-0.5692,1.3528,0.9536,1.1784,... 
0.2424,0.5703,-0.6381,0.7861,0.9175,-0.4595,-0.2201,-0.7755,-0.2965,-1.1220,1.7152,-1.2756,-0.7731,1.0724,1.1733,1.4711,...
0.4881,0.7528,-0.6417,1.0363,0.8002,-0.0077,-0.2336,-0.4653,0.6862,1.2716,-0.8880,1.4011,0.9531,-1.1210,-0.9489,-1.2566];

Sbase(4,:)=[1.1549,1.0079,0.7356,-0.7434,-1.3930,1.2818,-1.1033,-0.2523,-0.7905,-0.4261,-0.9390,0.4345,0.4433,-0.3076,0.5644,0.2571,...
-1.0030,-0.7820,-0.4064,0.9035,1.5406,-1.4613,1.2745,0.3715,1.8134,0.9438,1.3130,-1.3070,-1.3462,1.6868,-1.2153,-0.6778,... 
-1.2385,-0.7883,-0.7954,1.0874,1.1491,-1.4780,0.8870,0.4694,1.5066,1.1266,0.9935,-1.2462,-1.7869,1.7462,-1.4881,-0.4090,...
-1.4694,-0.7923,-1.4607,0.9113,0.8454,-0.8866,0.8852,0.4918,-0.6096,-0.4322,-0.1327,0.4953,0.9702,-0.8667,0.6803,-0.0244,... 
1.3095,0.6675,1.2587,-0.9993,-1.0052,0.6601,-1.0228,-0.7489,0.5086,0.1563,0.0673,-0.8375,-1.0746,0.4454,-0.7831,-0.3623,...
-1.3658,-1.0854,-1.4923,0.4233,0.6741,-1.0157,0.8304,0.4878,-1.4992,-1.1884,-1.4008,0.7795,1.2926,-1.2049,1.2934,0.8123,... 
-1.0094,-0.7598,-1.0786,0.6699,0.9813,-0.5563,1.0548,0.8925,-1.3656,-0.8472,-1.3110,1.1897,1.5127,-0.7474,1.4678,1.0295,...
-0.9210,-0.4784,-0.5022,1.2153,1.5783,-0.7718,1.2384,0.6695,0.8821,0.7808,1.0537,-0.0791,-0.2845,0.5790,-0.4664,-0.1097];

Sbase(5,:)=[0.9574,0.5270,1.5929,-0.2500,-0.2536,-0.3023,1.2907,-0.4258,1.0012,1.7704,0.8593,-0.3719,-1.3465,...
-0.7419,1.5350,-1.2800,0.6955,1.7204,0.1643,-0.3347,-1.7244,-0.7447,1.1141,-1.3541,-0.7293,0.2682,...
-1.2401,1.0527,0.1199,1.1496,-1.0544,1.3176,0.8400,1.3980,1.1147,-0.4732,-1.7178,-0.8477,1.5083,-1.4364,... 
0.3853,1.5673,0.0295,-0.4204,-1.4856,-0.8404,1.0111,-1.4269,0.3033,0.7757,-0.1370,-0.5250,-1.1589,-0.8324,...
0.6336,-1.2698,-0.7853,-0.7031,-1.1106,0.6071,0.7164,0.8305,-1.2355,1.1754,0.5859,0.3053,0.8948,-0.6744,...
-0.8901,-0.8133,0.9201,-1.0841,-0.8036,-0.3105,-1.0514,0.7644,0.7301,0.9788,-1.1305,1.3257,0.7801,0.7867,...
1.0996,-0.5623,-1.2227,-0.8223,1.2074,-1.2338,0.2957,1.0999,-0.0201,-0.5860,-1.2284,-0.9215,0.7941,-1.4128,... 
-0.8528,-0.6973,-1.2477,0.6246,0.7687,0.7966,-1.2809,1.1023,0.4250,-0.1614,0.7547,-0.6696,-0.3920,-0.7589,...
0.6701,-0.9381,-0.7483,-0.9659,-0.9192,0.3925,1.2864,0.6784,-1.0909,1.1140,-0.6134,-1.5467,-0.3031,0.9457,...
1.9645,1.4549,-1.2760,2.2102];

Sbase(6,:)=[1.2947,-0.8188,0.9007,0.7786,0.6301,-0.1283,-0.7972,-0.3897,1.1794,-1.2592,0.8136,0.8872,0.5797,-1.2304,...
-0.5628,-0.8272,-1.5418,1.2804,-1.1524,-0.9846,-0.9178,1.1834,0.4293,0.9021,1.1152,-0.9828,0.7891,0.9391,....
0.5944,-0.8376,-0.5320,-0.6335,-0.9973,0.8548,-0.6963,-0.6874,-0.5015,0.7003,0.3582,0.5772,0.7421,-0.6766,...
0.6242,0.4241,0.5891,-0.9045,0.1625,-0.5105,-1.4187,1.5169,-0.9580,-1.1237,-0.6782,1.3557,1.0229,0.9490,...
1.6308,-0.9325,1.1461,1.1675,0.8163,-0.1551,-0.8657,-0.3696, 1.0703,-0.8625,0.6986,1.0989,0.4600,-0.6559,...
-0.6087,-0.4206,-0.8454,1.0317,-0.7624,0.0619,-0.7311,1.3634,-0.1379,0.8401,1.6371,-1.0201,0.9243,2.0931,...
0.4511,0.0768,-1.7974,-0.4685,1.4727,-1.3387,0.7779,2.0080,0.3026,-0.4263,-1.9751,-0.8421,0.9516,-1.2593,...
0.4594,1.3038,0.1090,-0.5082,-1.8181,-0.7747,0.7678,-1.5342,0.4914,0.7197,0.3353,-1.5832,-0.9947,-1.0329,...
-1.9669,0.9946,-1.3273,-1.5572,-0.8746,0.0579,1.2269,0.4497,-1.4751,1.3897,-0.9922,-1.2950,-0.6839,1.2113,...
1.0559,0.8147];

Sbase(7,:)=[0.8147,1.0559,1.2113,-0.6839,-1.2950,-0.9922,1.3897,-1.4751,0.4497,1.2269,0.0579,-0.8746,-1.5572,-1.3273,...
0.9946,-1.9669,-1.0329,-0.9947,-1.5832,0.3353,0.7197,0.4914,-1.5342,0.7678,-0.7747,-1.8181,-0.5082,0.1090,...
1.3038,0.4594,-1.2593,0.9516,-0.8421,-1.9751,-0.4263,0.3026,2.0080,0.7779,-1.3387,1.4727,-0.4685,-1.7974,...
0.0768,0.4511,2.0931,0.9243,-1.0201,1.6371,0.8401,-0.1379,1.3634,-0.7311,0.0619,-0.7624,1.0317,-0.8454,-0.4206,...
-0.6087,-0.6559,0.4600,1.0989,0.6986,-0.8625,1.0703,-0.3696,-0.8657,-0.1551,0.8163,1.1675,1.1461,-0.9325,1.6308,...
0.9490,1.0229,1.3557,-0.6782,-1.1237,-0.9580,1.5169,-1.4187,-0.5105,0.1625,-0.9045,0.5891,0.4241,0.6242,-0.6766,...
0.7421,0.5772,0.3582,0.7003,-0.5015,-0.6874,-0.6963,0.8548,-0.9973,-0.6335,-0.5320,-0.8376,0.5944,0.9391,0.7891,...
-0.9828,1.1152,0.9021,0.4293,1.1834,-0.9178,-0.9846,-1.1524,1.2804,-1.5418,-0.8272,-0.5628,-1.2304,0.5797,0.8872,...
0.8136,-1.2592,1.1794,-0.3897,-0.7972,-0.1283,0.6301,0.7786,0.9007,-0.8188,1.2947];

channel_est_r_fren=[0,1,1,-1,1,-1,-1,1,-1,1,-1,1,1,-1,-1,-1,1,1,-1,1,-1,1,1,1,-1,1,1,1,-1,-1,1,1,1,1,...
-1,-1,1,-1,1,1,1,-1,-1,1,1,-1,-1,1,-1,1,1,1,1,1,-1,1,1,-1,-1,-1,-1,-1,0,0,0,0,0,-1,...
-1,-1,-1,-1,1,1,-1,1,1,1,1,1,-1,1,-1,-1,1,1,-1,-1,1,1,1,-1,1,-1,-1,1,1,1,1,-1,-1,1,1,1,...
-1,1,1,1,-1,1,-1,1,1,-1,-1,-1,1,1,-1,1,-1,1,-1,-1,1,-1,1,1];

channel_est_i_fren = [0,1,1,-1,1,-1,-1,1,-1,1,-1,1,1,-1,-1,-1,1,1,-1,1,-1,1,1,1,-1,1,1,1,-1,-1,1,1,1,1,...
-1,-1,1,-1,1,1,1,-1,-1,1,1,-1,-1,1,-1,1,1,1,1,1,-1,1,1,-1,-1,-1,-1,-1,0,0,0,0,0,1,...
1,1,1,1,-1,-1,1,-1,-1,-1,-1,-1,1,-1,1,1,-1,-1,1,1,-1,-1,-1,1,-1,1,1,-1,-1,-1,-1,1,1,...
-1,-1,-1,1,-1,-1,-1,1,-1,1,-1,-1,1,1,1,-1,-1,1,-1,1,-1,1,1,-1,1,-1,-1]; 

channel_est_fren=channel_est_r_fren+j*channel_est_i_fren;
channel_est=ifft(channel_est_fren);
Schannel_est_165=[channel_est_fren,zeros(1,37)];


cover1_st_12=[1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,-1,-1,-1];
cover1_st_34=[1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,-1,1,-1,1,-1];
cover1_st_567=[-1,-1,-1,-1,-1,-1,-1,1,-1,-1,1,-1,-1,1,-1,-1,1,-1,-1,1,-1,1,1,1];
cover1_br_12=[1,1,1,1,1,1,1,1,1,-1,-1,-1];
cover1_br_34=[1,1,1,1,1,1,1,-1,1,-1,1,-1];
cover1_br_567=[-1,-1,-1,1,1,-1,-1,1,-1,1,1,1];
if(pt==0)
   if isequal(tfc,[1 0 0])
       Sext=[Sbase(1,:),zeros(1,37)];
       for i=1:24
           Ssync(((i-1)*165+1):(i*165))=Sext.*cover1_st_12(i);
       end
       for i=25:30
           Ssync(((i-1)*165+1):(i*165))=Schannel_est_165;
       end
   elseif(tfc==[0 1 0])
        Sext=[Sbase(2,:),zeros(1,37)];
       for i=1:24
           Ssync(((i-1)*165+1):(i*165))=Sext.*cover1_st_12(i);
       end
       for i=25:30
           Ssync(((i-1)*165+1):(i*165))=Schannel_est_165;
       end
   elseif(tfc==[1 1 0])
        Sext=[Sbase(3,:),zeros(1,37)];
       for i=1:24
           Ssync(((i-1)*165+1):(i*165))=Sext.*cover1_st_34(i);
       end
       for i=25:30
           Ssync(((i-1)*165+1):(i*165))=Schannel_est_165;
       end
   elseif(tfc==[0 0 1])
        Sext=[Sbase(4,:),zeros(1,37)];
       for i=1:24
           Ssync(((i-1)*165+1):(i*1165))=Sext.*cover1_st_34(i);
       end
       for i=25:30
           Ssync(((i-1)*165+1):(i*165))=Schannel_est_165;
       end
   elseif(tfc==[1 0 1])
        Sext=[Sbase(5,:),zeros(1,37)];
       for i=1:24
           Ssync(((i-1)*165+1):(i*165))=Sext.*cover1_st_567(i);
       end
       for i=25:30
           Ssync(((i-1)*165+1):(i*165))=Schannel_est_165;
       end
   elseif(tfc==[0 1 1])
        Sext=[Sbase(6,:),zeros(1,37)];
       for i=1:24
           Ssync(((i-1)*165+1):(i*165))=Sext.*cover1_st_567(i);
       end
       for i=25:30
           Ssync(((i-1)*165+1):(i*165))=Schannel_est_165;
       end
   elseif(tfc==[1 1 1])
        Sext=[Sbase(7,:),zeros(1,37)];
       for i=1:24
           Ssync(((i-1)*165+1):(i*165))=Sext.*cover1_st_567(i);
       end
       for i=25:30
           Ssync(((i-1)*165+1):(i*165))=Schannel_est_165;
       end
   end
   
else
  if(tfc==[1 0 0])
       Sext=[Sbase(1,:),zeros(1,37)];
       for i=1:12
           Ssync(((i-1)*165+1):(i*165))=Sext.*cover1_br_12(i);
       end
       for i=13:18
           Ssync(((i-1)*165+1):(i*165))=Schannel_est_165;
       end
   elseif(tfc==[0 1 0])
        Sext=[Sbase(2,:),zeros(1,37)];
       for i=1:12
           Ssync(((i-1)*165+1):(i*165))=Sext.*cover1_br_12(i);
       end
       for i=13:18
           Ssync(((i-1)*165+1):(i*165))=Schannel_est_165;
       end
   elseif(tfc==[1 1 0])
        Sext=[Sbase(3,:),zeros(1,37)];
       for i=1:12
           Ssync(((i-1)*165+1):(i*165))=Sext.*cover1_br_34(i);
       end
       for i=13:18
           Ssync(((i-1)*165+1):(i*165))=Schannel_est_165;
       end
   elseif(tfc==[0 0 1])
        Sext=[Sbase(4,:),zeros(1,37)];
       for i=1:12
           Ssync(((i-1)*165+1):(i*165))=Sext.*cover1_br_34(i);
       end
       for i=13:18
           Ssync(((i-1)*165+1):(i*165))=Schannel_est_165;
       end
   elseif(tfc==[1 0 1])
        Sext=[Sbase(5,:),zeros(1,37)];
       for i=1:12
           Ssync(((i-1)*165+1):(i*165))=Sext.*cover1_br_567(i);
       end
       for i=13:18
           Ssync(((i-1)*165+1):(i*165))=Schannel_est_165;
       end
   elseif(tfc==[0 1 1])
        Sext=[Sbase(6,:),zeros(1,37)];
       for i=1:12
           Ssync(((i-1)*165+1):(i*165))=Sext.*cover1_br_567(i);
       end
       for i=13:18
           Ssync(((i-1)*165+1):(i*165))=Schannel_est_165;
       end
   elseif(tfc==[1 1 1])
        Sext=[Sbase(7,:),zeros(1,37)];
       for i=1:12
           Ssync(((i-1)*165+1):(i*165))=Sext.*cover1_br_567(i);
       end
       for i=13:18
           Ssync(((i-1)*165+1):(i*165))=Schannel_est_165;
       end
  end
end
out=Ssync;