NEw Code Gambar Chatingan FB

Berikut merupakan kode-kode yang bisa di gunakan di chatingan / di pesan facebook
hanya perlu meng-copast-nya saja lalu letakan kode di bawah ini
untuk meng-copast-nya gunakan ( Ctrl + C )

XAT emoticon
[[xated]] = (xat)
[[xatpray]] = (pray)
[[xatredface]] = (redface)
[[xatmaniac]] = (maniac)
[[xatsmirk]] = (smirk)
[[xatshock]] = (shock)
[[xatmad]] = (mad)
[[xatxd]] = (xd)
[[xatcrying]] = (crying)
[[xatwary]] = (wary)

Kaskus
Kaskus Repost: [[243344945733611]]
Kaskus Maho: [[mahochat]]
Kaskus Bingung: [[205827876172490]]
Kaskus Like: [[261018420628968]]
Kaskus Nope: [[328740787138287]]
Kaksus Capedehh: [[296027833771776]]
Kaskus 4L4y: [[311851138846391]]
Kaskus Ngakak: [[guengakak]]
I Love Kaskus: [[203443053077888]]

Poker Face

[[258968244165876]] [[286666501379430]] [[262520713809098]] [[159049157536013]] [[307904395916212]]
[[225447050864310]] [[209926462425564]] [[138411019605305]] [[221670374577056]] [[154671737968862]]
[[138007062977844]] [[291747794194724]] [[122952454488304]] [[337561022923016]] [[288878907831075]]
[[240630206008013]] [[264223330304357]] [[319462458078703]] [[239286912807413]] [[288721814513254]]
[[265575850170635]] [[345354905481875]] [[209004679185391]] [[259785247417432]] [[159480014157666]]
[[267428346644787]] [[239034746168540]] [[350046018344350]] [[209260572491236]] [[198316980259626]]
[[310959705610393]] [[214054278676095]] [[200638253359905]] [[334455703231303]] [[158066514298630]]

U Mad
[[291152600919956]] [[295479677155336]] [[314363058604092]]
[[262834777109378]] [[189006671194968]] [[263319493729810]]
[[251236504943440]] [[287904934588441]] [[185961414833909]]


Nyan Cat

[[265434590178748]] [[164991926934921]] [[209695692449988]] [[250490361685507]] [[278968458819422]] [[349625665051383]] [[205760419511603]]
[[312189672135533]] [[299788346731384]] [[268532783202434]] [[266669970059695]] [[204170799672068]] [[187204144709527]] [[331078983588306]]
[[149240955184679]] [[206407216112871]] [[240669959335314]] [[180619528702085]] [[347768705240557]] [[186661331430535]] [[218646048216424]]
[[344875905539434]] [[328111047214223]] [[323186421038846]] [[157802940990663]] [[159535350818164]] [[296581710385765]] [[271261609598535]]

True Story

[[159403400834378]] [[297487363621407]] [[1156068411]] [[135921843188987]] [[281219301903813]] [[199562043466774]]
[[295738517127851]] [[155658844536513]] [[209549519130890]] [[142176999226854]] [[246689415397308]] [[199562043466774]]
[[238766052862259]] [[307299595976209]] [[217652968315422]] [[189042331191521]] [[286721874712929]] [[344476392245488]]
[[208520335900424]] [[280378908678680]] [[289772571069549]] [[271456079578545]] [[316530365035101]] [[288356997877538]]
[[291702580880362]] [[165637363538400]] [[150244831751625]] [[241130952627573]] [[120930761357725]] [[325867137432308]]
[[154842501286195]] [[286053358112869]] [[149316288510313]] [[250243511707871]] [[291635414215481]] [[344254632266885]]
[[276412539074685]] [[131586963624296]] [[333374550025341]] [[327570193933422]] [[199699430120687]] [[136021593179546]]

Kaskus

Kaskus Repost: [[243344945733611]]
Kaskus Maho: [[mahochat]]
Kaskus Bingung: [[205827876172490]]
Kaskus Like: [[261018420628968]]
Kaskus Nope: [[328740787138287]]
Kaksus Capedehh: [[296027833771776]]
Kaskus 4L4y: [[311851138846391]]
Kaskus Ngakak: [[guengakak]]
I Love Kaskus: [[203443053077888]]

Kartun

