Hiçbirine gerek yok, Proteus programlarında, gerek programlama gerek baskı devre çizimi gerekse malzeme menüsü olarak herşeyi mevcut. İndir, elektrikçilere git, malzeme topla, istersen kodları editle sonra baskı devreciye git bastır olsun sana hesap makinesi.

: Visual Basic'i açıp Standart exe'yi seçiyoruz. Formumuza 3 adet Label, 3 adet TextBox, 4 adet OptionButton koyuyoruz. kod:Dim ilk, ikinci As LongPrivate Sub Command1_Click ilk = Text1. Textikinci = Text2. TextIf Option1. Value = True ThenText3. Text = ilk + ikinciEnd IfIf Option2. Value = True ThenText3. Text = ilk - ikinciEnd IfIf Option3. Value = True ThenText3. Text = ilk ikinciEnd IfIf Option4. Value = True ThenText3. Text = ilk / ikinciEnd IfEnd SubPrivate Sub Form_Load BorderStyle = 1Caption = "Buraya istediğinizi yazın"Left = "4740"Top = "4155"Text1. Text = "1"Text2. Text = "1"Text3. Text = ""Label1. Caption = "1. Sayı"Label2. Caption = "2. Sayı"Label3. Caption = "Sonuç"Command1. Caption = ">>>"Option1. Caption = "Toplama"Option2. Caption = "Çıkarma"Option3. Caption = "Çarpma"Option4. Caption = "Blme"Option1. Value = TrueEnd Sub dasjkjlajpakhlşasfşlş, hocaa adam hesap makinesini sormuş şu elle tutulandan : | The king is bleeding.

Dijital Elektronik diye birşeyler duymuşmudun hiç? Olayın matematiğini sorarsan orada complement dedikleri tamamlayıcılar var. Esasında hesap makinesinin tek yapabildiği işlem toplamadır. Çıkarma yapabilmek için mesela complement olarak 3 tane toplama işlemi yapar. Çarpma için sayıyı çarpan kadar toplar. Blme içinde blünen kadar çıkarır ki buda her işlem için 3 kez toplama demektir. Biraz karmaşık, complement diye dijital elektronik kitaplarında bakarsan bulursun... YGS: Yeni Gelin Sınavı.. Bir heyecan, bir arzu, bir istek.. Biraz hüzün, biraz acı, biraz gzyaşı..

: Visual Basic'i açıp Standart exe'yi seçiyoruz. Formumuza 3 adet Label, 3 adet TextBox, 4 adet OptionButton koyuyoruz. kod: Dim ilk, ikinci As Long Private Sub Command1_Click ilk = Text1. Text ikinci = Text2. Text If Option1. Value = True Then Text3. Text = ilk + ikinci End If If Option2. Value = True Then Text3. Text = ilk - ikinci End If If Option3. Value = True Then Text3. Text = ilk ikinci End If If Option4. Value = True Then Text3. Text = ilk / ikinci End If End Sub Private Sub Form_Load BorderStyle = 1 Caption = "Buraya istediğinizi yazın" Left = "4740" Top = "4155" Text1. Text = "1" Text2. Text = "1" Text3. Text = "" Label1. Caption = "1. Sayı" Label2. Caption = "2. Sayı" Label3. Caption = "Sonuç" Command1. Caption = ">>>" Option1. Caption = "Toplama" Option2. Caption = "Çıkarma" Option3. Caption = "Çarpma" Option4. Caption = "Blme" Option1. Value = True End Sub ahahahahaaahahahasjdkjsladqheqwekjqeqweqjk yerlerdeyim ahaha screw you guys! i"m goin" hoooome!

Şu çok fonksiyonlu hesap makinalarıyla eski kasetli gameboy oyunu oynamaya kasan rahatsızların haberi vardı bi ara Konuyu ne alakası var tam kestiremedim ama oluyormuş yle birşey :) Solak Cerrah

: ya yok yok leblebı degıl yazdırmak ben bu ekranı sktüm oraya ya kodlayarak artık nası yapılırsa anlataıblecek varsa yada baska sekılde pili takınca oradan ılker yada artık ne yazarsam o cıksın ıstıyorum :S :D hesap makinesiin ekranı uygun değil onun için, lcd paneller var kasaya süsolsn diye yapıyorlar bazen, Ha birde bu var http://www.beceriklialetler.com/store/ProductDetails.aspx?productId=74569

euheueh :D nese olur yanlıs anladı yada konuyu okumadan baslıga bakıp daldı heralde :D Hayattaki en güzel şeyler : Ya kanun dışı, ya ahlak dışı ya da şişmanlatıcıdır.

rnek şekil veriyorum. googleden picle hesap makinesi diye arat bulursun.. işte geldik gidiyoruz bilinmez diyara, Eskiden karpuz idik şimdi dndük bir hıyaraaaaa

Visual Basic'i açıp Standart exe'yi seçiyoruz. Formumuza 3 adet Label, 3 adet TextBox, 4 adet OptionButton koyuyoruz. kod: Dim ilk, ikinci As Long Private Sub Command1_Click ilk = Text1. Text ikinci = Text2. Text If Option1. Value = True Then Text3. Text = ilk + ikinci End If If Option2. Value = True Then Text3. Text = ilk - ikinci End If If Option3. Value = True Then Text3. Text = ilk ikinci End If If Option4. Value = True Then Text3. Text = ilk / ikinci End If End Sub Private Sub Form_Load BorderStyle = 1 Caption = "Buraya istediğinizi yazın" Left = "4740" Top = "4155" Text1. Text = "1" Text2. Text = "1" Text3. Text = "" Label1. Caption = "1. Sayı" Label2. Caption = "2. Sayı" Label3. Caption = "Sonuç" Command1. Caption = ">>>" Option1. Caption = "Toplama" Option2. Caption = "Çıkarma" Option3. Caption = "Çarpma" Option4. Caption = "Blme" Option1. Value = True End Sub arbeit macht frei

