Moderatör Olmak İçin Tıklayın Editör Olmak İçin Tıklayın Forum Kuralları IF Görüntülü Röportajlar IF Helper Grubu
IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  odeaweb

>
+
 Kayıt ol
Etiketlenen Kullanıcılar

3Beğeni(ler)
  • 3 Post By Forbidden

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Arama Stil
Alt 20 Ağustos 2022, 21:11   #1
Çevrimiçi
~ BuSohbet.Com ~
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Direnc Hesaplama | Resistor Calculation in mIRC Window



Merhabalar kodun amacı elektronik devrelerdeki direnclerin degerlerini üzerindeki renk kodlarini secerek program üzerinden hesaplayabilirsiniz. Umarim faydali olur.

Kodu eklemek için: Alt + R Remote bölümü
Kodu mIRC ekledikten sonra sag tıklayip "direnc hesaplama" ozelligini seciniz.

Not: Acele ile yazilmis bir koddur pek denemesi yapilmamistir, siz kendiniz deneme yapabilirsiniz.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
menu * {
  Direnc Hesaplama:/renksema
}
alias renksema {
  unset %sutun_* %band5_secim
  if !$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c) { window -p @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c }
  clear @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c
  drawrect -rf @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(128,128,255) 1 1 1 $window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c).dw $window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c).dh
  ;5band secenek yazi ve kutucuk
  drawtext -r @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(255,255,255) 5 15 Direnc 5 renkli ise yandaki kutucuga tiklayin.
  drawrect -rf @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(196,171,125) 2 330 14 20 20
  ;
  if %band5_secim { drawrect -rf @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(0,252,0) 2 334 18 12 12 }
  ;ilkbas
  drawrect -drf @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(196,171,125) 5 100 90 40 120
  ;govde
  drawrect -drf @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(196,171,125) 5 135 110 600 75
  ;sonbas
  drawrect -drf @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(196,171,125) 5 730 90 40 120
  ;ara1
  ;drawrect -f @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c 0 5 195 110 40 75
  ;ara2
  ;drawrect -f @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c 0 5 300 110 40 75
  ;ara3 5 band ozellik
  ;;drawrect  -f @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c 0 5 400 110 40 75
  ;ara4
  ;drawrect -f @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c 0 5 520 110 40 75
  ;ara5son
  ;drawrect  -f @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c 0 5 650 110 40 75
  ;bastelciz
  drawrect -f @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c 1 1 10 135 90 20
  ;sontelciz
  drawrect -f @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c 1 1 769 135 90 20
  ;
  drawtext -r @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(255,255,255) 190 218 1. band
  drawtext -r @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(255,255,255) 295 218 2. band
  drawtext -r @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(255,255,255) 395 218 3. band
  drawtext -r @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(255,255,255) 510 218 çarpan
  drawtext -r @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(255,255,255) 630 218 tolerans
  renk1sutun | renk2sutun | renk3sutun | renk4sutun | renk5sutun
} 
alias renk1sutun {
  var %pn = 1 ,%y = 250, %x = 200
  var %renkler = $rgb(74,74,74) $rgb(128,64,0) $rgb(220,16,87) $rgb(255,128,0) $rgb(244,244,0) $rgb(0,170,0) $rgb(45,150,255) $rgb(193,0,193) $rgb(170,175,158) $rgb(249,249,249)
  while %pn <= 10 {
    drawrect -rf @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $gettok(%renkler,%pn,32) 1 %x %y 40 30
    drawtext -r @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(0,252,0) %x %y $calc(%pn - 1)
    inc %y 30
    inc %pn
  }
}
alias renk2sutun {
  var %pn = 1 ,%y = 250, %x = 300
  var %renkler = $rgb(74,74,74) $rgb(128,64,0) $rgb(220,16,87) $rgb(255,128,0) $rgb(244,244,0) $rgb(0,170,0) $rgb(45,150,255) $rgb(193,0,193) $rgb(170,175,158) $rgb(249,249,249)
  while %pn <= 10 {
    drawrect -rf @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $gettok(%renkler,%pn,32) 1 %x %y 40 30
    drawtext -r @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(0,252,0) %x %y $calc(%pn - 1)
    inc %y 30
    inc %pn
  }
}
alias renk3sutun {
  var %pn = 1 ,%y = 250, %x = 400
  var %renkler = $rgb(74,74,74) $rgb(128,64,0) $rgb(220,16,87) $rgb(255,128,0) $rgb(244,244,0) $rgb(0,170,0) $rgb(45,150,255) $rgb(193,0,193) $rgb(170,175,158) $rgb(249,249,249)
  while %pn <= 10 {
    drawrect -rf @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $gettok(%renkler,%pn,32) 1 %x %y 40 30
    drawtext -r @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(0,252,0) %x %y $calc(%pn - 1)
    inc %y 30
    inc %pn
  }
}
alias renk4sutun {
  var %pn = 1 ,%y = 250, %x = 500, %z = 1
  var %renkler = $rgb(74,74,74) $rgb(128,64,0) $rgb(220,16,87) $rgb(255,128,0) $rgb(244,244,0) $rgb(0,170,0) $rgb(45,150,255)
  while %pn <= 7 {
    drawrect -rf @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $gettok(%renkler,%pn,32) 1 %x %y 80 30
    drawtext -r @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(0,252,0) %x %y %z
    var %z = $calc(%z * 10)
    inc %y 30
    inc %pn
  }
  drawrect -rf @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(179,179,0) 1 %x $calc(%y + 30) 90 30
  drawtext -r @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(128,128,0) %x $calc(%y +30) 0,1 altın
  ;
  drawrect -rf @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(203,196,184) 1 %x $calc(%y + 60) 90 30
  drawtext -r @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(115,115,115) %x $calc(%y +60) 0,01 gümüş
}
alias renk5sutun {
  var %pn = 1 ,%y = 250, %x = 620, %z = 1
  drawrect -rf @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(128,64,0) 1 %x $calc(%y + 30) 80 30
  drawtext -r @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(0,252,0) %x $calc(%y +30) 1%
  drawrect -rf @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(220,16,87) 1 %x $calc(%y +60) 80 30
  drawtext -r @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(0,252,0) %x $calc(%y +60) 2%
  drawrect -rf @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(179,179,0) 1 %x $calc(%y +240) 90 30
  drawtext -r @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(128,128,0) %x $calc(%y +240) 5% altın
  drawrect -rf @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(203,196,184) 1 %x $calc(%y +270) 90 30
  drawtext -r @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(115,115,115) %x $calc(%y +270) 10% gümüş

}
menu @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c {
  mouse:{ titlebar @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c X: $mouse.x Y: $mouse.y }
  sclick: {
    if $mouse.x isnum 330-350 && $mouse.y isnum 11-29 {
      if %band5_secim {
        ;kutu secimi kaldir
        drawrect -rf @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(196,171,125) 2 330 14 20 20
        ;bant secimi kaldr
        drawrect  -rf @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(196,171,125) 5 400 110 40 75
        unset %band5_secim %sutun_3
        halt
      }
      if !%band5_secim {
        ;kutu secimi yap
        drawrect -rf @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(0,252,0) 2 334 18 12 12
        ;band secimi yap
        ;drawrect  -f @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c 0 5 400 110 40 75
        set -e %band5_secim OK
        halt
      }
    }

    ;1.sütun renk secim baslangic

    if $mouse.x isnum 200-238 {
      if $mouse.y isnum 250-275 {
        drawrect -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(74,74,74) 5 195 110 40 75
        set %sutun_1 0
      }
      if $mouse.y isnum 278-302 {
        drawrect -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(128,64,0) 5 195 110 40 75
        set %sutun_1 1
      }  
      if $mouse.y isnum 308-334 {
        drawrect -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(220,16,87) 5 195 110 40 75
        set %sutun_1 2
      }
      if $mouse.y isnum 338-365 {
        drawrect -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(255,128,0) 5 195 110 40 75
        set %sutun_1 3
      }
      if $mouse.y isnum 369-396 {
        drawrect -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(244,244,0) 5 195 110 40 75
        set %sutun_1 4
      }
      if $mouse.y isnum 399-427 {
        drawrect -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(0,170,0) 5 195 110 40 75
        set %sutun_1 5
      }
      if $mouse.y isnum 430-455 {
        drawrect -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c  $rgb(45,150,255) 5 195 110 40 75
        set %sutun_1 6
      }
      if $mouse.y isnum 458-483 {
        drawrect -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c  $rgb(193,0,193) 5 195 110 40 75
        set %sutun_1 7
      }
      if $mouse.y isnum 488-512 {
        drawrect -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c  $rgb(170,175,158) 5 195 110 40 75
        set %sutun_1 8
      }
      if $mouse.y isnum 518-545 { 
        drawrect -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(249,249,249) 5 195 110 40 75
        set %sutun_1 9
      }
    }
    ;2. sutun renk secim baslangic

    if $mouse.x isnum 300-337 {
      if $mouse.y isnum 250-275 {
        drawrect -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(74,74,74) 5 300 110 40 75
        set %sutun_2 0
      }
      if $mouse.y isnum 278-302 {
        drawrect -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(128,64,0) 5 300 110 40 75
        set %sutun_2 1
      }
      if $mouse.y isnum 308-334 {
        drawrect -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(220,16,87) 5 300 110 40 75
        set %sutun_2 2
      }
      if $mouse.y isnum 338-365 {
        drawrect -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(255,128,0) 5 300 110 40 75
        set %sutun_2 3
      }
      if $mouse.y isnum 369-396 {
        drawrect -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(244,244,0) 5 300 110 40 75
        set %sutun_2 4
      }
      if $mouse.y isnum 399-427 {
        drawrect -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(0,170,0) 5 300 110 40 75
        set %sutun_2 5
      }
      if $mouse.y isnum 430-455 {
        drawrect -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(45,150,255) 5 300 110 40 75
        set %sutun_2 6
      }  
      if $mouse.y isnum 458-483 {
        drawrect -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(193,0,193) 5 300 110 40 75
        set %sutun_2 7
      }
      if $mouse.y isnum 488-512 {
        drawrect -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(170,175,158) 5 300 110 40 75
        set %sutun_2 8
      }
      if $mouse.y isnum 518-545 {
        drawrect -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(249,249,249) 5 300 110 40 75
        set %sutun_2 9
      }
    }
    ;3.sutun secili ise 
    if %band5_secim {
      if $mouse.x isnum 400-436 {
        if $mouse.y isnum 250-275 {
          drawrect  -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(74,74,74) 5 400 110 40 75
          set %sutun_3 0
        }
        if $mouse.y isnum 278-302 {
          drawrect  -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(128,64,0) 5 400 110 40 75
          set %sutun_3 1
        }
        if $mouse.y isnum 308-334 {
          drawrect  -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(220,16,87) 5 400 110 40 75
          set %sutun_3 2
        }
        if $mouse.y isnum 338-365 {
          drawrect  -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(255,128,0) 5 400 110 40 75
          set %sutun_3 3
        }
        if $mouse.y isnum 369-396 {       
          drawrect  -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(244,244,0) 5 400 110 40 75
          set %sutun_3 4
        }
        if $mouse.y isnum 399-427 {
          drawrect  -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(0,170,0) 5 400 110 40 75
          set %sutun_3 5
        }
        if $mouse.y isnum 430-455 {
          drawrect  -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(45,150,255) 5 400 110 40 75
          set %sutun_3 6
        }  
        if $mouse.y isnum 458-483 {
          drawrect  -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(193,0,193) 5 400 110 40 75
          set %sutun_3 7
        }
        if $mouse.y isnum 488-512 {
          drawrect  -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(170,175,158) 5 400 110 40 75
          set %sutun_3 8
        }
        if $mouse.y isnum 518-545 {
          drawrect  -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(249,249,249) 5 400 110 40 75
          set %sutun_3 9
        }  
      } 
    }   
    ;4.carpan multiple sutun
    if $mouse.x isnum 500-580 {
      if $mouse.y isnum 250-275 {
        drawrect -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(74,74,74) 5 520 110 40 75
        set %sutun_carpan 1
      }
      if $mouse.y isnum 278-302 {
        drawrect -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(128,64,0) 5 520 110 40 75
        set %sutun_carpan 10
      }
      if $mouse.y isnum 308-334 {
        drawrect -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(220,16,87) 5 520 110 40 75
        set %sutun_carpan 100
      }
      if $mouse.y isnum 338-365 {
        drawrect -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(255,128,0) 5 520 110 40 75
        set %sutun_carpan 1000
      }
      if $mouse.y isnum 369-396 {
        drawrect -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(244,244,0) 5 520 110 40 75
        set %sutun_carpan 10000
      }
      if $mouse.y isnum 399-427 {
        drawrect -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(0,170,0) 5 520 110 40 75
        set %sutun_carpan 100000
      }
      if $mouse.y isnum 430-455 {
        drawrect -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(45,150,255) 5 520 110 40 75
        set %sutun_carpan 1000000
      }
      ;altin
      if $mouse.y isnum 488-512 {
        drawrect -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(179,179,0) 5 520 110 40 75
        set %sutun_carpan 0.1
      }  
      ;gumus
      if $mouse.y isnum 518-545 {
        drawrect -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(203,196,184) 5 520 110 40 75
        set %sutun_carpan 0.01
      }  
    }
    ;5.sutun tolerans
    if $mouse.x isnum 620-695 {
      if $mouse.y isnum 278-302 {
        drawrect  -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(128,64,0) 5 650 110 40 75
        set %sutun_tolerans 0.01
      }
      if $mouse.y isnum 308-334 {
        drawrect  -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(220,16,87) 5 650 110 40 75
        set %sutun_tolerans 0.02
      }
      ;altin
      if $mouse.y isnum 488-512 {
        drawrect  -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(179,179,0) 5 650 110 40 75
        set %sutun_tolerans 0.05
      }
      ;gumus
      if $mouse.y isnum 518-545 {
        drawrect  -fr @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(203,196,184) 5 650 110 40 75
        set %sutun_tolerans 0.1
      }  
    }
    /sutun_sonuc
  }
}
alias sutun_sonuc {
  if $var(%sutun_3) {
    if ($var(%sutun_1) && $var(%sutun_2) && $var(%sutun_3) && %sutun_carpan && %sutun_tolerans) {
      var %m = $calc($+(%sutun_1,%sutun_2,%sutun_3) * %sutun_carpan)
      drawrect -drf @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(196,171,125) 1 280 60 340 30  
      drawtext -r @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(0,252,0) 280 64 Deger: $sonuc_donustur(%m)
      halt
    }
  }
  if ($var(%sutun_1) && $var(%sutun_2) && %sutun_carpan && %sutun_tolerans) {
    var %m = $calc($+(%sutun_1,%sutun_2) * %sutun_carpan)
    drawrect -drf @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(196,171,125) 1 280 60 340 30  
    drawtext -r @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]c $rgb(0,252,0) 280 64 Deger: $sonuc_donustur(%m)
  }
}
alias sonuc_donustur {
  var %yuvarla = $floor($1)
  if $len(%yuvarla) <= 3 { return $1 OHM --> [+/-] $calc($1 * %sutun_tolerans) Tolerans }
  if $len(%yuvarla) isnum 4-6 { return $calc($1 / 1000) KILO-OHM --> [+/-] $calc($calc($1 / 1000) * %sutun_tolerans)  Tolerans }
  if $len(%yuvarla) isnum 7-9 { return $calc($1 / 1000000) MEGA-OHM -->  [+/-] $calc($calc($1 / 1000000) * %sutun_tolerans) Tolerans }
}

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