Troll face: [[171108522930776]]
Me Gusta: [[211782832186415]]
ARE YOU FUCKING KIDDING ME: [[143220739082110]]
Feel like a sir: [[1680408465586189]]
Not bad Obama: [[169919399735055]]
Mother of God: [[142670085793927]]
Cereal Guy: [[170815706323196]]
LOL Face: [[168456309878025]]
NO Guy: [[167359756658519]]
Yao Ming: [[14933336846417]]
Derp: [[224812970902314]]
Derpina: [[192644604154319]]
Forever Alone: [[177903015598419]]
It's Okay!: [[148578318584679]]
ALL the y: [[219611504753863]]
Impossibruh: [[305710872791586]]
Rage Face: [[145768898802324]]
Watch out, badass: [[309795212383816]]
Poker face: [[129627277060203]]
Justin Bieber: [[67253243887]]
Lady GaGa: [[ladygaga]]
Eminem: [[eminem]]
Mark Zuckerberg: [[zuck]]
FUCK YEAH: [[105387672833401]]
CHUCK NORRIS: [[161751797197606]]
POKER FACE: [[129627277060203]]
CHALLENGE ACCEPTED: [[100002727365206]]
Dislike Icon: [[139407806171115]]
Like Icon: [[333181686710881]]
Inverted Like Icon: [[180601488705317]]

Huruf

[[249199828481201]] - Konata Izumi
[[250128751720149]] - Domo Kun
[[223328504409723]] - Gintoki Sakata
[[236147243124900]] - Pokeball
[[326134990738733]] - Pikachu
[[155393057897143]] - Doraemon
[[224502284290679]] - Nobita
[[144685078974802]] - Mojacko
[[334954663181745]] - Spongebob
[[196431117116365]] - Shin chan
[[148935948523684]] - Pedo Bear
[[269153023141273]] - Poring

[[107015582669715]] = A
[[116067591741123]] = B
[[115602405121532]] = C
[[112542438763744]] = D
[[115430438474268]] = E
[[109225112442557]] = F
[[111532845537326]] = G
[[111356865552629]] = H
[[109294689102123]] = I
[[115636698451811]] = J
[[116651741681944]] = K
[[115807951764667]] = L
[[106596672714242]] = M
[[108634132504932]] = N
[[116564658357124]] = O
[[111669128857397]] = P
[[107061805996548]] = Q
[[106699962703083]] = R
[[115927268419031]] = S
[[112669162092780]] = T
[[108983579135532]] = U
[[107023745999320]] = V
[[106678406038354]] = W
[[116740548336581]] = X
[[112416755444217]] = Y

XAT emoticon

[[xated]] = (xat)
[[xatpray]] = (pray)
[[xatredface]] = (redface)
[[xatmaniac]] = (maniac)
[[xatsmirk]] = (smirk)
[[xatshock]] = (shock)
[[xatmad]] = (mad)
[[xatxd]] = (xd)
[[xatcrying]] = (crying)
[[xatwary]] = (wary) 

Code Chat FB dengan gambar

Berikut merupakan kode-kode yang bisa di gunakan di chatingan / di pesan facebook
hanya perlu meng-copast-nya saja lalu letakan kode di bawah ini ( setiap satu paragraph satu gambar )
untuk meng-copast-nya gunakan ( Ctrl + C )

[[204343736323493]] [[204343749656825]] [[204343762990157]] [[204343772990156]] [[204343802990153]] [[204343809656819]] [[204343826323484]]
[[204343836323483]] [[204343846323482]] [[204343862990147]] [[204343869656813]] [[204343882990145]] [[204343892990144]] [[204343906323476]]
[[204343919656808]] [[204343929656807]] [[204343939656806]] [[204343949656805]] [[204343956323471]] [[204343976323469]] [[204343982990135]]
[[204343996323467]] [[204344009656799]] [[204344022990131]] [[204344032990130]] [[204344042990129]] [[204344049656795]] [[204344059656794]]
[[204344069656793]] [[204344079656792]] [[204344089656791]] [[204344096323457]] [[204344102990123]] [[204344109656789]] [[204344129656787]]

