Console
input R1 value (ohms):10
input R2 value (ohms):20
input R3 value (ohms):15
input R4 value (ohms):5
input R1_known value (ohms):6
input Voltage source value (volts):20
 "Unknown resistance using wheatstone bridge= 4ohms"
 "Unknown resistance using kelvins double bridge= 81.111111ohms"
Console
Input L known : 15
Input R1 value: 30
Input R2 value: 25
Input R3 value: 18
Input R4 value: 37
 "Unknown inductance using Schering Bridge: 53.28 H"
 "Unknown inductance using De Sauty's Bridge: 20.8125 H"
Console
Input L known : 50
Input R1 value: 35
Input R2 value: 43
Input R3 value: 54
Input R4 value: 26
Input R5 value: 18
 "Unknown inductance using MAXWELLS Bridge: 34.498286 H"
 "Unknown inductance using ANDERSONS Bridge: 620.96914 H"
 "Unknown resistance using ANDERSONS Bridge: 86245.714 OHMS"
exec: Wrong number of output argument(s): 0 expected.
Console
ENTER THE PHASE VOLTAGE: 230
ENTER THE VOLTAGE ANGLE: 45
ENTER THE PHASE CURRENT: 10
ENTER THE CURRENT ANGLE: 30
 "Real Power (P) for Phase 1 = -1747.2822 Watts"
 "Real Power (P) for Phase 2 = 421.64022 Watts"
 "Real Power (P) for Phase 3 = -2168.9224 Watts"
 "Total Real Power (P) = -3494.5644 Watts"
 "Reactive Power (Q) for Phase 1 = 1495.662 VAR"
 "Reactive Power (Q) for Phase 2 = 2261.0218 VAR"
 "Reactive Power (Q) for Phase 3 = -765.35976 VAR"
 "Total Reactive Power (Q) = 2991.3241 VAR"
 "Power Factor (PF) for Phase 1 = -0.7596879"
 "Power Factor (PF) for Phase 2 = 0.1833218"
 "Power Factor (PF) for Phase 3 = -0.9430097"
exec: Wrong number of output argument(s): 0 expected.
Console
PHASE VOLTAGE: 440
PHASE CURRENT: 20
POWER FACTOR: 0.8
"ENERGY CONSUMPTION IN 3 PHASE CIRCUIT:"
"PHASE VOLTAGE :440V"
"PHASE CURRENT :20A"
"POWER FACTOR :0.8"
 "TIME :3600seconds"
 "ENERGY :21120kWh"
exec: Wrong number of output argument(s): 0 expected.
Console
NUMBER OF TURNS IN THE COIL: 20
AREA OF THE COIL IN SQUARE METERS: 0.025
RATE OF CHANGE OF MAGNETIC FLUX DENSITY(T/s): 30
"INDUCED VOLTAGE(V): 15V"
HALL EFFECT SENSOR OUTPUT VOLTAGE (IN VOLTS): 20
SENSITIVITY OF THE HALL EFFECT SENSOR IN (V/T): 0.512
"FLUX DENSITY (B): 39.0625TESLA"
 "PERCENTAGE ERROR : 3155.2083%"
Console
"RATIO EROR: "
 0.1 0.1 0.1 0.1 0.1
"PHASE ANGLE ERROR: "
 0. 0.
