Progamming help with FSBus dll

Printable View

Show 40 post(s) from this thread on one page

08-27-2014, 07:49 AM
John_B

Re: Progamming help with FSBus dll

Hi 388TH_A

Sorry to hear about having to start over...oh the tedium of it all....

But welcome "back"

John
08-27-2014, 10:11 AM
388TH_A

Re: Progamming help with FSBus dll

LOL I found a working copy on my computer that I was given back in 2010 from RVDB737NG Copyright(c)2009, Rob van Dijk - www.rvdijk.nl Now im just trying to change it up and make it my own.
08-27-2014, 10:52 AM
John_B

Re: Progamming help with FSBus dll

Phew!

I also have just about all of Robs original files..let me know if you cant find anything ...What cockpit are you working on?

John
08-27-2014, 11:21 AM
388TH_A

Re: Progamming help with FSBus dll

for now im doing my radios and autopilot then might try and make it around a 737-800
08-27-2014, 12:02 PM
John_B

Re: Progamming help with FSBus dll

Ah same here (737-800) although as I am building mine Its going in bubble wrap as we aim to move house in a few months.

John
08-31-2014, 11:00 AM
388TH_A

Re: Progamming help with FSBus dll

So a couple of things

1( Working on the Pedestal the freqs will only count up when ever I turn the Rotary Knobs

Code:

/*---------------------- COM1 Events ----------------------*/ case FS_COM1FREQUENCY: Com1Fr = ((10000 + BCD2Int(val)) * 10 + 5) / 25 * 25; // rounded, units: 0.001 FsbusWrite(C_DCOM1, Com1Fr / 10); // to cockpit break; case FS_COM1STANDBY: Com1FrStb = ((10000 + BCD2Int(val)) * 10 + 5) / 25 * 25; FsbusWrite(C_DCOM1STB, Com1FrStb / 10); // to cockpit break; case C_RCOM1DEC: x = Com1FrStb %1000; x = x + 25 * val; // in steps of 0.025 if (x > 975) // upper limit: 0.975 x = 0; else if (x < 0) x = 975; Com1FrStb = Com1FrStb / 1000 * 1000 + x; // units: 0.001 FsbusWrite(C_DCOM1STB, Com1FrStb / 10); // truncated to 0.01 x = Int2BCD((Com1FrStb % 100000) / 10); // stripped and truncated to 0.01 FsWrite(FS_COM1STANDBY, x); // to FS break; case C_RCOM1FRA: x = Com1FrStb / 1000; // ahead of dec point x = x + val; // in steps of 1.000 if (x > 136) x = 118; else if (x < 118) x = 136; Com1FrStb = x * 1000 + (Com1FrStb % 1000); FsbusWrite(C_DCOM1STB, Com1FrStb / 10); x = Int2BCD((Com1FrStb % 100000) / 10); FsWrite(FS_COM1STANDBY, x); break; case C_SCOM1SWAP: if(val==0) FsWrite (FS_RADIOUSESTBYTOGGLE,0x08); // toggle bit 3 (COM1) break; case C_SCOM1TEST: break;

2) for the 737NGX Transponder there are Five positions for the Knob but cant seem to find the offset for them

Code:

case C_SXPNDRIDENT: break; case C_SXPNDRCTRL1: break; case C_SXPNDRCTRL2: break; case C_SXPNDRCTRL3: break; case C_SXPNDRCTRL4: break; case C_SXPNDRCTRL5: break;

3) The ADF1STBY Freq doesnt seem to show the correct Freq. And the Value I do get is 0x0000

Code:

