본문 바로가기

Characteristics Data/LED(Light Emitting Diode)

(5)
OLED의 양자효율(Quantum Efficiency) 계산 방법 Public Sub CalcELmaxQE(ByRef Data As MeasureData_typ) Dim i As Integer ''--(1)--파장의 피크값을 찾는 루틴 Dim max As Double ''--(1-1)-- Find the max starting from the left Dim indexLeft As Integer indexLeft = 0 max = Data.LL(0) For i = 1 To Data.DataLen If max < Data.LL(i) Then max = Data.LL(i) indexLeft = i End If Next i ''--(1-2)-- 스펙트럼의 오른쪽부터 시작하여 피크치가 어떤 파장값인지 서치하는 루틴 Dim indexRight As Integer indexRig..
LED 의 색좌표 u', v' (CIE1976) 계산 알고리즘 스펙트로메타를 통해 LED의 스펙트럼 데이타를 추출한 후 색좌표 상의 u',v'(CIE1976) 을 계산하는 알고리즘 입니다. void CIE1976_Chromaticity(double* Wavelength, double* Spectrum, int Length, double& uPrime, double& vPrime) { double TristimulusX, TristimulusY, TristimulusZ; Tristimulus_Value(Wavelength, Spectrum, Length, TristimulusX, TristimulusY, TristimulusZ) ; try { uPrime = (4 * TristimulusX) / (TristimulusX + (TristimulusY * 15) + (T..
LED 의 색좌표 x, y (CIE1931) 계산 알고리즘 계산상 필요한 table 은 위의 파일을 다운로드 받으세요 스펙트로메타를 통해 LED의 스펙트럼 데이타를 추출한 후 색좌표 상의 x,y (CIE1931)값을 계산하는 알고리즘 입니다. void CIE1931_Chromaticity(double* Wavelength, double* Spectrum, int Length, double& x, double& y) { double TristimulusX, TristimulusY, TristimulusZ; Tristimulus_Value(Wavelength, Spectrum, Length, TristimulusX, TristimulusY, TristimulusZ) ; try { x = TristimulusX / (TristimulusX + TristimulusY ..
색좌표상의 x, y 값을 이용한 LED Dominant 파장 계산 알고리즘 계산상 필요한 table 은 위의 파일을 다운로드 받으세요 색좌표상의 X,Y 값을 이용한 LED Dominant 파장 계산을 위한 알고리즘 입니다. double __fastcall Dominant_Wavelength(double Chroma_x, double Chroma_y) { DPOINT TempPos[4], Dominant ; double dtemp = 1000, value, degree, result ; int start = 0, stop = 0, temp = 0 ; double dominant_wavelength ; TempPos[0].x = TempPos[0].y = 0.33 ; TempPos[1].x = Chroma_x ; TempPos[1].y = Chroma_y ; try{ degree ..
색좌표상의 x, y 값을 이용한 LED 색온도(CCT) 계산 알고리즘 계산상 필요한 table 은 위의 파일을 다운로드 받으세요 색좌표상의 x, y 값을 이용하여 발광빛의 색온도(Correlated Color Temperature)를 계산하는 코드 입니다. double CCT(double xs, double ys) { int j; double us,vs; double uj,vj,tj,di,dj,mi,mj; double cct ; /* convert (x,y) to CIE 1960 (u,v) */ try { us = (2*xs) / (-xs + 6*ys + 1.5); vs = (3*ys) / (-xs + 6*ys + 1.5); } catch(...) { us = 0 ; vs = 0 ; } /* search for closest isotemp lines */ for(j=0 ; j