[[293955833972970]] [[293955850639635]] [[293955873972966]] [[293955920639628]] [[293956017306285]]
[[293956043972949]] [[293956060639614]] [[293956087306278]] [[293956100639610]] [[293956107306276]]
[[293956117306275]] [[293956127306274]] [[293956147306272]] [[293956220639598]] [[293956283972925]]
[[293956303972923]] [[293956327306254]] [[293956350639585]] [[293956370639583]] [[293956450639575]]
[[293956570639563]] [[293956620639558]] [[293956677306219]] [[293956710639549]] [[293956767306210]]

[[190350121060720]] [[190350151060717]] [[190350224394043]] [[190350264394039]] [[190350274394038]] [[190350321060700]] [[190350337727365]]
[[190350524394013]] [[190350544394011]] [[190350651060667]] [[190350811060651]] [[190350824393983]] [[190350837727315]] [[190350851060647]]
[[190351834393882]] [[190351844393881]] [[190354824393583]] [[190354847726914]] [[190354857726913]] [[190356574393408]]
[[190357747726624]] [[190357764393289]] [[190357774393288]] [[190359411059791]] [[190359441059788]] [[190359467726452]]
[[190365544392511]] [[190368041058928]] [[190368054392260]] [[190368067725592]] [[190370207725378]] [[190370234392042]]
[[190370834391982]] [[190370844391981]] [[190373951058337]] [[190373964391669]] [[190373981058334]] [[190373987725000]]
[[190374151058317]] [[190374177724981]] [[190374184391647]] [[190374207724978]] [[190374234391642]] [[190374251058307]]
[[190374704391595]] [[190374731058259]] [[190374761058256]] [[190374781058254]] [[190374787724920]] [[190374814391584]]

[[272107609513061]] [[272107626179726]] [[272107646179724]] [[272107652846390]]
[[272107682846387]] [[272107706179718]] [[272107716179717]] [[272107726179716]]
[[272107736179715]] [[272107752846380]] [[272107769513045]] [[272107782846377]]
[[272107796179709]] [[272107809513041]] [[272107826179706]] [[272107832846372]]
[[272107852846370]] [[272107866179702]] [[272107882846367]] [[272107892846366]]

[[204330862991447]] [[204330879658112]] [[204330892991444]] [[204330902991443]] [[204330916324775]] [[204330946324772]] [[204330952991438]]
[[204330976324769]] [[204330982991435]] [[204330999658100]] [[204331016324765]] [[204331029658097]] [[204331036324763]] [[204331049658095]]
[[204331059658094]] [[204331072991426]] [[204331096324757]] [[204331109658089]] [[204331139658086]] [[204331156324751]] [[204331166324750]]
[[204331182991415]] [[204331202991413]] [[204331219658078]] [[204331239658076]] [[204331249658075]] [[204331266324740]] [[204331289658071]]
[[204331312991402]] [[204331319658068]] [[204331329658067]] [[204331359658064]] [[204331366324730]] [[204331376324729]] [[204331389658061]]
[[204331402991393]] [[204331409658059]] [[204331422991391]] [[204331432991390]] [[204331439658056]] [[204331459658054]] [[204331472991386]]
[[204331489658051]] [[204331509658049]] [[204331532991380]] [[204331559658044]] [[204331569658043]] [[204331596324707]] [[204331606324706]]

[[272154016175087]] [[272154026175086]] [[272154039508418]] [[272154062841749]] [[272154082841747]]
[[272154092841746]] [[272154102841745]] [[272154122841743]] [[272154132841742]] [[272154149508407]]
[[272154162841739]] [[272154176175071]] [[272154196175069]] [[272154222841733]] [[272154242841731]]
[[272154252841730]] [[272154272841728]] [[272154286175060]] [[272154296175059]] [[272154306175058]]
[[272154312841724]] [[272154329508389]] [[272154346175054]] [[272154372841718]] [[272154386175050]]

[[307295845975253]] [[307295885975249]] [[307295925975245]] [[307295955975242]]
[[307295969308574]] [[307295975975240]] [[307295999308571]] [[307296002641904]]
[[307296019308569]] [[307296035975234]] [[307296042641900]] [[307296055975232]]
[[307296069308564]] [[307296082641896]] [[307296119308559]] [[307296129308558]]

