Minggu, 18 Desember 2011

Season Greeting (2) : Prosperity Mind Set Indicator





// <- Start copy from Here...
//
// This is an Animated Indicator for Amibroker
//
// This is for the Spirit of Season Greeting.
// Absolutely no copy right or what so ever...
// Composed from idea on webs....
// Free to change text or customize for friends.
//
// Putting this indicator at the top pane could trigger
// your Prosperity Mind Set sub-consciously. :-)

_SECTION_BEGIN("BACK COLR");

GfxSetOverlayMode(1);
SetChartBkColor( ParamColor("Chart Color", colorBlack));
GfxSetOverlayMode(1);
GfxSelectFont("Tahoma", Status("pxheight")/20 ); /* Up down name*/
GfxSetTextAlign( 6 );// center alignment
GfxSetTextColor( ParamColor("Text Color", ColorHSB( 42, 42, 42 ) ));

k = (GetPerformanceCounter()/100)%500;
printf("GetPerformance Counter %g",k);

GfxSetTextColor(colorBlack); 
GfxSelectFont("Arial Narrow", 15, 700 );
GfxTextOut("T O:    A M I B R O K E R   U S E R S   ",100+k ,5);

GfxSelectFont("Arial Narrow", 30, 700 );
GfxSetBkMode(1);
GfxSetTextColor(colorYellow);
GfxTextOut("       H A P P Y   N E W   Y E A R   2 0 1 2 . . .   M E R R Y   X ' M A S . . . .",100+k ,30);

GfxSelectFont("Arial Narrow", 12, 700 );
GfxTextOut("B I G   M O N E Y   O N   O U R   W A Y   N O W!!!    ",100+k ,68);
GfxTextOut("!!!!!!!!!!       Millions & Millions      !!!!!!!!!!!!!!!                             ",k ,88);

RequestTimedRefresh(1);
_SECTION_END();

_SECTION_BEGIN("Background text");
GfxSetBkMode(0); // transparent
GfxSelectFont("Tahoma", 7 );
GfxTextOut( "KH Tang", Status("pxwidth")/2, Status("pxheight")/1.5 );
GfxSelectFont("Tahoma", Status("pxheight")/20 );
Status("pxheight")/2 ;
//_SECTION_END();


anim=ColorHSB( ( k ) % 256, 255, Param("Brightness", 75, 0, 255, 1 ));
SetChartBkColor(anim);

XLogo = 15;
YLogo = Status("pxheight")-68;
GfxSelectPen(colorGold,2);
GfxSelectSolidBrush( colorYellow );
GfxCircle( Xlogo+14, Ylogo+14, 17 ) ;

GfxSelectFont("Aral", 13, 700 );
GfxSelectPen(colorBrown,2);
GfxSelectSolidBrush( colorGold);
GfxPolygon(    
            Xlogo +  11, Ylogo + 0.4,
            Xlogo + 14, Ylogo + 11.5,
            Xlogo + 17, Ylogo + 0.4,
            Xlogo + 20, Ylogo + 11.5,
            Xlogo + 27.4, Ylogo + 18.3,
            Xlogo + 17, Ylogo + 15.8    ,
            Xlogo + 24.3, Ylogo + 23.6,
            Xlogo + 14, Ylogo + 20.5,
            Xlogo +  3.7, Ylogo + 23.6,
            Xlogo + 11, Ylogo + 15.8   ,
            Xlogo + 0.6, Ylogo + 18.3,
            Xlogo + 8 ,  Ylogo +11.5
            );

GfxSetBkColor( colorYellow ) ;
GfxSetTextColor(colorRed);
GfxTextOut("GTS",28,Ylogo+35);

Title = "Bless You";


// <- End Here.

--------------------------------------- SEASON GREETING ---------------------------------------
Wishing all to achieve greater accomplishment in health, wealth and happiness in this NEW YEAR!

See…  There is nothing blocking the future!
And, the drawing is not in scale,
meaning that  the future could
be the next moment. J

Tidak ada komentar:

Posting Komentar