Laman

Sunday, June 23, 2013

Ibu Suratmi Baki Sukoharjo


SUDAH TIDAK nDEPROK LAGI


Mbah Suratmi yang sering menyebut dirinya Mbah Hadi ( karena suaminya bernama Mbah Hadi Suratno seorang pensiunan guru SD ), pertama kali datang ke Omah Asri Sehat hari Selasa tanggal 7 Mei 2013. Sangat lunglai, beliau bercerita sudah beberapa hari kalau jualan hanya bisa 'ndeprok' karena badannya sudah sangat tidak nyaman. Waktu naik ke atas inner body scan di Omah Asri Sehat saja sampai dilakukan dua kali karena sudah begitu gemetar untuk berdiri.
Saya menyuguhkan 350 cc Teh Pembakar Lemak seperti yang kita janjikan dalam undangan, setelah habis minum Mbah Suratmi mohon diri dan pulang, waktu itu tiada komitmen untuk mengkonsumsi Makan Malam Sehat ala Omah Asri Sehat.
Rabu sore 8 Mei 2013 Mbah Suratmi datang lagi dan memutuskan untuk Makan Malam di Omah Asri Sehat dan hasilnya bisa di lihat



4-May-2013 13-May-2013
Tensi 153/83
Pulse 93/m 89/m
Gula 386 Mg/dl 252 Mg/dl
Asam Urat Lo
Kolestrol 231 Mg/dl 225 Mg/dl
Trigliserid 381 Mg/dl


Hasilnya memang masih belum pada batas sehat, sesuai ukuran medis namun Mbah Suratmi sudah bisa berdiri lagi kalau jualan di 'supermarketnya', wajahnya sudah lebih cerah dan terlihat begitu bersemangat dengan perubahan yang beliau dapat setelah Makan Malam di Omah Asri Sehat.
 Hasil tes terakhir yang saya dapatkan sbb :


4-Juni-2013
Tensi141
Pulse80/m
Gula215 Mg/dl
Asam Urat
Kolestrol213 Mg/dl
Trigliserid


Mbah Suratmi tinggal di Tinggen Bentakan Baki Sukoharjo

for more info about Omah Asri Sehat pls contact 0878 3600 9100

Monday, June 3, 2013

MA 5 MA 20 afl

_SECTION_BEGIN("Price");
SetChartOptions(0,chartShowArrows|chartShowDates);
_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) {{VALUES}}", O, H, L, C, SelectedValue( ROC(C, 1 ) ) ));
Plot( C, "Close", ParamColor("Color", colorBlack ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() );
_SECTION_END();

_SECTION_BEGIN("MA");


P = ParamField("Price field",-1);
Periods1 = Param("Periods1", 5, 2, 300, 1, 10 );
Periods2 = Param("Periods2", 20, 2, 300, 1, 10 );
Plot( MA( P, Periods1 ), StrFormat(_SECTION_NAME()+"(%g)", Periods1), ParamColor( "Color1", colorRed ), ParamStyle("Style") );
Plot( MA( P, Periods2 ), StrFormat(_SECTION_NAME()+"(%g)", Periods2), ParamColor( "Color2", colorBlue ), ParamStyle("Style") );
Buy = Cross( MA( P, Periods1 ), MA( P, Periods2 ) );
Sell = Cross(MA( P,Periods2 ), MA( P, Periods1 ) );

PlotShapes(IIf(Buy==1, shapeHollowUpArrow , shapeNone), colorGreen, 0,Low, Offset=-15);   
PlotShapes(IIf(Sell==1, shapeHollowDownArrow, shapeNone), colorRed, 0,High, Offset=-15);

PlotOHLC( Null,MA( P, Periods1 ),MA( P, Periods2 ),Null, "", IIf(MA( P, Periods1 )>MA( P, Periods2 ) ,colorLime,colorRose), styleCloud);

Color = IIf( MA(p,periods1) > MA(p,periods2) , colorLime, IIf( MA(p,periods2) > MA(p,periods1), colorPink, colorGrey50 ));
Plot( 1, "", Color, styleArea | styleOwnScale | styleNoLabel, -0.1, 30 );

_SECTION_END();