Cashfiesta чинь сардаа ойролцоогоор хэдэн оноо цуглуулж байна даа?

Миний cashfiesta сард 150 - 250 мянган оноо цуглуулдаг. Гэхдээ энэ оноог яг өөрөө цуглуулна гэвэл үлгэрийн далай болох юм байна лээ. Харин нэг жижигхэн програм хийгээд, тэр програм маань оноог тасралтгүй цуглуулахад тусалдаг юм. Зочин та миний өөрийн хийсэн тэр програмыг авахыг хүсвэл миний блогт comment дээр өөрийн мэйл хаягаа бичээрэй. Би ямар ч үнэ төлбөргүйгээр өгнө шүү. Та бүхэнд амжилт хүсье. Comment бичээрэй.
Read more...

Cashfiesta - д маань мөнгө нэмэгдсээр л ...

cashfiesta - д маань 11-р сард $9, 12-р сард 8 доллар орлоо. Нийтдээ 30 орчим доллартай болчихсон байгаа. Чек авахын тулд доод тал нь 50 доллартай байх хэрэгтэй. Нэгдүгээр сард 20 орчим доллар орно гэж найдаж байгаа. Хэрэвээ чек аваад чекээ бэлэн мөнгө болгоод үзчихвэл ч сайхан. Тэр мөчийг үзэхэд сар гаруй хугацаа үлдээд л байна даа. Энэ сардаа яагаад 20 доллар олно гээд найдаад байгаа вэ гэвэл нөгөө л нэг special offers-тэй холбоотой л доо. Өмнө нь дандаа нэг special offers - д бүртгүүлж чаддаг байсан /өөрөөр хэлбэл individual rate = 0.04/. Харин энэ сард 2 special offers авсан гэж найдаж байна /өөрөөр хэлбэл individual rate = 0.33$/. Энэ сарын individual rate нь дараа сарын сүүлээр батлагдаж оноогоо үржүүлдэг л дээ. Individual rate гэдэг нь таны цуглуулсан онооны 1000 оноо бүрт олгох долларын хэмжээ юм. Дараа сониноо бичнээ.
Read more...

Cashfiesta - гаар мөнгө олох

Монголчууд интернэтээр дүүрэн яг ийм cashfiesta-ийн сурталчилгаа хийсэн байх юм. Яг тэгээд үүнийгээ ашиглаад тэдэн доллар авлаа гэсэн юм нэг ч үгүй байх юм. Миний хувьд бүртгүүлээд 4 сар орчим болж байгаа. Одоо миний авах доллар $21 болчихсон байгаа. энэ сард дор хаяж 10 доллар олно гэдэгтээ итгэлтэй байгаа. Учир нь яаж special offer -д бүртгүүлэх аргаа олчихсон. Өмнөх сард $9 авсан. Мөн оноогоо цаг алдалгүй цуглуулах боломжтой програм зохиосон. Хүсвэл энэ програмыг та нарт үнэгүй өгч болно. Хамгийн гол нь та нар миний referal болох л хэрэгтэй. Би монголд анх удаа cashfiesta-гаас мөнгө авсан хүн болно гэдэгтээ итгэлтэй байгаа шүү. та бүхэнд амжилт хүсье. Http://mprogr.blogspot.com - руу зочилж дэлгэрэнгүй мэдээлэл аваарай
Read more...

Pascal дээрх график горим ба түүнтэй ажиллах №1

Сайн байна уу? Та бүхэнд энэ өдрийн мэнд хүргэе. Програмчлалын pascal хэл сонирхон судалж буй сурачидад болон хүүхэд залуучууддаа зориулан өөрийн мэддэг өчүүхэн зүйлсээ хуваалцахаар шийдлээ. Энэ удаадаа би та бүхэнд pascal-ийн стандарт биш график горимын талаар хэдэн зүйл сонирхуулъя.

1. График горим тогтоох

Procedure SetGraphMode(aMode: byte); Assembler;

Asm

Mov ah, 00

Mov al, aMode

Int 10h

End;

Энд байгаа процедур нь DOS-ийн дэлгэцийн стандарт горимуудыг тогтоох зориулалттай юм. Үүний aMode гэсэн аргументд дараах утгуудыг өгч болно. Үүнд:

Утга	Төрөл	Хэмжээс	Үсэг	Өнгө	Нэр	Хаяг
$0	Text	40x25	8x8	16	CGA,EGA	B800
$1	Text	40x25	8x8	16	CGA,EGA	B800
$2	Text	80x25	8x8	16	CGA,EGA	B800
$3	Text	80x25	8x8	16	CGA,EGA	B800
$4	Graphic	320x200	8x8	4	CGA,EGA	B800
$5	Graphic	320x200	8x8	4	CGA,EGA	B800
$6	Graphic	640x200	8x8	2	CGA,EGA	B800
$7	Text	80x25	9x14	16	MDA,EGA	B000
$d	Graphic	320x200	8x8	16	CGA,VGA	A000
$e	Graphic	640x200	8x8	16	CGA,VGA	A000
$f	Graphic	640x350	8x14	3	CGA,VGA	A000
$10	Graphic	640x350	8x14	4	CGA,VGA	A000
$11	Graphic	640x480	8x16	2	VGA	A000
$12	Graphic	640x480	8x16	16	VGA	A000
$13	Graphic	320x200	8x16	256	VGA	A000

Хүснэгтэд буй $0 - $13 гэж тэмдэглэгдсэн багана нь дээрх процедурын aMode гэсэн аргументд өгөх утга юм. $13 = 19 гэдгийг та нар мэдэх байхаа. $ гэсэн тэмдэг нь тухайн тоо 16тын тооллын системийнх гэсэн үг шүү дээ.

$13 горим нь тоглоом хийхэд хамгийн тохиромжтой нь гэж би боддог. Учир нь энэ хамгийн их өнгөтэйд л байгаа юм.

2. Дээрх горимуудаас график төрлийн горимуудыг ашиглан програм бичих гэж байгаа бол pascal хэлний стандарт GRAPH модулийн ямар ч функц ажиллахгүй. Тийм болохоор та бүхэнд дээрх горим дээр цэг зурах процедурыг хийж өгье.

Procedure MyPutPixel(x, y: integer; c: byte);

Begin

Mem[$a000: (x-1)+(y-1)*320] := c;

End;

Энд x, y нь зурах гэж буй цэгийн координат, c нь зурах цэгийн өнгө юм.

Өнөөдрийн хувьд энэ хүргээд дуусгая. Цайны цаг дуусчихлаа. Дараа үргэлжлүүлье.

Read more...