[[291245247589152]] [[291245257589151]] [[291245274255816]] [[291245314255812]]
[[291245350922475]] [[291245370922473]] [[291245404255803]] [[291245440922466]]
[[291245480922462]] [[291245500922460]] [[291245537589123]] [[291245550922455]]
[[291245580922452]] [[291245587589118]] [[291245597589117]] [[291245607589116]] [[291245620922448]]
[[291245644255779]] [[291245660922444]] [[291245670922443]] [[291245697589107]] [[291245720922438]]

[[221104937969051]] [[221104957969049]] [[221104991302379]] [[221104997969045]] [[221105011302377]]
[[221105024635709]] [[221105037969041]] [[221105047969040]] [[221105074635704]] [[221105084635703]]
[[221105101302368]] [[221105117969033]] [[221105147969030]] [[221105157969029]] [[221105177969027]]
[[221105197969025]] [[221105211302357]] [[221105221302356]] [[221105227969022]] [[221105237969021]]
[[221105244635687]] [[221105264635685]] [[221105287969016]] [[221105297969015]] [[221105317969013]]

[[123764421074410]] [[123764441074408]] [[123764451074407]] [[123764517741067]] [[123764554407730]]
[[123764637741055]] [[123764724407713]] [[123764781074374]] [[123764937741025]] [[123765254407660]]
[[123765407740978]] [[123765637740955]] [[123765704407615]] [[123765727740946]] [[123765781074274]]
[[123765797740939]] [[123765824407603]] [[123765861074266]] [[123765877740931]] [[123765947740924]]
[[123766297740889]] [[123766354407550]] [[123766367740882]] [[123766634407522]] [[123766867740832]]
[[123767124407473]] [[123767144407471]] [[123767187740800]] [[123767204407465]] [[123764404407745]]

[[299222763453370]] [[299222783453368]] [[299222806786699]] [[299222823453364]] [[299222853453361]] [[299222866786693]]
[[299222893453357]] [[299222903453356]] [[299222930120020]] [[299222940120019]] [[299222960120017]] [[299222976786682]]
[[299223000120013]] [[299223016786678]] [[299223033453343]] [[299223043453342]] [[299223056786674]] [[299223070120006]]
[[299223083453338]] [[299223090120004]] [[299223096786670]] [[299223113453335]] [[299223126786667]] [[299223136786666]]
[[299223143453332]] [[299223166786663]] [[299223193453327]] [[299223210119992]] [[299223220119991]] [[299223230119990]]
[[299223246786655]] [[299223270119986]] [[299223280119985]] [[299223290119984]] [[299223300119983]] [[299223313453315]]
[[299223323453314]] [[299223333453313]] [[299223346786645]] [[299223366786643]] [[299223393453307]] [[299223426786637]]

[[257907414276164]] [[257907440942828]] [[257907477609491]] [[257907520942820]]
[[257907537609485]] [[257907564276149]] [[257907590942813]] [[257907634276142]]
[[257907660942806]] [[257907707609468]] [[257907734276132]] [[257907750942797]]
[[257907780942794]] [[257907817609457]] [[257907837609455]] [[257907854276120]]

[[340157292664068]] [[340157419330722]] [[340157545997376]] [[340157642664033]]
[[340157765997354]] [[340157832664014]] [[340157982663999]] [[340158089330655]]
[[340158192663978]] [[340158359330628]] [[340158465997284]] [[340158662663931]]
[[340158799330584]] [[340158889330575]] [[340158992663898]] [[340159119330552]]

[[156370584471944]] [[156370594471943]] [[156370604471942]] [[156370614471941]]
[[156370617805274]] [[156370627805273]] [[156370634471939]] [[156370657805270]]
[[156370667805269]] [[156370681138601]] [[156370684471934]] [[156370697805266]]
[[156370704471932]] [[156370707805265]] [[156370721138597]] [[156370744471928]]

[[343042792392125]] [[343042812392123]] [[343042825725455]] [[343042842392120]]
[[343043192392085]] [[343043205725417]] [[343043749058696]] [[343043769058694]]
[[343043779058693]] [[343043789058692]] [[343044105725327]] [[343044119058659]]
[[343044129058658]] [[343044345725303]] [[343044365725301]] [[343044372391967]]

[[302707326432479]] [[302707343099144]] [[302707349765810]] [[302707356432476]] [[302707359765809]]
[[302707366432475]] [[302707369765808]] [[302707379765807]] [[302707386432473]] [[302707396432472]]
[[302707403099138]] [[302707413099137]] [[302707419765803]] [[302707436432468]] [[302707443099134]]

[[357847504241529]] [[357847507574862]] [[357847514241528]] [[357847500908196]] [[357847510908195]] [[357847600908186]]
[[357847604241519]] [[357847597574853]] [[357847610908185]] [[357847607574852]] [[357847667574846]] [[357847670908179]]
[[357847674241512]] [[357847680908178]] [[357847677574845]] [[357847737574839]] [[357847747574838]] [[357847744241505]]
[[357847740908172]] [[357847750908171]] [[357847830908163]] [[357847824241497]] [[357847827574830]] [[357847834241496]]
[[357847837574829]] [[357847897574823]] [[357847894241490]] [[357847890908157]] [[357847900908156]] [[357847907574822]]

[[335493329807697]] [[335493339807696]] [[335493326474364]] [[335493333141030]]
[[335493336474363]] [[335493416474355]] [[335493419807688]] [[335493426474354]]
[[335493423141021]] [[335493433141020]] [[335493479807682]] [[335493483141015]]
[[335493489807681]] [[335493476474349]] [[335493486474348]] [[335493563141007]]
[[335493553141008]] [[335493556474341]] [[335493566474340]] [[335493559807674]]
[[335493676474329]] [[335493673140996]] [[335493669807663]] [[335493679807662]]

[[208635959230501]] [[208635949230502]] [[208635945897169]] [[208635955897168]] [[208635952563835]]
[[208636055897158]] [[208636049230492]] [[208636045897159]] [[208636052563825]] [[208636059230491]]
[[208636109230486]] [[208636105897153]] [[208636112563819]] [[208636115897152]] [[208636122563818]]
[[208636175897146]] [[208636185897145]] [[208636182563812]] [[208636189230478]] [[208636179230479]]
[[208636262563804]] [[208636275897136]] [[208636265897137]] [[208636272563803]] [[208636269230470]]
[[208636355897128]] [[208636352563795]] [[208636349230462]] [[208636359230461]] [[208636362563794]]

[[279727958747088]] [[279727955413755]] [[279727965413754]] [[279727968747087]] [[279727962080421]]
[[279728042080413]] [[279728045413746]] [[279728048747079]] [[279728055413745]] [[279728052080412]]
[[279728112080406]] [[279728105413740]] [[279728108747073]] [[279728115413739]] [[279728118747072]]
[[279728168747067]] [[279728175413733]] [[279728172080400]] [[279728162080401]] [[279728165413734]]
[[279728252080392]] [[279728245413726]] [[279728255413725]] [[279728258747058]] [[279728248747059]]
[[279728315413719]] [[279728312080386]] [[279728318747052]] [[279728305413720]] [[279728308747053]]

[[332913536739261]] [[332913540072594]] [[332913546739260]] [[332913533405928]] [[332913543405927]] [[332913640072584]]
[[332913633405918]] [[332913626739252]] [[332913630072585]] [[332913636739251]] [[332913696739245]] [[332913700072578]]
[[332913693405912]] [[332913686739246]] [[332913690072579]] [[332913740072574]] [[332913750072573]] [[332913743405907]]
[[332913753405906]] [[332913746739240]] [[332913846739230]] [[332913843405897]] [[332913840072564]] [[332913850072563]]
[[332913853405896]] [[332913916739223]] [[332913913405890]] [[332913920072556]] [[332913923405889]] [[332913930072555]]
[[332913976739217]] [[332913973405884]] [[332913970072551]] [[332913980072550]] [[332913983405883]] [[332914030072545]]

[[281481948577141]] [[281481975243805]] [[281481991910470]] [[281482018577134]] [[281482041910465]] [[281482058577130]]
[[281482075243795]] [[281482108577125]] [[281482201910449]] [[281482225243780]] [[281482241910445]] [[281482265243776]]
[[281482291910440]] [[281482321910437]] [[281482381910431]] [[281482398577096]] [[281482421910427]] [[281482478577088]]
[[281482505243752]] [[281482515243751]] [[281482551910414]] [[281482571910412]] [[281482601910409]] [[281482611910408]]
[[281482645243738]] [[281482651910404]] [[281482681910401]] [[281482701910399]] [[281482721910397]] [[281482738577062]]
  

PERTEMUAN 4 PERCABANGAN IF DAN CASE

