新しく発言する EXIT インデックスへ

合成抵抗の計算−ブリッジ回路

　　合成抵抗の計算−ブリッジ回路 山中和義 2008/08/10 11:46:01  (修正1回)
　　├別解（Δ-Y変換による） 山中和義 2008/08/10 11:49:37 
　　├合成抵抗の計算−ラダー回路 山中和義 2008/08/10 13:58:21 
　　├合成抵抗の計算-立方体状 山中和義 2008/08/13 10:06:41 
　　│└Ａ−Ｂ間、Ａ−Ｃ間の場合 山中和義 2008/08/13 10:11:27 
　　├!合成抵抗の計算-簡易回路図シミュレーショ... 山中和義 2008/08/14 14:42:47 
　　│└つづき 山中和義 2008/08/14 14:43:36 

Re: !合成抵抗の計算-簡易回路図シミュレーショ...	返事を書く ノートメニュー
山中和義 <drdlxujciw> 2008/08/14 14:43:36
つづき DIM A(0 TO N,0 TO N),x(0 TO N),b(0 TO N) !連立方程式 Ax=b MAT A=ZER MAT b=ZER LET V0=1 !仮の電圧 LET f=0 !式の番号 !---------- ↓↓↓↓↓ ---------- !●キルヒホッフの電圧則 LET b(f)=-V0 !電圧をかけた回路　※-1:終端 DATA 0,1,6,7,12,-1 CALL KVL(f) !※fは+1される DATA 0,5,6,1,-1 !下左部分の閉回路　※-1:終端 CALL KVL(f) DATA 1,6,7,2,-1 !下右 CALL KVL(f) DATA 5,10,11,6,-1 !上左 CALL KVL(f) DATA 6,11,12,7,-1 !上右 CALL KVL(f) !●キルヒホッフの電流則 LET A(f,0)=1 !電圧をかけた節点の＋側 CALL KCL(f,0) LET A(f,0)=-1 !−側 CALL KCL(f,12) CALL KCL(f,1) !残りの節点 CALL KCL(f,2) CALL KCL(f,5) CALL KCL(f,6) CALL KCL(f,7) CALL KCL(f,10) !CALL KCL(f,11) !---------- ↑↑↑↑↑ ---------- DIM Ai(0 TO N,0 TO N) !連立方程式を解く MAT Ai=INV(A) MAT x=Ai*b MAT PRINT x !各枝路電流を表示する PRINT "合成抵抗=";V0/x(0) !R0=V0/I0 SUB KVL(f) !キルヒホッフの電圧則 KVL(Kirchhoff's Voltage Law) DIM lp(100) !閉回路を構成する節点 LET lpN=0 !閉回路を構成する節点の数 DO LET lpN=lpN+1 READ lp(lpN) LOOP UNTIL lp(lpN)<0 LET lpN=lpN-1 IF lpN>2 THEN LET lp(lpN+1)=lp(1) !３点以上なら始端へ FOR k=1 TO lpN !閉回路の各辺で FOR i=1 TO N LET t1=nd1(i) !接続を確認する LET t2=nd2(i) IF (lp(k)=t1 AND lp(k+1)=t2) OR (lp(k)=t2 AND lp(k+1)=t1) THEN LET t=VAL(el$(i)(2:LEN(el$(i)))) !番号の取得 IF t1=lp(k) THEN !枝路電流の向きを考慮して LET A(f,t)=SGN(t1-t2)*ev(i) !Rn*In ELSE LET A(f,t)=SGN(t2-t1)*ev(i) END IF END IF NEXT i NEXT k LET f=f+1 !更新 END SUB SUB KCL(f,nd) !キルヒホッフの電流則 KCL(Kirchhoff's Current Law) FOR i=1 TO N LET t1=nd1(i) !接続を確認する LET t2=nd2(i) IF t1=nd OR t2=nd THEN LET t=VAL(el$(i)(2:LEN(el$(i)))) !番号の取得 IF t1=nd THEN !枝路電流の向きを考慮して LET A(f,t)=SGN(t1-t2) !In ELSE LET A(f,t)=SGN(t2-t1) END IF END IF NEXT i LET f=f+1 !更新 END SUB END

　　│　└現状、トポロジーの処理（閉回路、節点）が... 山中和義 2008/08/14 14:51:37 
　　│　　└節点方程式を使用されては 島村1243 2008/08/16 07:15:46  (修正2回)
　　│　　　└これですね、シミュレータが計算しているの... 山中和義 2008/08/16 13:15:20  (修正1回)
　　│　　　　└つづき 山中和義 2008/08/16 13:16:16  (修正1回)
　　│　　　　　└出口の電位を０[V]にするには 島村1243 2008/08/16 22:33:58 
　　│　　　　　　└電流源を加味する部分を変更してください。 山中和義 2008/08/17 06:46:24 
　　│　　　　　　　└出来ました。 島村1243 2008/08/17 07:51:57  (修正1回)
　　│　　　　　　　　└試験問題チェック用に改造 島村1243 2008/08/17 17:17:27  (修正1回)
　　├!直流電気回路の計算-閉路電流法の行列解法 山中和義 2008/08/17 22:00:39  (修正1回)
　　│└電源が複数の場合 島村1243 2008/08/19 09:43:13 
　　│　└このように設定してください。 山中和義 2008/08/19 11:57:37 
　　│　　└正しい結果が出ました 島村1243 2008/08/19 14:16:20  (修正2回)
　　│　　　└行列計算の説明 山中和義 2008/08/19 17:54:10  (修正1回)
　　│　　　　├感謝します 島村1243 2008/08/19 18:12:30 
　　│　　　　└任意の抵抗辺に起電力も含む 島村1243 2008/08/20 10:54:20 
　　└電圧源を含む節点電位法 山中和義 2008/08/22 09:24:52 
　　　└つづき 山中和義 2008/08/22 09:25:40 
　　　　└入力が簡単で使い易い 島村1243 2008/08/23 15:10:41 

インデックスへ EXIT
新規発言を反映させるにはブラウザの更新ボタンを押してください。