exec: Wrong number of output argument(s): 0 expected.
Console
PRIMARY VOLTAGE VALUE: 120
SECONDARY VOLTAGE VALUE: 12
KNOWN RESISTANCE VALUE IN OHMS: 10
"SILSBEES DEFLECTION METHOD RESULTS:10"
"SECONDARY CURRENT:1.2A"
"GALVANOMETER DEFLECTION:0.12mA"
exec: Wrong number of output argument(s): 0 expected.
0001   clc;
0002   clear;
0003    //function to calculate unknown resistance using wheatstone bridge
0001    function r_unknown=wheatstone_bridge(R1, R2, R3, R4, R_known)
0002        r_unknown=(R4*R2)/(R3*R1)*R_known;
0003    endfunction
0007
0008    //function to calculate unknown resistance using kelvin's double bridge
0001    function r_unknown_kelvin=kelvin_double_bridge(R1, R2, R3, R4, R_known, R_ref)
0002        r_unknown_kelvin= (R4*(R2+R3)/(R1+R2+R3))*(R_known+R_ref)- R_ref;
0003    endfunction
0012
0013    //input data for wheatstone bridge
0014    R1=input('input R1 value (ohms):');
0015    R2=input('input R2 value (ohms):');
0016    R3=input('input R3 value (ohms):');
0017    R4=input('input R4 value (ohms):');
0018    R_known=input('input R1_known value (ohms):');
0019    V_source=input('input Voltage source value (volts):');
0020
0021    //example for kelvin's double bridge
0022    R_ref=20;
0023
0024    //calculate unknown resistance using wheatstone bridge
0025    r_unknown=wheatstone_bridge(R1,R2,R3,R4,R_known)
0026    disp("Unknown resistance using wheatstone bridge= "+string(r_unknown)+'ohms');
0027
0028    //calculate unknown resistance using kelvins double bridge
0029    r_unknown_kelvin=kelvin_double_bridge(R1,R2,R3,R4,R_known,R_ref)
0030    disp("Unknown resistance using kelvins double bridge= "+string(r_unknown_kelvin)+'ohms');
0001   clc;
0002   clear;
0003
0004    //function to calculate unknown resistance using SCHERING bridge
0001    function L_unknown_schering=schering_bridge(R1, R2, R3, R4, L_known)
0002        L_unknown_schering = (R4 * R2) / (R3 * R1)*L_known;
0003    endfunction
0008
0009    //function to calculate unknown resistance using DESAUTY bridge
0001    function L_unknown_desauty=desauty_bridge(R1, R2, R3, R4, L_known)
0002        L_unknown_desauty= (R4 / R2) * (R1 * L_known)/(R3-(R4/R2)*R1);
0003    endfunction
0013
0014   L_known = input('Input L known : '); // Known inductance (in Henry)
0015   R1 = input('Input R1 value: '); // Known resistance R1 (ohms)
0016   R2 = input('Input R2 value: '); // Known resistance R2 (ohms)
0017   R3 = input('Input R3 value: '); // Known resistance R3 (ohms)
0018   R4 = input('Input R4 value: '); // Known resistance R4 (ohms)
0019
0020   // Calculate unknown inductance using Schering Bridge
0021   L_unknown_schering = schering_bridge(L_known, R1, R2, R3, R4);
0022    disp('Unknown inductance using Schering Bridge: ' + string(L_unknown_schering) + ' H');
0023
0024   // Calculate unknown inductance using De Sauty's Bridge
0025   L_unknown_desauty = desauty_bridge(L_known, R1, R2, R3, R4);
0026   disp('Unknown inductance using De Sauty''s Bridge: ' + string(L_unknown_desauty) + ' H');
0001 clc;
0002 clear;
0003
0004   //function to calculate unknown inductance using MAXWELL bridge
0001   function L_unknown_maxwell=maxwell_bridge(R1, R2, R3, R4, L_known)
0002       L_unknown_maxwell = (R4 * R3) / (R2 * R1)*L_known;
0003   endfunction
0008
0009   //function to calculate unknown inductance using ANDERSONS bridge
0001   function L_unknown_anderson=anderson_bridge(R1, R2, R3, R4, R5, L_known)
0002       L_unknown_anderson= (R4*R3*R5) /(R2 * R1)*L_known;
0003   endfunction
0013
0014   //function to calculate unknown resistance using ANDERSONS bridge
0001   function R_unknown_anderson=anderson_resistance(R1, R2, R3, R4, L_known)
0002       R_unknown_anderson= (R4*R3) /R2 *( R1*L_known);
0003   endfunction
0018
0019 L_known = input('Input L known : '); // Known inductance (in Henry)
0020 R1 = input('Input R1 value: '); // Known resistance R1 (ohms)
0021 R2 = input('Input R2 value: '); // Known resistance R2 (ohms)
0022 R3 = input('Input R3 value: '); // Known resistance R3 (ohms)
0023 R4 = input('Input R4 value: '); // Known resistance R4 (ohms)
0024 R5 = input('Input R5 value: '); // Known resistance R5 (ohms)
0025
0026 // Calculate unknown inductance using MAXWELL Bridge
0027 L_unknown_maxwell = maxwell_bridge(L_known, R1, R2, R3, R4);
0028   disp('Unknown inductance using MAXWELLS
 Bridge: ' + string(L_unknown_maxwell) + ' H');
0029
0030 // Calculate unknown inductance using ANDERSONS Bridge
0031 L_unknown_anderson = anderson_bridge(L_known, R1, R2, R3, R4 ,R5);
0032 disp('Unknown inductance using ANDERSONS
 Bridge: ' + string(L_unknown_anderson) + ' H');
0033
0034 // Calculate unknown resistance using ANDERSONS Bridge
0035 R_unknown_anderson = anderson_resistance(L_known, R1, R2, R3, R4);
0036 disp('Unknown resistance using ANDERSONS
 Bridge: ' + string(R_unknown_anderson) + ' OHMS');
0001   clc ;
0002   clear all ;
0003   // Define line   voltages and line currents for each phase (replace with your actual data)
0004   V=input('ENTER    THE PHASE VOLTAGE: ');
0005   a=input('ENTER    THE VOLTAGE ANGLE: ');
0006   I=input('ENTER    THE PHASE CURRENT: ');
0007   b=input('ENTER    THE CURRENT ANGLE: ');
0008
0009   V1 = V * exp(%i * a); // Phase 1 line voltage (magnitude = 230V, angle = 0 radians)
0010   V2 = V* exp(%i * (a-2*%pi/3)); // Phase 2 line voltage (magnitude = 230V, angle = -120 degrees)
0011   V3 = V* exp(%i * (a+2*%pi/3)); // Phase 3 line voltage (magnitude = 230V, angle = 120 degrees)
0012
0013   I1 = I* exp(%i * b); // Phase 1 line current (magnitude = 10A, angle = 0 radians)
0014   I2 = I* exp(%i * (b-%pi/3)); // Phase 2 line current (magnitude = 10A, angle = -60 degrees)
0015   I3 = I* exp(%i * (b+%pi/3)); // Phase 3 line current (magnitude = 10A, angle = 60 degrees)
0016
0017   // Calculate apparent   power (S) for each phase
0018    S1 = V1 * conj(I1);    // Apparent power for phase 1
0019    S2 = V2 * conj(I2);    // Apparent power for phase 2
0020    S3 = V3 * conj(I3);    // Apparent power for phase 3
0021
0022   //   Calculate real power   (P) and reactive power (Q) for each phase
0023   P1   = real(S1); // Real    power for phase 1
0024   P2   = real(S2); // Real    power for phase 2
0025   P3   = real(S3); // Real    power for phase 3
0026
0027   Q1 = imag(S1); // Reactive power for phase 1
0028   Q2 = imag(S2); // Reactive power for phase 2
0029   Q3 = imag(S3); // Reactive power for phase 3
0030
0031   // Calculate total real power, reactive power, and apparent power
0032   P_total = P1 + P2 + P3; Q_total = Q1 + Q2 + Q3; S_total = S1 + S2 + S3;
0033
0034   // Calculate power factor (PF) for each phase
0035   PF1 = P1 / abs(S1); // Power factor for phase 1
0036   PF2 = P2 / abs(S2); // Power factor for phase 2
0037   PF3 = P3 / abs(S3); // Power factor for phase 3
0038
0039   // Display results
0040   disp('Real Power (P) for Phase      1   = ' + string(P1) + ' Watts');
0041   disp('Real Power (P) for Phase      2   = ' + string(P2) + ' Watts');
0042   disp('Real Power (P) for Phase      3   = ' + string(P3) + ' Watts');
0043   disp('Total Real Power (P) = '      +   string(P_total) + ' Watts');
0044
0045   disp('Reactive Power (Q) for Phase 1 = ' + string(Q1) + ' VAR');
0046    disp('Reactive Power (Q) for Phase 2 = ' + string(Q2) + ' VAR');
0047     disp('Reactive Power (Q) for Phase 3 = ' + string(Q3) + ' VAR');
0048     disp('Total Reactive Power (Q) = ' + string(Q_total) + ' VAR');
0049
0050   disp('Power Factor (PF) for Phase 1 = ' + string(PF1));
0051   disp('Power Factor (PF) for Phase 2 = ' + string(PF2));
0052   disp('Power Factor (PF) for Phase 3 = ' + string(PF3));
0001   clc;
0002   clear all;
0003   V_phase=input('PHASE VOLTAGE: ');
0004   I_phase=input('PHASE CURRENT: ');
0005   pf=input('POWER FACTOR: ');
0006   time=3600;
0007
0008   power=V_phase*I_phase*pf;
0009   p_total=3*sum(power);
0010   energy=p_total*time/3600;
0011
0012   disp('ENERGY CONSUMPTION IN 3 PHASE CIRCUIT:');
0013   disp('PHASE VOLTAGE :'+ string(V_phase)+'V');
0014   disp('PHASE CURRENT :'+ string(I_phase)+'A');
0015   disp('POWER FACTOR :'+ string(pf));
0016   disp('TIME :'+ string(time)+'seconds');
0017   disp('ENERGY :'+ string(energy)+'kWh');
0001   clc;
0002   clear all;
0003
0004   N=input('NUMBER OF TURNS IN THE COIL: ');
0005   Area=input('AREA OF THE COIL IN SQUARE METERS: ');
0006   dB_dt=input('RATE OF CHANGE OF MAGNETIC FLUX DENSITY(T/s): ');
0007
0001   function V=calculateVOLTAGE(N, Area, dB_dt)
0002       V=N*Area*dB_dt;
0003   endfunction
0011
0012   V=calculateVOLTAGE(N,Area,dB_dt);
0013   disp('INDUCED VOLTAGE(V): '+string(V)+'V');
0014
0015   hall_Voltage=input('HALL EFFECT SENSOR OUTPUT VOLTAGE (IN VOLTS): ');
0016   Sensitivity=input('SENSITIVITY OF THE HALL EFFECT SENSOR IN (V/T): ');
0017
0001   function B=calculate_flux_density(hall_Voltage, Sensitivity)
0002       B=hall_Voltage/Sensitivity;
0003   endfunction
0021
0022   B=calculate_flux_density(hall_Voltage,Sensitivity);
0023   disp('FLUX DENSITY (B): '+string(B)+'TESLA');
0024
0025   Actual_B=1.2;
0026   error=abs(Actual_B-B)/Actual_B*100;
0027   disp('PERCENTAGE ERROR : '+string(error)+'%');
0001   clc;
0002   clear all;
0003
0004   primary_voltage=[10,20,30,40,50];
0005   primary_current=[1,2,3,4,5];
0006   secondary_current=[0.9,1.9,2.9,3.9,4.9];
0007
0008   ratio_error=primary_current-secondary_current;
0009   phase_angle_error=zeros(size(primary_voltage));
0010   disp('RATIO EROR: ');
0011   disp(ratio_error);
0012   disp('PHASE ANGLE ERROR: ');
0013   disp(phase_angle_error);
0001   clc;
0002   clear all;
0003
0004   v_primary=input('PRIMARY VOLTAGE VALUE: ');
0005   v_secondary=input('SECONDARY VOLTAGE VALUE: ');
0006   r_known=input('KNOWN RESISTANCE VALUE IN OHMS: ');
0007   k=v_primary/v_secondary;
0008
0001   function [i_secondary, deflection]=silsbees_deflection(v_secondary, r_known)
0002       i_secondary=v_secondary/r_known;
0003       deflection=i_secondary/k;
0004   endfunction
0013
0014   [i_secondary,deflection]=silsbees_deflection(v_secondary, r_known);
0015
0016   disp(['SILSBEES DEFLECTION METHOD RESULTS:'+string(k) ]);
0017   disp(['SECONDARY CURRENT:'+string(i_secondary)+'A'] );
0018   disp(['GALVANOMETER DEFLECTION:'+string(deflection)+'mA'] );
0001   clc;
0002   clear all;
0003
0004   fs=input('SAMPLING FREQUENCY(IN HERTZ): ');
0005   t=0:1/fs:1;
0006   f=input('SIGNAL FREQUENCY (IN HERTZ): ');
0007   amplitude=input('SIGNAL AMPLITUDE (IN VOLTS): ');
0008   test_signal=amplitude*sin(2*%pi*f*t);
0009
0010   rms_value=(test_signal);
0011   disp('RMS VALUE: ');
0012   disp(rms_value);
0013
0014   plot(t,test_signal,'b','LineWidth',2);
0015   xlabel('TIME(s)');
0016   ylabel('VOLTAGE(V)');
0017   title('TEST SIGNAL');