Percabangan (penyeleksian kondisi) merupakan operator yang digunakan untuk menentukan pilihan terhadap beberapa pilihan yang ada.

1. Percabangan IF

a.  Stuktur IF Tunggal

If Syarat then hasil;

If  nilai>80 then keterangan=’Lulus’;

b.  Struktur IF majemuk

If Syarat1 then             

Hasil1                            

Else                           

If Syarat2 then             

Hasil2                        

Else                             

...................               

...................               

end;

2. Percabangan Case

Struktur :                                           Struktur :                      

Case <variabel> of                              Case  <variabel> of

          <pilihanke1>; hasil1;                <pilihanke1>; hasil1;

          <pilihanke2>; hasil2;                <pilihanke2>; hasil2;

          <pilihanke3>; hasil3;                <pilihanke3>; hasil3;

          ..................................              ..................................

          <pilihanke4>; hasiln;                else

end;                                                   hasiln;

                                                          end;

Catatan :

1.    Nilai harus berupa data ordinal (bilangan bulat, karakter, atau boolean)

2.    Tipe data string dan real tidak bisa digunakan

3.    Bagian else digunakan jika nilai tidak terpenuhi pada salah satu kondisi diatasnya.

                   

1.   Design Form       


                                    
2. Ketentuan : 

JABATAN	GAJI POKOK
Direktur	5000000
Manager	3000000
Karyawan	1000000

3.   Listing program

procedure TForm2.FormCreate(Sender: TObject);

begin

cjabatan.Items.Add('Direktur');

cjabatan.Items.Add('Manager');

cjabatan.Items.Add('Karyawan');

end;

Ø  Untuk mencari gaji pokok

1.    Aktifkan combobox untuk jabatan

2.   Pada jendela properties pilih event, pilih dan aktifkan onclick

3.    Double klik pada combo onclick

4.    Ketikkan listing berikut :

procedure TForm2.cjabatanClick(Sender: TObject);

begin

if cjabatan.Text='Direktur' then

  epokok.Text:='5000000' else

if cjabatan.Text='Manager' then

  epokok.Text:='2000000' else

if cjabatan.Text='Karyawan' then

  epokok.Text:='1000000' else

  epokok.Text:='0'

end;

Ø  Untuk menghitung Tunjangan Karyawan

procedure TForm2.rtetapClick(Sender: TObject);

var

a,hasil:real;

begin

if rtetap.Checked=true then

a:=strtofloat(epokok.Text);

hasil:=a*0.3;

etunjangan.Text:=floattostr(hasil)

end;

procedure TForm2.blagiClick(Sender: TObject);

begin

cjabatan.Text:='Jabatan';

enama.Text:='';

ebersih.Text:='0';

etunjangan.Text:='0';

epokok.Text:='0';

rtetap.Checked:=false;

rhonorer.Checked:=false;

end;

procedure TForm2.rhonorerClick(Sender: TObject);

var

a,hasil:real;

begin

if rhonorer.Checked=true then

a:=strtofloat(epokok.Text);

hasil:=a*0.1;

etunjangan.Text:=floattostr(hasil)

end;

Ø  Menghitung gaji bersih

procedure TForm2.btotalClick(Sender: TObject);

var

a,b,c:real;

begin

a:=strtofloat(epokok.Text);

b:=strtofloat(etunjangan.Text);

c:=a+b;

ebersih.Text:=floattostr(c);

end;

PERCABANGAN CASE                Gunakan objek RadioGroup dan rubah :

  - ItemIndex= 0

  - Items = Jakarta, Yogyakarta, Surabaya

procedure TForm3.BcariClick(Sender: TObject);

begin

case radiogroup1.ItemIndex of

0:eharga.Text:='10000';

1:eharga.Text:='15000';

2:eharga.Text:='20000';

else

eharga.Text:='0';

end

LATIHAN :        

                            Ketentuan Soal :

Kode Dokter	Nama Dokter	Spesialis	Biaya Periksa
DRJ01	PRIANTI	Jantung	2000000
DRA02	RAMADHANI	Anak	150000
DRM03	NIA	Mata	1000000

Gunakan Fungsi IF

Total bayar : harga obat + biaya periksa

Uang bayar diinput, uang kembali muncul otomatis.

Sumber www.khnbsi.blogspot.com

Cara Ampuh dapet ribuan backlink