MkFsObject(FS_EXTENDEDADF1, "OID", EventHandler, 0x0356, 2, TP_UI16, FS_NORMAL); case FS_ADF1FREQUENCY: ADF1 = (ADF1 / 10000) * 10000 + BCD2Int(val) * 10 + ADF1 % 10; FsbusWrite(C_DADF1, ADF1); if (bSynchronised == false) { ADF1Stb = ADF1; FsbusWrite(C_DADF1STB, ADF1Stb); } break; case FS_EXTENDEDADF1: ADF1 = BCD2Int(val >> 8) * 10000 + ((ADF1/10)%1000)*10 + BCD2Int(val & 0x00FF); FsbusWrite(C_DADF1, ADF1); if (bSynchronised == false) { ADF1Stb = ADF1; FsbusWrite(C_DADF1STB, ADF1Stb); } break; case C_RADF_100: x = ADF1Stb / 1000; // hundreds x = x + val; // update 100s if (x > 17) x = 1; // wrap else if (x < 1) x = 17; // wrap ADF1Stb = x * 1000 + ADF1Stb % 1000; // new 100s FsbusWrite(C_DADF1STB, ADF1Stb); break; case C_RADF_10: x = (ADF1Stb % 1000) / 10; // tens + units x = x + val; // update 10s if (x > 99) x = 0; // wrap else if (x < 0) x = 99; // wrap ADF1Stb = (ADF1Stb / 1000) * 1000 + x * 10 + ADF1Stb % 10; // new 10s FsbusWrite(C_DADF1STB, ADF1Stb); break; case C_RADF_1: x = ADF1Stb % 10; // .1 units x = x + val; // update 10s if (x > 9) x = 0; // wrap else if (x < 0) x = 9; // wrap ADF1Stb = (ADF1Stb / 10) * 10 + x; FsbusWrite(C_DADF1STB, ADF1Stb); break; case C_SADFSWAP: if (val == 0) { x = ADF1Stb; // save ADF1Stb = ADF1; // swap ADF1 = x; // swap x = Int2BCD(ADF1); // convert to bcd FsWrite(FS_EXTENDEDADF1, ((x & 0x0F0000) >> 8) | (x & 0x00000F)); FsWrite(FS_ADF1FREQUENCY, (x & 0x00FFF0) >> 4); FsbusWrite(C_DADF1STB, ADF1Stb); } break; case FS_ADF1MORSE: break;
09-13-2014, 04:16 PM
388TH_A

Re: Progamming help with FSBus dll

bump bump__
09-26-2014, 06:40 AM
388TH_A

Re: Progamming help with FSBus dll

Quote:

Originally Posted by RobiD

Just come to the realisation that there are no offsets for the OFF, STBY, ON, ALT or test, so it was a pointless exercise.

I've gone back to basics, I've pulled two of the switches out and converted the holes to fit the rotary encoders, so now I have the same layout as Rob uses ie: 2 rotary encoders, 4 digits and a dummy 5 position switch.

The code compiles so that's a good sign. I just need to wire it all up to test.

When I'm done with the coding, I will be giving the uncompiled project to anyone who wants to build a cessna cockpit using FSBus dll. Hope no one minds (I'm sure no one does).

David

Quote:

Originally Posted by RobiD

Hi Stefan,

Thanks for your comments.

I think I will have to redesign my transponder. I built this a long time ago from someone elses idea.

I will have to get the old cnc machine out again.

Am I correct:

Rob's code is based on 1 rotary encoder
A 5 position rotary switch (for OFF, STBY, ON, ALT, TEST)
It is a 5 7-segment display (not 4 like mine is)

Regards
David

Quote:

Originally Posted by RobiD

Hi Stefan,

Back again. Everything is going great.

I have started on the xponder.

My set us uses 4 on-off-on self centering switches for the four digits, one for each digit (push up for up one number and press down for down one number), (hope that makes sense).

I have a 12 position rotary switch which I use for: Off, SBY, ON, ALT, TEST.

What do I need to change in Rob's (it's probably your code) code to achieve this.

Oh, another thing, I have a single LED as an on indicator.

Appreciate your help once again.

David

Here's Rob's code

Code:

case FS_TRANSPONDERSETTING: Expdr = BCD2Int(val); FsbusWrite (C_DXPNDR, Expdr); break; case C_RXPNDRL: if (val > 0) { Expdr += 1000; if ((Expdr % 10000) > 7777) Expdr -= 8000; } else { Expdr += 100; if ((Expdr % 1000) > 777) Expdr -= 800; } FsbusWrite(C_DXPNDR, Expdr); x = Int2BCD(Expdr); FsWrite(FS_TRANSPONDERSETTING, x); break; case C_RXPNDRR: if (val > 0) { Expdr += 10; if ((Expdr % 100) > 77) Expdr -= 80; } else { Expdr += 1; if ((Expdr % 10) > 7) Expdr -= 8; } FsbusWrite(C_DXPNDR, Expdr); x = Int2BCD(Expdr); FsWrite(FS_TRANSPONDERSETTING, x); break; case C_SXPNDRIDENT://this would be off? break; case C_SXPNDRCTRL1://this would be sby? break; case C_SXPNDRCTRL2://this would be on? break; case C_SXPNDRCTRL3://this would be alt? break; case C_SXPNDRCTRL4://this would be test? break; case C_SXPNDRCTRL5: break;

I did find this

Code:

65CB 1 BYTE XPDR_XpndrSelector_2; false: 1 true: 265CC 1 BYTE XPDR_AltSourceSel_2 false: 1 true: 2 65CD 1 BYTE XPDR_ModeSel 0: STBY 1: ALT RPTG OFF ... 4: TA/RA 65CE 1 BYTE XPDR_annunFAIL Boolean