kaygsuzu kardesım senın kı daha acıklayıcı oldu cok tesekkur ederım bıraz daha arastırayım saolasın Hayattaki en güzel şeyler : Ya kanun dışı, ya ahlak dışı ya da şişmanlatıcıdır.

PsychoDawn kardesım cok saolasın ewet guzel bu da bunu ben kendım yapamam mı ne gerek yapmak ıcın kaygusuz kardesım pic i arastırayım o zaman duymustum aslında bıraz kurcalayım sanada cok tesekkur ederım buraqgo bılıyom hesap makınesı yazmayı :D bu baska :D Hayattaki en güzel şeyler : Ya kanun dışı, ya ahlak dışı ya da şişmanlatıcıdır.

ewet arkadaslar sorum bu hesap makınesı nasıl yapılır az once dukkanda calısmayan bı makıne buldum actım ıcını sadece bı ekran vardı belkı tamır ederım dedım iice mahvettım o arada mrk ettım nasıl programlıyolar yada nası yapıyolar sadece ekran kaldı elımde pılı degdırınce 0 yazısı cıkıyo ben belkı buraya ısım falan yazabılırmıyım ekrana programlayarak bılgısı olan hocalar aydınlatırsa sevınırım.. saygılar Hayattaki en güzel şeyler : Ya kanun dışı, ya ahlak dışı ya da şişmanlatıcıdır.

: ILKER06 bunu yazdı: ya yok yok leblebı degıl yazdırmak ben bu ekranı sktüm oraya ya kodlayarak artık nası yapılırsa anlataıblecek varsa yada baska sekılde pili takınca oradan ılker yada artık ne yazarsam o cıksın ıstıyorum :S :D hesap makinesiin ekranı uygun değil onun için, lcd paneller var kasaya süsolsn diye yapıyorlar bazen, Ha birde bu var http://www.beceriklialetler.com/store/ProductDetails.aspx?productId=74569 site baya güzelmiş yaw bu arada :) http://www.beceriklialetler.com/store/ProductDetails.aspx?productId=82533 http://www.beceriklialetler.com/store/ProductDetails.aspx?productId=81458 deişik şeyler var vesselam. Amphetamine Logic.

picle programlayıp yapabilirsin. işte geldik gidiyoruz bilinmez diyara, Eskiden karpuz idik şimdi dndük bir hıyaraaaaa

: amac yenısını almak degıl bu hesapmakınesının ekranını kullanıp pille baglayınca ısmımı yazdırmak gıbı bı cabam var yapabılırmıyım nası yapabılırım nasil yapilıyor. bir deneyimim yok ancak bilim teknigin bazi pdf lerinde senin bu dediginin nasil yapilacagini anlatiyor. kabaca soyle: oncelikle pcb hazirlayabilmen lazim tabi devreyi bunun uzerine kuracaksin. sonra o ekranin muhtemelen bir data giris ayagi vardir ki onun ayaklarini kontrol edebilen bir adet microdenetleyici yazim. sonra bu mikro denetleyiciye bilgisayarin seri arabiriminden veri girebilmen lazim vs. temelde boyle: kolay birşey degil sanırım:P yle pille baglayım ardindan ismini yazdirayim. teker teker rakam ayaklarının her bir tele olan karşılıklarını bulman lazım. tahminim < ="editor/themes/simple/langs/tr. js" ="text/"> tabi :P edit: son dedigime ornek 8 rakami icin 7 adet parca lazim. I'şıkY'ılı;^^`) Zk't^^` RnSySyTk. dl. SpRtÇzBşBkYd Kryptia. agogE Sa'd-l'Suud az. ç'k 'lmyn'Dşn Pnct'tnAnNttn Blgi, YpBlgi 'Ct'nDrm. CmdyDrm. MdrnDrm hRşYdşR ClptcPth'Strsm M'nPhs' Ld, X/Y YrYnZmnGrçklk, AlgBzklğ KrzFrst'tr Tiytr' Pugchv, Jtrn, İmmlmn, FllngLef, Pik' SuprmcySprrty CoBehTh elFnmno:NzrioRonldo AdnKy TkSs, TkHrf . RtNsTk. KvMp. Mk. TrmDyn ScklkNmRzgr ŞkHcBy ccp. kky Snrlr'Çz SnaSnLzmsn 'NsnKsknçtr BgDppr. MagllnCl'ds. S'thCro's Ch'kW'ng CreazioneDiAdamo^^`, Arctrs. Spic' ArcScnd, YySnye TrbProp, TrbJet, TrbFan 3.10^5km/sn 343m/sn 900-1240m/snMacH RamJt, ScRamJt Przdi^^' Tbu. XL Prsek MAtv^^` mLAT G'dWllHnting . 3id't^^` TareZmenPr ParaMotor TrflrVArsİlşklr +. , ZminŞkil. .. Bu imza @SubZero tarafindan degistirilmistir. "Bu kadar uzun karmakarisik bir imza yapma diye uyardim ama heeheeeey _hey kim sylüyor, kim dinliyor." Imzanizi SubZero'ya bilgi vermeden degistirmeyiniz. Tesekkurler...