Cara ini saya baca ketika berkunjung di blognya sahabat, kemudian saya lihat widget alexa yang terpampang di sidebar blognya. Woowww…. backlinknya banyak sekali, hingga puluhan ribu. Sudah lama sebenarnya saya menemukan posting seperti ini, namun dulu saya sanksi apakah benar cara ini bisa berhasil menaikkan PR dan backlink. Setelah saya membacanya kembali dan masih kurang yakin atas backlink yang saya lihat di alexa-nya sayapun kembali agi mengunjungi blog-blog yang telah mengikuti cara ini. Dan ternyata benar, blog-blog yang menerapkan cara ini PR meningkat namun yang paling menonjol adalah backlink yang dimiliki blog-blog tersebut sungguh banyak sekali.

Jika kita memiliki PR yang bagus dan backlink yang banyak, maka sangat cocok jika kita ikut program semacam paid reviews. Saya sungguh menyesal tidak menerapkan cara ini sejak dulu. Lebih baik terlambat daripada tidak sama sekali. Karna saya ingin memoneytizekan blog ini ke program paid reviews.

Caranya sangatlah gampang, anda hanya tinggal copy link yang berada di bawah ini dengan syarat anda harus menghapus link pada peringkat 1 dari daftar, lalu pindahkan yang tadinya nomor 2 menjadi nomor 1, nomor 3 menjadi nomor 2, nomor 4 menjadi nomor 3, dst. Kemudian masukan link blog anda sendiri pada urutan paling bawah ( nomor 10). Dan silahkan ajak teman anda untuk mengikuti cara ini serta sebarkan cara ini ke sebanyak-banyaknya teman anda.

1. ilmu-kompi

2. alfacroon

3. Trik-Gue

4. Pabrik Info

5. WordPress Paper’s

6. bootingskoBlog

7. Rajwa Info

8. Backlink Gratis

9.Auriga Maulana Khasan

10. Hafidz Jabar

Keterangan:

Jika anda mampu mengajak lima orang saja untuk mengcopy artikel ini, maka jumlah backlink yang akan didapat adalah:

* Posisi 10, jumlah backlink = 1

* Posisi 9, jumlah backlink = 5

* Posisi 8, jumlah backlink = 25

* Posisi 7, jumlah backlink = 125

* Posisi 6, jumlah backlink = 625

* Posisi 5, jumlah backlink = 3,125

* Posisi 4, jumlah backlink =15,625

* Posisi 3, jumlah backlink = 78,125

* Posisi 2, jumlah backlink = 390,625

* Posisi 1, jumlah backlink = 1,953,125

Dan nama dari alamat blog dapat dimasukan kata kunci yang anda inginkan yang juga dapat menarik perhatian untuk segera diklik. Dari sisi SEO anda sudah mendapatkan 1,953,125 backlink dan efek sampingnya jika pengunjung downline mengklik link anda maka anda juga mendapat traffic tambahan.

Saya sarankan anda mencoba cara ini dan silakan copy sebarkan artikel ini ke teman-teman anda. Hilangkan link nomor 1 dan masukan alamat blog anda pada nomor 10. Buktikan sendiri hasilnya setelah itu baru kementar.

Peringatan:

Artikel ini harus permanen selamanya di blog anda, dan Anda harus Jujur dalam menaruh Link Blogger yang telah lebih dulu ada, serta Anda pun tidak boleh menghapus Artikel ini dari Blog Anda…

Berani Mencoba??? Silahkan Copy – Paste Artikel ini, dan selamat merasakan sensasi nya diBlog Anda….

sumber: http://rajwarafi.wordpress.com/

PERTEMUAN 3 Lab G

Operator String

1.   Design Form

2.   Listing Program

procedure TForm1.bgabungClick(Sender: TObject);

var

depan:string[20];

tengah:string[20];

blkg:string[20];

gabung:string[80];

begin

depan:=edepan.Text;

tengah:=etengah.Text;

blkg:=eblkg.Text;

gabung:=depan+' '+tengah+' '+blkg;

elengkap.Text:=gabung;

end;

procedure TForm1.bhitungClick(Sender: TObject);

var

nama:string;

begin

nama:=elengkap.Text;

elength.Text:=inttostr(length(nama));

end;

procedure TForm1.bhapusClick(Sender: TObject);

var

karakter:string;

