sstock = [
1950.4
1987.26
1945.83
1953.17
2021.26
1930.58
1903.2
1898.58
1828.48
1745.73
1768.96
1671.31
1703.4
1605.3
1498.8
1423.19
1687.7
1805.43
1916.8
1867.01
1956.47
2066.33
2029.07
2029.37
2084.79
2004.16
2160.54
2034.84
2028.43
2215.1
2149.44
2251.03
2198.88
2107.43
2191.53
2075.68
2163.41
1961.43
1720.36
1840.26
1928.68
1890.91
2052.78
2117.63
2262.51
2425.38
2470.97
2660.5
2781.3
2770.38
2626.5
2407.65
2470.52
2517.02
2653.27
2917.43
2645.29
2904.38
3027.19
3028.99
3451.58
3278.36
3483.14
3316.77
3361.01
3672.82
3803.76
3835.23
3978.41
4234.33
4042.68
3930.34
3789.47
3787.36
3663
4094.45
4246.18
4023.2
3966.11
3845.34
3860.56
3874.84
3813.38
3205.11
3390.4
3529.06
3816.82
3860.66
3643.88
3321.29
4446.45
4572.83
4963.03
4798.13
5048.62
4914.79
4590.5
4411.74
4395.45
4244.14
3887.07
4235.4
4064.27
3882.62
4069.31
3969.44
3753.06
3620.24
3520.63
3447.81
3369.25
3221.15
3102.29
2966.43
2816.52
2731.83
2886.57
2736.85
2740.41
2869.62
2887.06
2843.11
2758.9
2648.33
2637.81
2547.97
2638.49
2692.4
2864.48
2793.07
2741.02
2552.65
2563.44
2447.88
2478.34
2470.52
2520.14
2527.86
2503.62
2542.86
2590.69
2484.04
2593.05
2493.37
2419.17
2421.27
2381.53
2337.11
2288.03
2283.6
2321.89
2373.62
2505.89
2338.88
2348.2
2344.41
];

stock = [
217.28
198.69
209.74
220.39
236.53
238.19
232.13
257.68
273.51
258.47
230.07
260.64
301.22
299.47
305.85
326.51
320.91
333.29
341.86
336.13
347.24
350.97
352.69
352.86
346.66
345
345.72
325.17
329.95
344.5
342.57
343.45
344.87
355.95
352.57
352.61
359
362.05
369.97
370.9
368.52
372.39
366.85
366.35
370.91
367.29
374.93
376.29
369.77
379.61
381.17
380.33
376.18
372.06
373.79
374.46
374.61
369.95
365.55
367.67
365.2
361.49
354.42
354.86
354.03
351.13
337.99
352.1
348.44
351.39
352.5
353.08
350.56
347.7
343.12
339.21
345.47
344.67
343.04
345.48
341.37
345.2
344.59
345.63
344.24
341.93
346.37
343.04
343.3
345.57
346.55
344.27
341.99
340.28
335.22
331.65
328.91
328.6
326.16
321.15
320.68
317.73
316.41
319.67
319.33
313.68
313.05
306.68
306.64
303.27
307.46
307.72
307.68
310.57
304.2
297.41
296.76
298.87
293.42
305.64
308.09
300.83
314.09
312.7
321.38
320.09
319.35
320.79
316.49
325.7
321.17
323.51
321.91
326.16
325.56
321.52
320.13
319.29
313.84
314.15
314.28
315.66
316.62
315.33
310.58
311.87
309.91
304.19
302.43
305.43
304.09
300.67
299.13
301.49
303.04
305.37
300.35
303.49
300.4
308.85
303.22
296.51
297.5
310.26
314.63
316.44
317.53
317.59
319.7
316.26
310.29
306.14
305.75
311.59
308.99
305.2
310.2
313.86
321.18
317.41
314.53
311.25
311.24
310.06
305.99
301.1
300.74
300.41
306.49
308.07
310.35
301.53
305.75
317.18
322.06
319.05
319.68
317.51
312.6
312.6
314.04
315.13
309.39
310.33
307.06
304.64
304.14
303.95
302.66
297.66
304.06
301.66
301.58
300.83
296.98
297.7
304.75
305.72
307.01
300
296.52
290.95
286.13
287.89
286.53
282.01
280.5
275.41
270.23
272.26
266.88
266.82
269.34
263.95
271.05
279.79
290.68
291.3
289.23
293.38
295.62
292.39
291.16
288.22
290.34
280.53
283.9
278.78
276.66
269.42
268.6
269.89
269.67
263.05
261.11
260.68
257.58
254.38
255.23
252.16
253.7
257.13
251.44
256.48
257.03
256.04
253.6
256.59
251.88
250.87
249.43
249.85
247.69
246.53
241.73
239.55
240.44
240
237.75
238.14
240.01
];

[len,temp] = size(stock);

for i=0:len-1
    serials(i+1) = stock(len-i);
end

 pstock = log(serials);
% price = serials;

%  meanval = mean(price);
%  variance = std(price,1,2);
%  pstock = ( price - meanval )./variance;

  PM = max(pstock);
  pstock = pstock.*(1/PM);

figure(1)
plot(pstock)

disp('');
disp('Please tell me the value of delay.');
delay = input('( The default is 12):');
if isempty(delay)
    delay = 12;
end
disp('');

figure(1)
plot(pstock) delay