Ämne: Bygga CDI trim

[STENE]

Jeg fikk også stopp når jeg monterte nytt exos anlegg på sykkelen min.
Jeg monterte dyse(Munnstykke) med nr140.

Prøvde også med 160 men sperra kom uansett.

Er det AVR cpu dere bruker?

RH

Japp, det är en Atmel - AVR krets som jag tänkte använda när/om jag bygger en.

[MaxMekker]

Hvis du trenger hjelp på det området så stille jeg gjerne opp på ett slikt prosjekt.

Jeg har riktig nok solgt min Linhai, men broderen har sin fremdeles.

Og man lærer bestandig noe nytt på slike ting.

Holder på med 5'te semester inne Bachelor Elektronikk.

RH

[benring]

Benring, du kan mäta hastiheten med polisen... leta reda på en, tuta, blinka, peka finger, skrik. kör som fan o sedan kan du alltid vänligen fråga hur fort det gick  

Hehe, sant, ska prova det så snart jag ser en


Idag monterades ett 160 munstycke (dyse) och det är samma sak nu, fast enklare:)

Så, jag anser att Linhai orginal varvstopp ligger på kanske 5000 rpm, inte 7500 som det står på boxen.

Jag vill INTE varva mer än så här iaf Så nu är det styrka(boxen) och variatorn + andra däck som får bli projekt.

Den har dock bra klös nu, riktigt rolig

[STENE]

Blev det stor skillnad med det nya munstycket?

[benring]

Ja, bottendraget är betydligt bättre

Men som sagt, den går INTE fortare nu, så jag ska dra loss variatorn ganska snart och svarva av så den går ihop mer.

Just ja, jag kollade på nålen oxå, den är inte justerbar alls.
Så jag la en bricka som passade precis på nålen o då kom den ju upp lite.

Kör med öppen luftburk oxå.

[STENE]

Ang att svarva. Det sitter en distans/bussning i mitten av den innre variator halvan. Jag tror att det räcker att svarva av lite på den och inte på sjäva variator halvorna. Men det ser du säkert när du drar isär den.

Vart köpte du till munstycke? pris? lev tid? Och var det pilligt att byta det?

Sen måste du kolla med dig polare som gjorde ditt system vad han kan tänkas ta för att göra en krök till mig. Alltså bara från cyllen till det längre raka partiet på ditt system. Tänte jag skulle bygga resten av ett bil system. simons dämp etc.

[Rohnny]

Siden det ikke skjer stort på denne fronten så har jeg satt i sammen et lite prosjekt som kansje kan hjelpe noen programmerere i gang.
Tanken er at gnist skal gis i xx ms og stoppes i xx ms ved gitte turtall. Evt så kan den økes med fast parameter som multipliseres i stedet for faste verdier.

Håper da at dette akn være til inspirasjon for noen.

Kodstycke: [Välj]


' Gambas class file

'--------------------------------------------------------------------
' CDI Boks prosjekt Laget i Gambas Almost Basic for Linux V. 1.9.42
' Laget av Rohnny - 09-2006
'          Gambas forum      : http://forum.stormweb.no
'          Gambas Hjemmeside : http://gambas.sourceforge.net
'--------------------------------------------------------------------
' Prosjektet inneholder
' 1 Form
' 1 Slider med navn Gass
' 1 LCDNumer med navn Turtall (Kan også være en Textbox, men da må Turtall.Value endres til Turtall.Text
' 1 Label med navn lbl12V
' 1 Knapp med navn Button1 som starter "motoren"
'-----------------------------------------------------------------------
'Turtalls verdier hvor endring på kurven skal skje
PRIVATE turtallverdier AS Integer[] = [500, 2000, 2500, 3000, 3500, 4000, 4500]
'Verdier i ms hvor lenge gnisten skal være på
PRIVATE v12_on AS Float[] = [0.1, 0.080, 0.075, 0.065, 0.055, 0.040, 0.030]
'Verdier i ms hvor lenge gnisten skal være av (*4 med verdiene ovenfor , tenkt 4 takt.)
PRIVATE v12_off AS Float[] = [0.4, 0.32, 0.3, 0.26, 0.22, 0.16, 0.12]
'Posisjon på vår delay, hvor lenge gnisten skal stå på eller av
PRIVATE v12_position AS Integer

PUBLIC SUB Gass_Change()
  'Vis turtallet i panelet
  Turtall.Value = Gass.Value    
END

PUBLIC SUB Button1_Click()
  'Vi setter motoren på tomgang.
  Gass.Value = 800
  'Vis turtallet i panelet
  Turtall.Value = Gass.Value  
  RunEngine()
END

PUBLIC SUB RunEngine()
  DIM myTurtall AS Integer = gass.Value
  DO WHILE gass.Value > 500  
    Pickup(myTurtall)
    'Viser indikasjon på skjerm at 12v er på
    lbl12V.Visible = TRUE
    'Gir gnist i xx ms
    WAIT v12_on[v12_position]      
    'Tarbort indikasjon på skjerm- 12v er av
    lbl12V.Visible = FALSE
    'Stopper gnist i xx ms
    WAIT v12_off[v12_position]
  LOOP
END
PUBLIC SUB Pickup(myTurtall AS Integer) AS Integer
  DIM i AS Integer  
  FOR i = turtallverdier.Count - 1 TO 0 STEP -1
    IF Turtall.Value > turtallverdier[i] THEN
      v12_position = i
      BREAK
    END IF
  NEXT
END



[benring]

Ang att svarva. Det sitter en distans/bussning i mitten av den innre variator halvan. Jag tror att det räcker att svarva av lite på den och inte på sjäva variator halvorna. Men det ser du säkert när du drar isär den.

Vart köpte du till munstycke? pris? lev tid? Och var det pilligt att byta det?

Sen måste du kolla med dig polare som gjorde ditt system vad han kan tänkas ta för att göra en krök till mig. Alltså bara från cyllen till det längre raka partiet på ditt system. Tänte jag skulle bygga resten av ett bil system. simons dämp etc.

Ska kolla bussningen=)

Munstycket köptes på roffes motor
OEM 99114-246.
http://www.roffesmotor.se/smartupdate/archive/gruppkatalog_103_1.pdf

Sida 46

Kostnad hela 18 kronor st
Leveranstid "dagen efter"

Jag har 140, 145, 150, 155 kvar, kanske 155 passar dig stene?
Ang kröken så kan jag fråga men jag har en aning om svaret :roll:


Rohnny  Jag har lite svårt för ren norska kan du försvenska några ord tro? Är det kodat i VB eller?

Jag fick svar av killen som programmerar och lite komiskt så hade han tappat gnistan sa han.

Vi har mätt upp boxen och det är så att om man ska få tändningen att tända tidigare så måste man förskjuta det hela ett varv för att fördröja tändningen till rätt förtändning.


Det verkar som vi får hitta nån annan som kan programmera en uC!


/B

[Rohnny]

Rohnny  Jag har lite svårt för ren norska Laughing kan du försvenska några ord tro? Är det kodat i VB eller?

Jag fick svar av killen som programmerar och lite komiskt så hade han tappat gnistan sa han.

Vi har mätt upp boxen och det är så att om man ska få tändningen att tända tidigare så måste man förskjuta det hela ett varv för att fördröja tändningen till rätt förtändning.

Jag vet inte hva ni inte forstod.
Det ska gnist til plugg en gitt tid og så skal den inte ha gnist en tid. Sen det er fyrtak så burde 12v off være fyra gonger lenger.
Alle verde er satt faste (inte dynamiske). Men dette er dog mulig om det ska vara en jevn kurv uppover.

Men det låter som at fasta tids enheter måste det vara.
Om ni ser i coden så er det en variable som heter
turtall, 12vON och 12vOFF
Dessa verdier er hva som ligger til grunn for hur lenge gnisten til pluggen ska væra på eller av.

Verdiene er i sekunder så 0.1 er 1 ms, men dessa tall er bara før at visa.
Om nån kan væra inspirerat av dette og laga et prog for atmel så ville nok vi alla bli mycke glada.

Det er kodat i Gambas , dette er nestan VB men er under Linux och inte Windows. Ska inte vara stora enringarna for at få detta til at virke i VB.
Nesten "out of the box."


Så får vi se om detta var och forstå

[STENE]

Benring:
Jag är sugen på att köpaloss 155:an av dig. Jag har ju mindre motorvolym än dig så den kanske passar perfekt om 160 funkar på din.



Ang tänd systemet:
Det kritiska är inte hur lång tid man har 12v över spolen utan hur lång tid efter "signalen" som pulsen till spolen skall komma. Problemet är att när maskinen går på fullvarv så kommer pulsen över spolen samtidigt som signalen= om du vill ha ännu mer förtänding så måste du skicka en signal till spolen innan signalen kommer till boxen kommer. Men om man bygger ett system som alltid gör det.... Så kanske det skulle funka.
typ:
Int 1:
 T = time
 Reset time
return

Begin
 IF T>rpm1 then wait X1 goto ignition
 IF T>rpm2 then wait X2 goto ignition
 IF T>rpm3 then wait X3 goto ignition
 IF T>rpm4 then wait X4 goto ignition
 IF T>rpm5 then wait X5 goto ignition
 IF T>rpm6 then wait X6 goto ignition
Ignition:
 Send ignition to coil
Wait for int1 to activate
End.

(Jag vet att detta program inte funkar att köra men ni kanske förstår pricipen hur jag tänker)

[Rohnny]

Jo jag skjønner det men vi ska inte til boksen. Den boksen ska bort och vi skal ha ny. Och da justerer man dette selv,

Blir nesten som at bytta ut heile rasket med stift.
Prinsipet er vel at gi 12v til coil i rett tid at også fortelle hur lenge 12v skal gis til coil.

[benring]

Benring:
Jag är sugen på att köpaloss 155:an av dig. Jag har ju mindre motorvolym än dig så den kanske passar perfekt om 160 funkar på din.

Absolut

Titta förbi hos mig valfri tid så kan du ta 155:an:)


Beträffande programmering av en box så kan man inte göra detta i VB-likn språk, det måste ju till en uC, däremot gränssnittet för att ändra i uC´n har jag en grund för redan så den behöver ingen göra, som inte har lust:)

För övrigt lämnar jag programmeringen åt andra, teorin kan jag bidra med.

Det behövs ingen ny box utan det räcker med en påbyggnad, om man nu känner för det.

/B