pos,jumlah:integer;

begin

karakter:=elengkap.Text;

pos:=strtoint(eurut.Text);

jumlah:=strtoint(ejml.Text);

delete(karakter,pos,jumlah);

ehasil.Text:=karakter;

end;

procedure TForm1.bkeluarClick(Sender: TObject);

begin

close;

end;

PERTEMUAN 1 & 2 BORLAND DELPHI Lab L

A.       Mengaktifkan Delphi

Start => All Programs => Pilih Borland Delphi 7 => Pilih Delphi 7

Akan tampil Jendela Utama Delphi seperti dibawah ini :

B.  Komponen Pallete

C.       Merancang Form

LATIHAN 1

1.     Desain Form seperti di bawah ini

2.      Ubah Propertiesnya pada Object Inspector

Object	Name	Caption
Label1	Label1	PROGRAM PERKENALAN
Label2	Label2	Nama :
Label3	Label3	Alamat :
Edit1	Enama	Text : (Hapus aja)
Edit2	Ealamat	Text : (Hapus aja)
Button1	Bkenal	&Kenal
Button2	Bclose	&Close

3.    Isikan Listing berikut ini

procedure TForm1.BkenalClick(Sender: TObject);

begin

  enama.Text:='Nama Kalian';

  ealamat.Text:='Alamat Kalian';

end;

LATIHAN 2
Penggunaan operator aritmatika pada Delphi 

Object	Name	Caption
Label1	Label1	Program Pengenalan  Dasar  Operator dalam Delphi
Label2	Label2	Nilai 1
Label3	Label3	Nilai 2
Label4	Label4	HasiL
Edit1	Enil1
Edit2	Enil2
Edit3	Enil3
Button1	bkali	x
Button2	bbagi	/
Button3	btambah	+
Button4	bkurang	-
Button5	bdiv	div
Button6	bmod	mod
Button7	bbersih	&Bersih
Button8	bkeluar	&Keluar

Listing Program :

1. procedure TForm2.bbersihClick(Sender: TObject);

begin

enil1.Text:='';

enil2.Text:='';

enil3.Text:='';

end;

2. procedure TForm2.bkaliClick(Sender: TObject);

var

  a,b,c:real;

begin

  a:=strtofloat(enil1.Text);

  b:=strtofloat(enil2.Text);

  c:=a*b;

  enil3.Text:=floattostr(c);

end;

3. procedure TForm2.bbagiClick(Sender: TObject);

     var

  a,b,c:real;

begin

  a:=strtofloat(enil1.Text);

  b:=strtofloat(enil2.Text);

  c:=a/b;

  enil3.Text:=floattostr(c);

end;

4. procedure TForm2.btambahClick(Sender: TObject);

     var

a,b,c:integer;

begin

a:=strtoint(enil1.Text);

b:=strtoint(enil2.Text);

c:= a+b;

enil3.Text:=inttostr(c);

end;

5. procedure TForm2.bkurangClick(Sender: TObject);

begin

    enil3.Text:=floattostr(strtofloat(enil1.Text)-strtofloat(enil2.Text));

end;

6. procedure TForm2.bdivClick(Sender: TObject);

var

a,b,c:integer;

begin

a:=strtoint(enil1.Text);

b:=strtoint(enil2.Text);

c:= a div b;

enil3.Text:=inttostr(c);

end;

7. procedure TForm2.bmodClick(Sender: TObject);

            var

a,b,c:integer;

begin

a:=strtoint(enil1.Text);

b:=strtoint(enil2.Text);

c:= a mod b;

enil3.Text:=inttostr(c);

end;

end.

8. procedure TForm2.bkeluarClick(Sender: TObject);

begin

if(application.MessageBox('Yakin Anda akan   keluar dari program?','Informasi',

MB_YESNO)=IDYES)then

close

             end;

end.

Latihan 3

Objek	Name	Caption
Edit1	Eabsen
Edit2	Etugas
Edit3	Euts
Edit4	Euas
Edit5	Emurni
Button1	Bhitung	&Hitung
Button2	Bbersih	&Bersih
Button3	Bkeluar	&Keluar

Ketentuan Soal:

1.Nilai Murni : Absensi 10%+Tugas 20%+UTS 30%+UAS 40%

2.Jika Button Keluar di klik maka akan tampil pesan berikut :