__________________
Beni yoran yıllar değil, namert kullar.
 
Alıntı ile Cevapla

Alt 24 Ağustos 2022, 13:40   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Direnc Hesaplama | Resistor Calculation in mIRC Window



Büyük emek ve sabır ile hazırlanmış bir kod, elinize emeğinize sağlık.Teşekkür ederiz.

__________________
" Ya bir yol bul, ya bir yol aç yada yoldan çekil "
 
Alıntı ile Cevapla

Alt 24 Ağustos 2022, 17:32   #3
Çevrimiçi
~ BLaCK_and_WHiTe ~
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Direnc Hesaplama | Resistor Calculation in mIRC Window



Güzel çalışma

__________________
BLaCK_and_WHiTe is now known as SNOOPY


Kullanıcı imzalarındaki bağlantı ve resimleri görebilmek için en az 20 mesaja sahip olmanız gerekir ya da üye girişi yapmanız gerekir.
 
Alıntı ile Cevapla

Alt 27 Ağustos 2022, 10:36   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Direnc Hesaplama | Resistor Calculation in mIRC Window



güzel calisma emegine saglik

 
Alıntı ile Cevapla

Cevapla

« önceki Konu | sonraki Konu »

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok
BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık




Sitemiz bir " paylaşım " sitesidir. Bu yüzden sitemize kayıt olan herkes kontrol edilmeksizin mesaj/konu/resim paylaşabilmektedir.
Bu sebepten ötürü, sitemiz üzerinden paylaşılan mesajlar, konular ve resimlerden doğabilecek olan yasal sorumluluklar paylaşan kullanıcıya aittir. IRCForumlari.Net hiçbir yasal sorumluluk kabul etmemektedir. İllegal herhangi bir faaliyet görülmesi durumunda İletişim sayfası üzerinden ulaşıldığı taktirde mesaj, konu ya da resim en fazla 24 saat içerisinde silinecektir.
5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.
İletişim Arşiv Gizlilik Sözleşmesi Yukarı git
ferizli haber kaynarca haber sohbet teması antalya haber takipçi satın al tiktok takipçi satın al instagram beğeni satın al takipçi satın al takipçi satın al Buy Instagram Followers pubg mobile uc sohbet siteleri sohbet odaları sohbet odaları sohbet Aydın Haber Akyazı Haber Sitesi Siber Sesli Sohbet
Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk