Elektroniikkafoorumi.com

Digitaalielektroniikka :: Tuntimittari

jjw — Wed, 08 Feb 2012 03:01:41 GMT

Kirjoittaja: jjw
L�hetetty: Ke Hel 08, 2012 6:01 (GMT 3)

Ohjelma py�rii silmukassa, johon kuluu viivefunktion kuluttama aika + n�yt�lle ja eeprommiin kirjoittamiseen kuluva aika.
Siksi viiveen pit�� olla alle yksi sekunti.

Ymm�rsink� oikein, ett� aika kirjoitetaan eeprommiin sekunnin v�lein ?
Eeprommilla on rajallinen kest�vyys, tyypillisesti n. 10 miljoonaa kirjoituskertaa, joka t�ss� tulee t�yteen n. 2800 tunnin j�lkeen.

Miksi sekunnit luetaan eeprommista, kun sekunneiksi tulee 60 ?
Sama minuuttien kanssa.

Digitaalielektroniikka :: Tuntimittari

L18 — Tue, 07 Feb 2012 20:51:48 GMT

Kirjoittaja: L18
L�hetetty: Ti Hel 07, 2012 23:51 (GMT 3)

Ei tuosta nyt oikeen osaa sanoa, pit�isi tiet�� kiteen taajuus ja tuosta delay_ms funktiosta generoitu assembly-koodi.

Omat projektit ja viritykset :: LM317 s��det�v� virtal�hde

jjw — Tue, 07 Feb 2012 20:34:03 GMT

Kirjoittaja: jjw
L�hetetty: Ti Hel 07, 2012 23:34 (GMT 3)

Laita siihen kiinte� vastus maksimivirran mukaan eli R1 = 1.25/20mA
ja sen kanssa sarjaan potikka jonka vastus R2 =1.25/4mA - R1
Potikan liuku kytket��n potikan toiseen p��h�n.

Omat projektit ja viritykset :: LM317 s��det�v� virtal�hde

mlk — Tue, 07 Feb 2012 14:48:10 GMT

Kirjoittaja: mlk
L�hetetty: Ti Hel 07, 2012 17:48 (GMT 3)

Kiitos. Jotain ton tyylist� just hain en vaan l�yt�ny kuvia googlettamalla.. Mutta tolla kytkenn�ll� virtahan pysyy vakiona riippuen resistorin koosta.. Eli tarkotus olis saada siit� ulos 4-20mA potikkaa k��nt�m�ll�. Meneek� ihan sill� ett� iskee potikan suoraan ton resistorin paikalle vai tarviiko tehd� jotain kikkailuja.? Ja jos menee niin potikan mitoitus silloin ainakin teoreettisesti 1,25V/4mA eli minimi virran mukaan vai miten..?

Apua aloittelijoille :: Moottorisoitu "time lapse" slider

MHi — Tue, 07 Feb 2012 14:46:50 GMT

Kirjoittaja: MHi
L�hetetty: Ti Hel 07, 2012 17:46 (GMT 3)

Rtrtd kirjoitti:

Mit�h�n en tajua, kun tuossa Mhi:n kytkenn�ss� on nelj� toisella puolella ja noissa kytkimiss� on kolme molemmilla puolilla?

Mittaamallahan se selvi�� mutta ne yhteiset karvat, eli ne kaksi siell� piirroksessa vasemmalla, ovat kaksi keskimm�ist� nastaa kytkimen pohjassa. Yleismittarilla selvit�t sitten kumpaan reunaan se keskinasta yhdistyy kun vipstaakin v��nt�� ensin toiseen ja sitten toiseen reunaan.

Apua aloittelijoille :: Moottorisoitu "time lapse" slider

Rtrtd — Tue, 07 Feb 2012 14:27:30 GMT

Kirjoittaja: Rtrtd
L�hetetty: Ti Hel 07, 2012 17:27 (GMT 3)

Mit�h�n en tajua, kun tuossa Mhi:n kytkenn�ss� on nelj� toisella puolella ja noissa kytkimiss� on kolme molemmilla puolilla?

t�n��n tuli postista trapetsikierretanko ja mutteri, alumiinikulmalistat l�ytyy kiskoiksi ja jalustamutteri ja ruuvi on. Saa n�hd� ett� kauanko noihin ulkomaan tilauksiin menee ett� p��see aloittelemaan kasaamista.

Digitaalielektroniikka :: Tuntimittari

P10neer1 — Tue, 07 Feb 2012 10:29:12 GMT

Kirjoittaja: P10neer1
L�hetetty: Ti Hel 07, 2012 13:29 (GMT 3)

Tuossa Flowcoden antama C versio ohjelmasta analysoitavaksi, jos tuosta nyt selv�� saa.

#define MX_PIC

//M��ritt�� mikro-ohjaimen
#define P16F84A
#define MX_EE
#define MX_EE_TYPE1
#define MX_EE_SIZE 64

//funktiot
#define MX_CLK_SPEED 4000000
#ifdef _BOOSTC
#include <system.h>
#endif
#ifdef HI_TECH_C
#include <pic.h>
#endif

//Konfigurointi data
#ifdef _BOOSTC
#pragma DATA 0x2007, 0x3ffa
#endif
#ifdef HI_TECH_C
__CONFIG(0x3ffa);
#endif

//Sis�iset toiminnot
#include "C:\Program Files\Matrix Multimedia\Flowcode V4\FCD\internals.h"

//Makro-funktion kuvaukset

//Muuttujakuvaukset
char FCV_NOLLAUS;
char FCV_MINUUTTI;
char FCV_MUISTI;
char FCV_KYTKIN;
char FCV_SEKUNTI;
char FCV_TUNTI;

//Defines:

/**** Macro Substitutions ****
portb = D1 Port
trisb = D1 Data Direction
portb = D2 Port
trisb = D2 Data Direction
portb = D3 Port
trisb = D3 Data Direction
portb = D4 Port
trisb = D4 Data Direction
portb = RS Port
trisb = RS Data Direction
portb = E Port
trisb = E Data Direction
0 = Data 1_Pin
1 = Data 2 Pin
2 = Data 3 Pin
3 = Data 4 Pin
4 = RS Pin
5 = Enable Pin
LCD_657806 = Unique Component Reference Number
2 = Row Count
16 = Column Count
******************************/

//component connections
#define LCD_657806_PORT0 portb
#define LCD_657806_TRIS0 trisb
#define LCD_657806_PORT1 portb
#define LCD_657806_TRIS1 trisb
#define LCD_657806_PORT2 portb
#define LCD_657806_TRIS2 trisb
#define LCD_657806_PORT3 portb
#define LCD_657806_TRIS3 trisb
#define LCD_657806_PORT4 portb
#define LCD_657806_TRIS4 trisb
#define LCD_657806_PORT5 portb
#define LCD_657806_TRIS5 trisb
#define LCD_657806_BIT0 0
#define LCD_657806_BIT1 1
#define LCD_657806_BIT2 2
#define LCD_657806_BIT3 3
#define LCD_657806_RS 4
#define LCD_657806_E 5
#define LCD_657806_ROWCNT 2
#define LCD_657806_COLCNT 16

#ifdef _BOOSTC
#define LCD_657806_DELAY delay_10us(10)
#endif
#ifdef _C2C_
#define LCD_657806_DELAY delay_us(100)
#endif
#ifdef HI_TECH_C
#define LCD_657806_DELAY __delay_us(120)
#endif
#ifndef LCD_657806_DELAY
#define LCD_657806_DELAY delay_us(100)
#endif

//LCDDisplay0: //Makro-funktion kuvaukset

void FCD_LCDDisplay0_RawSend(char in, char mask);
void FCD_LCDDisplay0_Start();
void FCD_LCDDisplay0_Clear();
void FCD_LCDDisplay0_PrintASCII(char Character);
void FCD_LCDDisplay0_Command(char in);
void FCD_LCDDisplay0_Cursor(char x, char y);
void FCD_LCDDisplay0_PrintNumber(short Number);
void FCD_LCDDisplay0_PrintString(char* String, char MSZ_String);
void FCD_LCDDisplay0_ScrollDisplay(char Direction, char Num_Positions);
void FCD_LCDDisplay0_ClearLine(char Line);
void FCD_LCDDisplay0_RAM_Write(char nIdx, char d0, char d1, char d2, char d3, char d4, char d5, char d6, char d7);
//Defines:

/**** Macro Substitutions ****
******************************/

//EEPROM0: //Makro-funktion kuvaukset

char FCD_EEPROM0_EEPROMRead(short addr);
void FCD_EEPROM0_WriteEEPROM(short addr, char data);

//LCDDisplay0: //Makro-toteutukset

void FCD_LCDDisplay0_RawSend(char in, char mask)
{
unsigned char pt;

clear_bit(LCD_657806_PORT0, LCD_657806_BIT0);
clear_bit(LCD_657806_PORT1, LCD_657806_BIT1);
clear_bit(LCD_657806_PORT2, LCD_657806_BIT2);
clear_bit(LCD_657806_PORT3, LCD_657806_BIT3);
clear_bit(LCD_657806_PORT4, LCD_657806_RS);
clear_bit(LCD_657806_PORT5, LCD_657806_E);
pt = ((in >> 4) & 0x0f);
if (pt & 0x01)
set_bit(LCD_657806_PORT0, LCD_657806_BIT0);
if (pt & 0x02)
set_bit(LCD_657806_PORT1, LCD_657806_BIT1);
if (pt & 0x04)
set_bit(LCD_657806_PORT2, LCD_657806_BIT2);
if (pt & 0x08)
set_bit(LCD_657806_PORT3, LCD_657806_BIT3);
if (mask)
set_bit(LCD_657806_PORT4, LCD_657806_RS);
LCD_657806_DELAY;
set_bit (LCD_657806_PORT5, LCD_657806_E);
LCD_657806_DELAY;
clear_bit (LCD_657806_PORT5, LCD_657806_E);
pt = (in & 0x0f);
LCD_657806_DELAY;
clear_bit(LCD_657806_PORT0, LCD_657806_BIT0);
clear_bit(LCD_657806_PORT1, LCD_657806_BIT1);
clear_bit(LCD_657806_PORT2, LCD_657806_BIT2);
clear_bit(LCD_657806_PORT3, LCD_657806_BIT3);
clear_bit(LCD_657806_PORT4, LCD_657806_RS);
clear_bit(LCD_657806_PORT5, LCD_657806_E);
if (pt & 0x01)
set_bit(LCD_657806_PORT0, LCD_657806_BIT0);
if (pt & 0x02)
set_bit(LCD_657806_PORT1, LCD_657806_BIT1);
if (pt & 0x04)
set_bit(LCD_657806_PORT2, LCD_657806_BIT2);
if (pt & 0x08)
set_bit(LCD_657806_PORT3, LCD_657806_BIT3);
if (mask)
set_bit(LCD_657806_PORT4, LCD_657806_RS);
LCD_657806_DELAY;
set_bit (LCD_657806_PORT5, LCD_657806_E);
LCD_657806_DELAY;
clear_bit (LCD_657806_PORT5, LCD_657806_E);
LCD_657806_DELAY;
}

void FCD_LCDDisplay0_Start()
{

clear_bit(LCD_657806_TRIS0, LCD_657806_BIT0);
clear_bit(LCD_657806_TRIS1, LCD_657806_BIT1);
clear_bit(LCD_657806_TRIS2, LCD_657806_BIT2);
clear_bit(LCD_657806_TRIS3, LCD_657806_BIT3);
clear_bit(LCD_657806_TRIS4, LCD_657806_RS);
clear_bit(LCD_657806_TRIS5, LCD_657806_E);

Wdt_Delay_Ms(12);

FCD_LCDDisplay0_RawSend(0x33, 0);
Wdt_Delay_Ms(2);
FCD_LCDDisplay0_RawSend(0x33, 0);
Wdt_Delay_Ms(2);
FCD_LCDDisplay0_RawSend(0x32, 0);
Wdt_Delay_Ms(2);
FCD_LCDDisplay0_RawSend(0x2c, 0);
Wdt_Delay_Ms(2);
FCD_LCDDisplay0_RawSend(0x06, 0);
Wdt_Delay_Ms(2);
FCD_LCDDisplay0_RawSend(0x0c, 0);
Wdt_Delay_Ms(2);

//clear the display
FCD_LCDDisplay0_RawSend(0x01, 0);
Wdt_Delay_Ms(2);
FCD_LCDDisplay0_RawSend(0x02, 0);
Wdt_Delay_Ms(2);

}

void FCD_LCDDisplay0_Clear()
{

FCD_LCDDisplay0_RawSend(0x01, 0);
Wdt_Delay_Ms(2);
FCD_LCDDisplay0_RawSend(0x02, 0);
Wdt_Delay_Ms(2);

}

void FCD_LCDDisplay0_PrintASCII(char Character)
{

FCD_LCDDisplay0_RawSend(Character, 0x10);

}

void FCD_LCDDisplay0_Command(char in)
{

FCD_LCDDisplay0_RawSend(in, 0);
Wdt_Delay_Ms(2);

}

void FCD_LCDDisplay0_Cursor(char x, char y)
{

#if (LCD_657806_ROWCNT == 1)
y=0x80;
#endif

#if (LCD_657806_ROWCNT == 2)
if (y==0)
y=0x80;
else
y=0xc0;
#endif

#if (LCD_657806_ROWCNT == 4)
if (y==0)
y=0x80;
else if (y==1)
y=0xc0;

#if (LCD_657806_COLCNT == 16)
else if (y==2)
y=0x90;
else
y=0xd0;
#endif

#if (LCD_657806_COLCNT == 20)
else if (y==2)
y=0x94;
else
y=0xd4;
#endif
#endif

FCD_LCDDisplay0_RawSend(y+x, 0);
Wdt_Delay_Ms(2);

}

void FCD_LCDDisplay0_PrintNumber(short Number)
{

short tmp_int;
char tmp_byte;
if (Number < 0)
{
FCD_LCDDisplay0_RawSend('-', 0x10);
Number = 0 - Number;
}

tmp_int = Number;
if (Number >= 10000)
{
tmp_byte = tmp_int / 10000;
FCD_LCDDisplay0_RawSend('0' + tmp_byte, 0x10);

while (tmp_byte > 0)
{
tmp_int = tmp_int - 10000;
tmp_byte--;
}
}
if (Number >= 1000)
{
tmp_byte = tmp_int / 1000;
FCD_LCDDisplay0_RawSend('0' + tmp_byte, 0x10);

while (tmp_byte > 0)
{
tmp_int = tmp_int - 1000;
tmp_byte--;
}
}
if (Number >= 100)
{
tmp_byte = tmp_int / 100;
FCD_LCDDisplay0_RawSend('0' + tmp_byte, 0x10);

while (tmp_byte > 0)
{
tmp_int = tmp_int - 100;
tmp_byte--;
}
}
if (Number >= 10)
{
tmp_byte = tmp_int / 10;
FCD_LCDDisplay0_RawSend('0' + tmp_byte, 0x10);

while (tmp_byte > 0)
{
tmp_int = tmp_int - 10;
tmp_byte--;
}
}
FCD_LCDDisplay0_RawSend('0' + tmp_int, 0x10);

}

void FCD_LCDDisplay0_PrintString(char* String, char MSZ_String)
{

char idx = 0;

for (idx=0; idx<MSZ_String; idx++)
{
#ifdef _BOOSTC
if (String[idx] == 0)
{
break;
}
FCD_LCDDisplay0_RawSend(String[idx], 0x10);
#endif

#ifdef HI_TECH_C
if (*String == 0)
{
break;
}
FCD_LCDDisplay0_RawSend(*String, 0x10);
String++;
#endif
}

}

void FCD_LCDDisplay0_ScrollDisplay(char Direction, char Num_Positions)
{

char cmd = 0;
char count;

//Choose the direction
switch (Direction)
{
case 0:
case 'l':
case 'L':

cmd = 0x18;
break;

case 1:
case 'r':
case 'R':

cmd = 0x1C;
break;

default:
break;
}

//If direction accepted then scroll the specified amount
if (cmd)
{
for (count = 0; count < Num_Positions; count++)
FCD_LCDDisplay0_Command(cmd);
}

}

void FCD_LCDDisplay0_ClearLine(char Line)
{

char count;
char rowcount;

//Define number of columns per line
#if (LCD_657806_ROWCNT == 1)
rowcount=80;
#endif

#if (LCD_657806_ROWCNT == 2)
rowcount=40;
#endif

#if (LCD_657806_ROWCNT == 4)
#if (LCD_657806_COLCNT == 16)
rowcount=16;
#endif
#if (LCD_657806_COLCNT == 20)
rowcount=20;
#endif
#endif

//Start at beginning of the line
FCD_LCDDisplay0_Cursor (0, Line);

//Send out spaces to clear line
for (count = 0; count < rowcount; count++)
FCD_LCDDisplay0_RawSend(' ', 0x10);

//Move back to the beginning of the line.
FCD_LCDDisplay0_Cursor (0, Line);

}

void FCD_LCDDisplay0_RAM_Write(char nIdx, char d0, char d1, char d2, char d3, char d4, char d5, char d6, char d7)
{
//set CGRAM address
FCD_LCDDisplay0_RawSend(64 + (nIdx << 3), 0);
delay_ms(2);

//write CGRAM data
FCD_LCDDisplay0_RawSend(d0, 0x10);
FCD_LCDDisplay0_RawSend(d1, 0x10);
FCD_LCDDisplay0_RawSend(d2, 0x10);
FCD_LCDDisplay0_RawSend(d3, 0x10);
FCD_LCDDisplay0_RawSend(d4, 0x10);
FCD_LCDDisplay0_RawSend(d5, 0x10);
FCD_LCDDisplay0_RawSend(d6, 0x10);
FCD_LCDDisplay0_RawSend(d7, 0x10);

//Clear the display
FCD_LCDDisplay0_RawSend(0x01, 0);
delay_ms(2);
FCD_LCDDisplay0_RawSend(0x02, 0);
delay_ms(2);
}

//EEPROM0: //Makro-toteutukset

char FCD_EEPROM0_EEPROMRead(short addr)
{
char data = 0;

#ifdef _BOOSTC
#ifdef MX_EE
#ifndef MX_EEADR
#ifdef EEADR
#define MX_EEADR eeadr
#endif
#ifdef EEADRL
#define MX_EEADR eeadrl
#endif
#endif
#ifndef MX_EEDATA
#ifdef EEDATA
#define MX_EEDATA eedata
#endif
#ifdef EEDATAL
#define MX_EEDATA eedatal
#endif
#ifdef EEDATL
#define MX_EEDATA eedatl
#endif
#endif

#ifndef MX_EEADR //Catch Error
#pragma error EEPROM error - MX_EEADR not set
#endif

#ifndef MX_EEDATA
#pragma error EEPROM error - MX_EEDATA not set
#endif

MX_EEADR = addr & 0xff;
#if (MX_EE_SIZE > 256)
eeadrh = (addr & 0xff00) >> 8;
#endif
#ifdef MX_EE_TYPE2
clear_bit(eecon1, EEPGD);
#endif
#ifdef MX_EE_TYPE3
clear_bit(eecon1, EEPGD);
clear_bit(eecon1, CFGS);
#endif
set_bit(eecon1, RD);
data = MX_EEDATA;
#else
#ifdef MX_EE_TYPE67X
#pragma error "FlowCode does not support EEPROM for this device"
#else
#ifdef MX_EE_TYPE62X
#pragma error "FlowCode does not support EEPROM for this device"
#else
#pragma error "Chip does not have EEPROM memory"
#endif
#endif
#endif
#endif
#ifdef HI_TECH_C
data = eeprom_read(addr);
#endif

return (data);

}

void FCD_EEPROM0_WriteEEPROM(short addr, char data)
{
#ifdef _BOOSTC
#ifdef MX_EE
#ifndef MX_EEADR
#ifdef EEADR
#define MX_EEADR eeadr
#endif
#ifdef EEADRL
#define MX_EEADR eeadrl
#endif
#endif
#ifndef MX_EEDATA
#ifdef EEDATA
#define MX_EEDATA eedata
#endif
#ifdef EEDATAL
#define MX_EEDATA eedatal
#endif
#endif

#ifndef MX_EEADR //Catch Error
#pragma error EEPROM error - MX_EEADR not set
#endif

#ifndef MX_EEDATA
#pragma error EEPROM error - MX_EEDATA not set
#endif

char bInterruptsEnabled;

//wait for previous EE writes to complete...
while (test_bit(eecon1, WR));

MX_EEADR = addr & 0xff;
#if (MX_EE_SIZE > 256)
eeadrh = (addr & 0xff00) >> 8;
#endif
MX_EEDATA = data;
#ifdef MX_EE_TYPE2
clear_bit(eecon1, EEPGD);
#endif
#ifdef MX_EE_TYPE3
clear_bit(eecon1, EEPGD);
clear_bit(eecon1, CFGS);
#endif
set_bit(eecon1, WREN);
bInterruptsEnabled = test_bit(intcon, GIE);
clear_bit(intcon, GIE); //Disable Interrupts

eecon2 = 0x55;
eecon2 = 0xAA;
set_bit(eecon1, WR);
while (test_bit(eecon1, WR)); //wait for EE write to complete...

if (bInterruptsEnabled)
set_bit(intcon, GIE); //Re-enable Interrupts
clear_bit(eecon1, WREN);
#else
#ifdef MX_EE_TYPE67X
#pragma error FlowCode does not support EEPROM for this device
#else
#ifdef MX_EE_TYPE62X
#pragma error FlowCode does not support EEPROM for this device
#else
#pragma error Chip does not have EEPROM memory
#endif
#endif
#endif
#endif
#ifdef HI_TECH_C
eeprom_write(addr, data);
#endif

}

//Makro-toteutukset

void main()
{

//alustus

//Keskeytyksen alustuskoodi
option_reg = 0xC0;

//Kommentti:
//Luetaan muistista tunnit

//Kutsu komponenttimakro
//Kutsu komponenttimakro: Tunti=EEPROM(0)::Read(0)
FCV_TUNTI = FCD_EEPROM0_EEPROMRead(0);

//Kutsu komponenttimakro
//Kutsu komponenttimakro: Minuutti=EEPROM(0)::Read(1)
FCV_MINUUTTI = FCD_EEPROM0_EEPROMRead(1);

//Kutsu komponenttimakro
//Kutsu komponenttimakro: sekunti=EEPROM(0)::Read(2)
FCV_SEKUNTI = FCD_EEPROM0_EEPROMRead(2);

//Liit�nt�piste
//Liit�nt�piste: [D]: D
FCC_Perusohjelma_D:
;

//Kommentti:
//Tunti

//Kutsu komponenttimakro
//Kutsu komponenttimakro: LCDDisplay(0)::Start
FCD_LCDDisplay0_Start();

//Kutsu komponenttimakro
//Kutsu komponenttimakro: LCDDisplay(0)::Nollaa
FCD_LCDDisplay0_Clear();

//Kutsu komponenttimakro
//Kutsu komponenttimakro: LCDDisplay(0)::Tulostanumero(Tunti)
FCD_LCDDisplay0_PrintNumber(FCV_TUNTI);

//Kommentti:
//Minuutti

//Kutsu komponenttimakro
//Kutsu komponenttimakro: LCDDisplay(0)::Kursori(2, 0)
FCD_LCDDisplay0_Cursor(2, 0);

//Kutsu komponenttimakro
//Kutsu komponenttimakro: LCDDisplay(0)::Tulostamerkkijono(":")
FCD_LCDDisplay0_PrintString(":",1);

//Kutsu komponenttimakro
//Kutsu komponenttimakro: LCDDisplay(0)::Tulostanumero(Minuutti)
FCD_LCDDisplay0_PrintNumber(FCV_MINUUTTI);

//Kommentti:
//Sekunti

//Kutsu komponenttimakro
//Kutsu komponenttimakro: LCDDisplay(0)::Kursori(5, 0)
FCD_LCDDisplay0_Cursor(5, 0);

//Kutsu komponenttimakro
//Kutsu komponenttimakro: LCDDisplay(0)::Tulostamerkkijono(":")
FCD_LCDDisplay0_PrintString(":",1);

//Kutsu komponenttimakro
//Kutsu komponenttimakro: LCDDisplay(0)::Tulostanumero(sekunti)
FCD_LCDDisplay0_PrintNumber(FCV_SEKUNTI);

//Liit�nt�piste
//Liit�nt�piste: [B]: B
FCC_Perusohjelma_B:
;

//Liit�nt�piste
//Liit�nt�piste: [C]: C
FCC_Perusohjelma_C:
;

//Liit�nt�piste
//Liit�nt�piste: [A]: A
FCC_Perusohjelma_A:
;

//P��t�s
//P��t�s: sekunti = 60?
if (FCV_SEKUNTI == 60)
{
//Kutsu komponenttimakro
//Kutsu komponenttimakro: sekunti=EEPROM(0)::Read(2)
FCV_SEKUNTI = FCD_EEPROM0_EEPROMRead(2);

//Laskutoimitus
//Laskutoimitus:
// Minuutti = Minuutti + 1
FCV_MINUUTTI = FCV_MINUUTTI + 1;

//Kutsu komponenttimakro
//Kutsu komponenttimakro: LCDDisplay(0)::Kursori(2, 0)
FCD_LCDDisplay0_Cursor(2, 0);

//Kutsu komponenttimakro
//Kutsu komponenttimakro: LCDDisplay(0)::Tulostamerkkijono(":")
FCD_LCDDisplay0_PrintString(":",1);

//Kutsu komponenttimakro
//Kutsu komponenttimakro: LCDDisplay(0)::Tulostanumero(Minuutti)
FCD_LCDDisplay0_PrintNumber(FCV_MINUUTTI);

//P��t�s
//P��t�s: Minuutti = 60?
if (FCV_MINUUTTI == 60)
{
//Kutsu komponenttimakro
//Kutsu komponenttimakro: Minuutti=EEPROM(0)::Read(1)
FCV_MINUUTTI = FCD_EEPROM0_EEPROMRead(1);

//Kutsu komponenttimakro
//Kutsu komponenttimakro: Tunti=EEPROM(0)::Read(0)
FCV_TUNTI = FCD_EEPROM0_EEPROMRead(0);

//Kutsu komponenttimakro
//Kutsu komponenttimakro: LCDDisplay(0)::Nollaa
FCD_LCDDisplay0_Clear();

//Laskutoimitus
//Laskutoimitus:
// Tunti = Tunti + 1
FCV_TUNTI = FCV_TUNTI + 1;

//Laskutoimitus
//Laskutoimitus:
// sekunti = 0
// Minuutti = 0
FCV_SEKUNTI = 0;
FCV_MINUUTTI = 0;

//Kutsu komponenttimakro
//Kutsu komponenttimakro: LCDDisplay(0)::Tulostanumero(Tunti)
FCD_LCDDisplay0_PrintNumber(FCV_TUNTI);

//Kutsu komponenttimakro
//Kutsu komponenttimakro: LCDDisplay(0)::Kursori(2, 0)
FCD_LCDDisplay0_Cursor(2, 0);

//Kutsu komponenttimakro
//Kutsu komponenttimakro: LCDDisplay(0)::Tulostamerkkijono(":")
FCD_LCDDisplay0_PrintString(":",1);

//Kutsu komponenttimakro
//Kutsu komponenttimakro: LCDDisplay(0)::Tulostanumero(Minuutti)
FCD_LCDDisplay0_PrintNumber(FCV_MINUUTTI);

//Kutsu komponenttimakro
//Kutsu komponenttimakro: EEPROM(0)::Write(0, Tunti)
FCD_EEPROM0_WriteEEPROM(0, FCV_TUNTI);

//Mene liit�nt�pisteeseen
//Mene liit�nt�pisteeseen: [C]: C
goto FCC_Perusohjelma_C;

} else {
//Kutsu komponenttimakro
//Kutsu komponenttimakro: EEPROM(0)::Write(1, Minuutti)
FCD_EEPROM0_WriteEEPROM(1, FCV_MINUUTTI);

//Kutsu komponenttimakro
//Kutsu komponenttimakro: LCDDisplay(0)::Kursori(6, 0)
FCD_LCDDisplay0_Cursor(6, 0);

//Kutsu komponenttimakro
//Kutsu komponenttimakro: LCDDisplay(0)::Tulostamerkkijono("0 ")
FCD_LCDDisplay0_PrintString("0 ",2);

//Laskutoimitus
//Laskutoimitus:
// sekunti = 0
FCV_SEKUNTI = 0;

//Mene liit�nt�pisteeseen
//Mene liit�nt�pisteeseen: [A]: A
goto FCC_Perusohjelma_A;

}

} else {
//Tulo
//Tulo: PORT A -> Kytkin
trisa = trisa | 0xff;
FCV_KYTKIN = porta;

//Kommentti:
//Jos kytkin on 5s "1" niin laskuri nollataan

//P��t�s
//P��t�s: Kytkin=0?
if (FCV_KYTKIN==0)
{
//Laskutoimitus
//Laskutoimitus:
// Nollaus = Nollaus+1
FCV_NOLLAUS = FCV_NOLLAUS+1;

//P��t�s
//P��t�s: Nollaus=5?
if (FCV_NOLLAUS==5)
{
//Laskutoimitus
//Laskutoimitus:
// Nollaus = 0
// Tunti = 0
// Minuutti = 0
// sekunti = 0
FCV_NOLLAUS = 0;
FCV_TUNTI = 0;
FCV_MINUUTTI = 0;
FCV_SEKUNTI = 0;

//Kutsu komponenttimakro
//Kutsu komponenttimakro: EEPROM(0)::Write(0, Tunti)
FCD_EEPROM0_WriteEEPROM(0, FCV_TUNTI);

//Kutsu komponenttimakro
//Kutsu komponenttimakro: EEPROM(0)::Write(1, Minuutti)
FCD_EEPROM0_WriteEEPROM(1, FCV_MINUUTTI);

//Mene liit�nt�pisteeseen
//Mene liit�nt�pisteeseen: [D]: D
goto FCC_Perusohjelma_D;

}

} else {
//Laskutoimitus
//Laskutoimitus:
// Nollaus = 0
FCV_NOLLAUS = 0;

}

//Kutsu komponenttimakro
//Kutsu komponenttimakro: EEPROM(0)::Write(2, sekunti)
FCD_EEPROM0_WriteEEPROM(2, FCV_SEKUNTI);

//Laskutoimitus
//Laskutoimitus:
// sekunti = sekunti + 1
FCV_SEKUNTI = FCV_SEKUNTI + 1;

//Viive
//Viive: 988 ms
delay_ms(255);
delay_ms(255);
delay_ms(255);
delay_ms(223);

//Viive
//Viive: 360 us
delay_us(255);
delay_us(105);

//Kutsu komponenttimakro
//Kutsu komponenttimakro: LCDDisplay(0)::Kursori(5, 0)
FCD_LCDDisplay0_Cursor(5, 0);

//Kutsu komponenttimakro
//Kutsu komponenttimakro: LCDDisplay(0)::Tulostamerkkijono(":")
FCD_LCDDisplay0_PrintString(":",1);

//Kutsu komponenttimakro
//Kutsu komponenttimakro: LCDDisplay(0)::Tulostanumero(sekunti)
FCD_LCDDisplay0_PrintNumber(FCV_SEKUNTI);

//Mene liit�nt�pisteeseen
//Mene liit�nt�pisteeseen: [B]: B
goto FCC_Perusohjelma_B;

}

mainendloop: goto mainendloop;
}

void MX_INTERRUPT_MACRO(void)
{
}

Digitaalielektroniikka :: Tuntimittari

Jussi — Tue, 07 Feb 2012 10:17:32 GMT

Kirjoittaja: Jussi
L�hetetty: Ti Hel 07, 2012 13:17 (GMT 3)

Siksi ajan laskeminen olisikin hyv� tehd� lyhyess� keskeytysrutiinissa, ettei mahdollisesti vaihtelevan pituinen muun ohjelman suorittaminen muuttelisi
aikalaskennan tarkkuutta.

Digitaalielektroniikka :: Tuntimittari

jjw — Tue, 07 Feb 2012 09:27:35 GMT

Kirjoittaja: jjw
L�hetetty: Ti Hel 07, 2012 12:27 (GMT 3)

P10neer1 kirjoitti:

- Mit�s tuolla keskeytyksill� tarkoitettiin, onko ne niit� jos jossain kohtaa ohjelmaa palataan vaikka alkuun. Ohjelmassani on sellaisia esim ."mene liit�nt�pisteeseen A"

Keskeytys on mekanismi, jossa jokin ulkoinen ( esim. n�pp�imen painallus ) tai sis�inen ( esim. ajastimen py�r�ht�minen nollaan ) signaali keskeytt��
suorituksessa olevan ohjelman ja hyp�t��n suorittamaan keskeytysaliohjelmaa.

Digitaalielektroniikka :: Tuntimittari

P10neer1 — Tue, 07 Feb 2012 09:06:18 GMT

Kirjoittaja: P10neer1
L�hetetty: Ti Hel 07, 2012 12:06 (GMT 3)

- On kideoskillaattori

-Jouduin tekem��n viiven kahdella "viivepalikalla", koska yhden viiven
tarkkuus ei riitt�nyt.

- Mit�s tuolla keskeytyksill� tarkoitettiin, onko ne niit� jos jossain kohtaa ohjelmaa palataan vaikka alkuun. Ohjelmassani on sellaisia esim ."mene liit�nt�pisteeseen A"

Nyt tuo laskuri edist�� noin 15min vuodessa, joten k�yt�nn�ss� ei merkityst� kun ei sit� m�nt�� minuutilleen eik� tunnilleen tarvii vaihtaa. Hieman silti viel� s��d�n tarkemmaksi.

Digitaalielektroniikka :: Tuntimittari

jjw — Tue, 07 Feb 2012 08:25:58 GMT

Kirjoittaja: jjw
L�hetetty: Ti Hel 07, 2012 11:25 (GMT 3)

P10neer1 kirjoitti:

Joo se on 16f84a, mulla on tossa b-portissa toi n�ytt� ja a-portissa yksi kytkin.

Onko muuten normaalia ett�, kun ohjelmassa lukee 1s viive niin oikeasti se on vaikka 1.1s, olettaen ett� kaikki oskillaattorit ja muut on oikein aseteltu. Olen vertaillut tuota tuntilaskuria tietokoneen kelloon niin 988.5ms on jo l�hell� oikeaa viiveen asetusarvoa.

Onko oskillaattori kideoskillaattori ?
Yleens� viiveet on toteutettu softa-silmukalla ja voisivat periaatteessa olla suht. tarkkoja, mutta jos esim. 1ms viive on toteutettu useammalla lyhyemm�ll� viiveell� virheet kertautuvat.
K�ytt��k� ohjelmasi keskeytyksia ?
Ne pident�v�t softalla tehty� viivett�.
Tarkka kello pit�isi toteuttaa PIC:n ajastimella.

Apua aloittelijoille :: Moottorisoitu "time lapse" slider

L18 — Tue, 07 Feb 2012 08:04:35 GMT

Kirjoittaja: L18
L�hetetty: Ti Hel 07, 2012 11:04 (GMT 3)

Sill�h�n ei sin�ns� ole v�li�, tuolla se pys�htyy jompaan kumpaan reunaan, ja l�htee uudestaan liikkeelle vasta kun kytkin siirret��n toiseen asentoon.
Tietty onhan se hyv� ett� saa kelkan pys�ytetty� tarvittaessa.

Apua aloittelijoille :: Moottorisoitu "time lapse" slider

MHi — Tue, 07 Feb 2012 07:59:29 GMT

Kirjoittaja: MHi
L�hetetty: Ti Hel 07, 2012 10:59 (GMT 3)

^Tuon kytkimen kanssa tarvitaan viel� p��kytkin sill� tuo on aina jommassa kummassa asennossa.

T�ss� on kolme asentoa eli keskell� off
http://www.bebek.fi/kauppa/lisatiedot.php?&tuote_id=1346

Digitaalielektroniikka :: Tuntimittari

L18 — Tue, 07 Feb 2012 05:37:06 GMT

Kirjoittaja: L18
L�hetetty: Ti Hel 07, 2012 8:37 (GMT 3)

P10neer1 kirjoitti:

Eli viive on v�h�n reilu 10ms pidempi kuin pit��?
En tied� kuinka tarkkaan tuo flowcode osaa tehd� oikean koodin, ett� viive olisi juuri oikean mittainen.

Apua aloittelijoille :: Moottorisoitu "time lapse" slider

L18 — Tue, 07 Feb 2012 05:29:48 GMT

Kirjoittaja: L18
L�hetetty: Ti Hel 07, 2012 8:29 (GMT 3)

Esim. Tuollainen kytkin: http://www.partco.biz/verkkokauppa/product_info.php?products_id=7284

Apua aloittelijoille :: Moottorisoitu "time lapse" slider

Rtrtd — Tue, 07 Feb 2012 05:16:48 GMT

Kirjoittaja: Rtrtd
L�hetetty: Ti Hel 07, 2012 8:16 (GMT 3)

1rpm oli vain kun j�nnite on 12v ja ilman kuormaa, eli todellinen nopeus on paljon alle sen. Mutta ei se saisikaan py�ri� paljon koska jos se py�ritt�� kameraa yli 180 astetta siin� ajassa kun telakka on mennyt p��st� toiseen, tulevat kiskot n�kyviin kuvaan. Ja kun laajakulma objektiivilla kuvataan on kuvakulmakin yli 100 astetta, olisiko ollut yli 130 astetta, niin ei kamera saa en�� py�ri� kuin enint��n 50 astetta. Mekaniikasta on tulossa hyv�.

Joo, noinhan sen onnistuu, mutta mist� saan kytkimen jossa on 4 sis��n ja 2 ulos? Vai mink�laisella kytkimell� tuo toteutetaan?

Apua aloittelijoille :: Moottorisoitu "time lapse" slider

GaryP — Mon, 06 Feb 2012 22:01:08 GMT

Kirjoittaja: GaryP
L�hetetty: Ti Hel 07, 2012 1:01 (GMT 3)

Mik� muuten mahtaa olla moottorin nimellinen k�ytt�j�nnite ku nopeus on 1rpm? Mulla on muuta vaihteistomoottori, ja minimitoimintaj�nnite, jossa v��nt�� l�ytyy, on huomattavasti alle oletuksen. Kannattaa k�yd� l�pi moottorin resurssit parista voltista eteenpin, ja sitten mitoittaa se v�lityshammastus.

Olikohan tuo mun 3rpm sellainen ett� j�nnitteen ollessa luokkaa 2,2V, nopeus oli en�� puoli kierrosta minuutissa. Ja v��nt�� riitti enemm�n kuin pystyi sormin vastusta antamaan.

Kari
_________________
Espoo, Finland

Omat projektit ja viritykset :: LM317 s��det�v� virtal�hde

jjw — Mon, 06 Feb 2012 20:58:19 GMT

Kirjoittaja: jjw
L�hetetty: Ma Hel 06, 2012 23:58 (GMT 3)