http://fsuipc.simflight.com/beta/Off...PMDG737NGX.pdf
11-27-2014, 10:45 PM
RobiD

Re: Progamming help with FSBus dll

Been away from building for a long... long time. Great to see this thread still going and helping people out. Don't forget to share your work (if you wish to) so that it helps others.

Cheers,
David
11-29-2014, 07:58 AM
388TH_A

Re: Progamming help with FSBus dll

im still stuck
11-30-2014, 06:53 AM
John_B

Re: Progamming help with FSBus dll

388TH_A

Is your issue the rotary encoders only counting up regardless of direction of rotation?

(I have had this)

If so there's a better than average change that they are either wired/connected incorrectly or the wrong type of switch is selected in the setup admin. If memory serves I also had to make sure also that one of the pairs the encoder uses has not already been assigned a rotary switch type (ie clear them back to basic toggles then assign em!)

John
03-16-2015, 01:52 PM
ThomasCaL

Appreciate you sharing, great forum.Much thanks again. Juarbe

Appreciate you sharing, great forum.Much thanks again. Whipkey
05-08-2015, 01:05 PM
388TH_A

Re: Progamming help with FSBus dll

ok so Back to where I was my knobs for my com1, com2 etc doesnt matter if you turn them to the left or right it makes the freq count up. And it does this for the FRA and DEC place.

Quote:

MkFsbusObject(BTP_ROTARY, C_RCOM1DEC, "OID", EventHandler, 29, 5);
MkFsbusObject(BTP_ROTARY, C_RCOM1FRA, "OID", EventHandler, 29, 3);

/*---------------------- COM1 Events ----------------------*/

case FS_COM1FREQUENCY:
Com1Fr = ((10000 + BCD2Int(val)) * 10 + 5) / 25 * 25; // rounded, units: 0.001
FsbusWrite(C_DCOM1, Com1Fr / 10); // to cockpit
break;
case FS_COM1STANDBY:
Com1FrStb = ((10000 + BCD2Int(val)) * 10 + 5) / 25 * 25;
FsbusWrite(C_DCOM1STB, Com1FrStb / 10); // to cockpit
break;
case C_RCOM1DEC:
x = Com1FrStb %1000;
x = x + 25 * val; // in steps of 0.025
if (x > 975) // upper limit: 0.975
x = 0;
else if (x < 0)
x = 975;
Com1FrStb = Com1FrStb / 1000 * 1000 + x; // units: 0.001
FsbusWrite(C_DCOM1STB, Com1FrStb / 10); // truncated to 0.01
x = Int2BCD((Com1FrStb % 100000) / 10); // stripped and truncated to 0.01
FsWrite(FS_COM1STANDBY, x); // to FS
break;
case C_RCOM1FRA:
x = Com1FrStb / 1000; // ahead of dec point
x = x + val; // in steps of 1.000
if (x > 136)
x = 118;
else if (x < 118)
x = 136;
Com1FrStb = x * 1000 + (Com1FrStb % 1000);
FsbusWrite(C_DCOM1STB, Com1FrStb / 10);
x = Int2BCD((Com1FrStb % 100000) / 10);
FsWrite(FS_COM1STANDBY, x);
break;
case C_SCOM1SWAP:
if(val==0)
FsWrite (FS_RADIOUSESTBYTOGGLE,0x08); // toggle bit 3 (COM1)
break;
case C_SCOM1TEST:
break;
05-08-2015, 01:35 PM
388TH_A

Re: Progamming help with FSBus dll

Ill look into that but I know im missing something because at one point in time I had everything working back when before I had to start over
05-09-2015, 07:51 PM
388TH_A

Re: Progamming help with FSBus dll

So went threw all of the code and looks like theres isnt any doubles of anything for the IDs
06-16-2015, 03:57 PM
388TH_A

Re: Progamming help with FSBus dll

So I worked on my stuff for a bit and then stopped for yrs and now im working on them again from time to time. So looks like on my IO board some of the connections might be touching for example you can have a switch on 00 but when you flip the switch 00 and 16 will be effected. This is also the same for 32,48 08,24 and 40,56. The other issue I found was I have to go to ever switch and rotary and Define it in the FSBUS Admin screen in the CDK in order for them to work like they should. If I dont then for example the Rotary will only count up. After fixing it, it will then count up and down so there for it was never the C++ like I thought.

Do you guys know of other ways to fix the rotarys with out going to each one and defining them in that Admin screen?
06-12-2017, 12:31 PM
cotheseest

Progamming help with FSBus dll

Why would an air conditioning company ask hvac techs what problems they are having with their heaters? Strange.

Show 40 post(s) from this thread on one page