T�ss� on LM317 kytkent� vakiovirtal�hteen�:
http://users.telenet.be/davshomepage/current-source.htm
Vastuksen arvo n. 1.25V/I
En tied� p��seek� tuolla 4mA:n alarajalle saakka.
Kokeilemalla selvi��.

Apua aloittelijoille :: Moottorisoitu "time lapse" slider

MHi — Mon, 06 Feb 2012 20:17:55 GMT

Kirjoittaja: MHi
L�hetetty: Ma Hel 06, 2012 23:17 (GMT 3)

Rtrtd kirjoitti:

Enk�h�n p�rj�� t�m�n kanssa niinkin ett� v�h�n tuuppaan sit� eteenp�in sen verran ett� rajakytkin sulkee taas virtapiirin.

Tuuppaaminen on v�h�n hankalaa koska kelkka kulkee jengoilla. Pit�� siis py�ritt�� k�sin sit� kierretankoa.

T�s� on yksinkertainen periaatekytkent� tuosta rajakytkimest�.

s1:ll� kytket��n ajosuunta ja siin� on my�s "vapaa".
s2 ja s3 esitt�v�t avautuvia rajakytkimi�.

Kun s1 k��nnet��n yl�s, menee moottorille + yl�s ja - alas. Kun kelkka tulee p��tyyn, se aukaisee rajakytkimen s2 jolloin kulku pys�htyy.
Kun kytkimen nyt k��nt�� alas, kulkee virta kiinni olevan s3:n kautta ja moottorille menee - yl�s ja + alas ja moottori p��see py�rim��n toiseen suuntaan.

Yll�pito :: HUOLTOKATKO 10.2. 2200 alkaen.

Lahha — Mon, 06 Feb 2012 19:47:06 GMT

Kirjoittaja: Lahha
Aihe: HUOLTOKATKO 10.2. 2200 alkaen.
L�hetetty: Ma Hel 06, 2012 22:47 (GMT 3)

Vaihdan foorumin ohjelmiston uudempaan versioon.

Etuk�teen voi testailla tuolla: http://www.elektroniikkafoorumi.com/phpBB3/index.php
_________________
-Yll�pito
yllapito (at) elektroniikkafoorumi.com

Apua aloittelijoille :: Moottorisoitu "time lapse" slider

GaryP — Mon, 06 Feb 2012 19:25:50 GMT

Kirjoittaja: GaryP
L�hetetty: Ma Hel 06, 2012 22:25 (GMT 3)

Tee mekaanisesti laadukas heti alkuun, se ei mene hukkaan. Moottorinohjauksen ja logiikan voi aina lis�t�/parannella my�hemminkin.

Kari
_________________
Espoo, Finland

Apua aloittelijoille :: Moottorisoitu "time lapse" slider

Rtrtd — Mon, 06 Feb 2012 19:22:10 GMT

Kirjoittaja: Rtrtd
L�hetetty: Ma Hel 06, 2012 22:22 (GMT 3)

Ei se v�ltt�m�tt� olisi kun en osaa ohjelmoida, eik� stepperimoottoritkaan en�� oikein toimi kun tilasin jo osat.

Enk�h�n p�rj�� t�m�n kanssa niinkin ett� v�h�n tuuppaan sit� eteenp�in sen verran ett� rajakytkin sulkee taas virtapiirin. Vaatimustaso ei t�ss� projektissa ole ihan kaikkien korkein, vaan t�rkeint� on saada toimiva laite harrastuksen tueksi.

Omat projektit ja viritykset :: LM317 s��det�v� virtal�hde

GaryP — Mon, 06 Feb 2012 19:16:01 GMT

Kirjoittaja: GaryP
L�hetetty: Ma Hel 06, 2012 22:16 (GMT 3)

Et voi muuttaa virtaa muuttamatta kuormaa tai j�nnitett�.

Kari
_________________
Espoo, Finland

Apua aloittelijoille :: Moottorisoitu "time lapse" slider

GaryP — Mon, 06 Feb 2012 19:14:29 GMT

Kirjoittaja: GaryP
L�hetetty: Ma Hel 06, 2012 22:14 (GMT 3)

Eik�s nyt olisi helpointa laittaa t�h�n ohjelmoitavaa kontrolleria v�liin?

Maksaa 15� kun halvan arduinonkin (kloonin) siihen laittaa aivoiksi. 5-10� lis�� niin saa moottoriohjaimen, jos ei itse halua rakentaa. Stepperit olisivat olleet ULNxxxx:n avulla suoraan stepattavissa TTL-ohjauksilla.

En osaa muita ehdottaa, ei ole kokemusta, antakaa muita vinkkej� joilla on perusteluja.

Kari
_________________
Espoo, Finland

Omat projektit ja viritykset :: LM317 s��det�v� virtal�hde

mlk — Mon, 06 Feb 2012 17:43:50 GMT

Kirjoittaja: mlk
Aihe: LM317 s��det�v� virtal�hde
L�hetetty: Ma Hel 06, 2012 20:43 (GMT 3)

Pit�is rakentaa tollasen lm317:n avulla s��dett�v� virtal�hde mill� sais testattua propotionaali venttiilin toimintaa, mink� ohjaus tapahtuu virta viestill� 4-20mA. Eli k�yt�ss� on 24vdc virtal�hde jonka ulostulo virtaa pit�is saada lineaarisesti s��detty� (rajoitettua) 4-20mA v�lill�. J�nnite saa olla vakio 24vdc (eik� j�nnite h�vi�it� tarvi ottaa huomioon). Onnistuu k�sitt��kseni tolla lm 317, vastuksella ja potikalla. Olisko jollain ideaa tosta miten pit�is kytke� ja tarvitaanko muita komponentteja. Ja mites ton vastuksen ja potikan mitoitus? Kiitoksia vastauksista jo etuk�teen.