xj3

24/7 service

2010-03-01T18:20:18+02:00

24/7 service

Wij hebben voor spoedeisende storingen een 24-uurs service (7 dagen per week/365 dagen per jaar). Voor de lichtstgekleurde gebieden streven wij (afhankelijk van file's) naar aanwezigheid binnen een uur! De volgende zone willen wij binnen twee uur van dienst kunnen zijn en de buitenste gebieden binnen vier uur.

Met klanten buiten de Benelux kunnen wij speciale afspraken maken.

Klanten buiten Europa kunnen wij garanderen dat wij binnen 24 uur in het vliegtuig zitten.

DREIJER (Veldhoven): +31(0)6-51695875
VBPS (Hellevoetsluis): +31(0)6-20439426

Aanbiedingen

2010-08-01T18:22:37+02:00

Aanbiedingen

getoonde afbeeldingen kunnen afwijken.
prijzen per stuk.
prijzen exclusief omzetbelasting en verzendkosten.
wijzigingen voorbehouden.

Kijk ook eens bij gebruikte machines en machinedelen

PLC

VIPA speed7 processor

merk	VIPA
soort	PLC processor
type	315-2AG10
bouwjaar	2009
spanning	24Vdc
locatie	Veldhoven
aantal	0
prijs normaal	EUR. 1240,00
prijs nu	VERKOCHT

Beschrijving:
Snelle PLC processor: de VIPA speed7 PLC's zijn 's werelds snelste met step7 programmeerbare PLC's

terug

Siemens CPU 312IFM

merk	Siemens
soort	PLC processor
type	312-5AC02-0AB0
bouwjaar	onbekend
spanning	24Vdc
ingangen	10x 24Vdc
uitgangen	6x 24Vdc
locatie	Veldhoven
aantal	1
prijs nu	EUR. 400,00

Beschrijving:
Processor met on-board I/O.

terug

Siemens 300 16ch relaiskaart

merk	Siemens
soort	16ch. relais output
type	322-1HH01-0AA0
bouwjaar	2009
spanning	24Vdc
locatie	Veldhoven
aantal	1
prijs	EUR. 125,00

Beschrijving:
Relais outputkaart. Gebruikt voor test.
inclusief frontconnector.

afbeelding wijkt af

terug

Siemens 100 serie PLC

merk	Siemens
soort	diverse PLC onderdelen
locatie	Veldhoven
	Aalst Waalre
	Hellevoetsluis

Beschrijving:
Nog diverse kaarten en processoren op voorraad oa:

diverse CPU's
busmodules 6ES5 700-8MA11
8 kan. inputkaarten 6ES5 421-8MA11
8 kan. inputkaarten 6ES5 421-8MA12
16 kan. inputkaarten 6ES5 422-8MA11
8 kan. outputkaarten 6ES5 441-8MA11
16/16 kan. in-/outputkaarten 6ES5 482-8MA13
OP393-II
OP393-III
rack/voeding/proc/in-uitgangskaarten S5-105R

Ook nog diverse kaarten processoren uit de 115 serie.

Deze materialen worden niet meer verkocht voor hobbiedoeleinden. Alleen nog maar ter vervanging van defekte materialen bij klanten.

terug

Allen Bradley SLC5 serie PLC

merk	Allen Bradley
soort	diverse PLC onderdelen
locatie	Veldhoven

Beschrijving:
Nog diverse kaarten en processoren op voorraad o.a.

proc. SLC5/01
proc. SLC5/03
inputkaarten
outputkaarten
in-/outputkaarten
devicenetkaart
tellerkaart
racks
compact block remote I/O

Siemens C1

merk	Siemens
soort	C1 logica blokken
locatie	Veldhoven

Beschrijving:
Nog diverse bouwstenen op voorraad.
Klik: hier voor een lijst

terug

HMI

ESA bedieningspaneel

merk	ESA
soort	bedieningspaneel
type	VT100 1SF000
bouwjaar	1995
spanning	24Vdc
locatie	Veldhoven
aantal	0
prijs	verkocht

Beschrijving:
Ziet er bijna als nieuw uit. Communicatiepoort is nog niet getest maar zou moeten werken. Dit panel komt uit een werkende machine.

terug

Siemens bedieningspaneel

merk	Siemens
soort	bedieningspaneel
type	OP7-DP
nummer	6AV3 607-1JC20-oAX1
bouwjaar	onbekend
spanning	24Vdc
locatie	Veldhoven
aantal	1
prijs	EUR. 25,00

Beschrijving:
Lichte beschadigingen. Toetsenbord + folie en scherm in orde. Hoofdprint is defekt! Alleen geschikt om een apparaat met defekt keyboard(folie) te repareren.

Let op: alleen voor bestaande klanten!

terug

PLC-direct touchpanel

merk	PLC direct
soort	touchpanel
type	C-more
nummer	EA1-S3ML
bouwjaar	nieuw
locatie	Veldhoven
aantal	1
prijs	EUR. 200,00

Beschrijving:
Nieuw schermpje inclusief extra RS485 aansluiting met 24Vdc voeding (EA-MG-SP1). Het aardige van deze touchpanels is dat de achtergrondverlichting van het monochrome scherm van kleur kan wisselen. Op die manier is een status van bv een machine al van grote afstand te zien. Software downloaden vanaf de site van PLC direct.

terug

Maple Systems bedieningspaneel

merk	Maple systems
soort	bedieningspaneel
type	OIT3165-A00
bouwjaar	onbekend
spanning	24Vdc
locatie	Veldhoven
aantal	1
prijs	EUR. 50,00

Beschrijving:
Leuk schermpje. Deze schermpje werden oa verkocht door Emerson voor aan hun motordrives.
Op de foto ziet het er beter uit dan ze er in werkelijkheid uitzien, maar verder is er niks mis mee.

terug

UniOP bedieningspaneel

merk	EXOR UniOP
soort	bedieningspaneel
type	MD00R-04-0045
bouwjaar	2004
spanning	24Vdc
locatie	Veldhoven
aantal	1
prijs normaal	EUR. 417,00
prijs nu	EUR. 150,00
opmerking	verkocht

Beschrijving:
Nieuw scherm, ligt al lang op de plank. Dit is een eenvoudig schermpje met 4 functietoetsen en 6 navigatietoetsen.

terug

VIPA bedieningspaneel

merk	VIPA
soort	bedieningspaneel
type	606-1BC10
bouwjaar	demo
spanning	24Vdc
display	6,5” VGA
	TFT kleur
processor	Xscale
	520Mhz
poorten	MPi
	RS232
	RS422
	USB
	ethernet
OS	WINCE 5.0
scada	Movicon
locatie	Veldhoven
aantal	1
prijs	EUR. 700,00

Beschrijving:
Demoscherm, hiervan zijn sporen zichtbaar.

terug

regelaars

Temperatuurregelaar TS

merk	Thermo system Italy
soort	temperatuurregelaar
type	852/L2
bouwjaar	onbekend
voeding	110-230Vac
sensorinput	FeConst
locatie	Veldhoven
aantal	3
prijs	EUR. 25,00

Beschrijving:
Alleen voor vervanging van identieke regelaars die defekt zijn. Deze zijn werkend uit een Borst machine gekomen.

terug

aandrijven, pompen, enz.

Control Techniques frequentieomvormer

merk	Control Techniques
soort	frequentieomvormer
type	UNIDRIVE SP
bouwjaar	onbekend
voeding	3x400Vac
locatie	Veldhoven
aantal	2x 1402
	1x 1406
prijs	EUR.

Beschrijving:
Gebruikte drives, nog niet getest!
Alleen voor spoedreparaties, niet voor nieuwbouw of hobby.

Control Techniques DutymAx servo

merk	Control Techniques
soort	servomotor
type	DutymAx 95DSB30xxxx
bouwjaar	onbekend
spanning	3x400Vac
locatie	Veldhoven
aantal	5
prijs	EUR.

Beschrijving:
Gebruikte motoren, nog niet getest!
Alleen voor vervanging van defekte motoren in bestaande installaties, niet voor nieuwbouw.

Yaskawa USAMED servo

merk	Yaskawa
soort	servomotor
type	USAMED 06MB2T
toerental	1000
koppel	5,69Nm
bouwjaar	1992
spanning	3x400Vac
locatie	Veldhoven
aantal	5
prijs	EUR.

Beschrijving:
Gebruikte motor, nog niet getest!

terug

Control Techniques resolvermodule

merk	Control Techniques
soort	resolvermodule
type	SM resolver
bouwjaar	onbekend
locatie	Veldhoven
aantal	4
prijs	EUR.

Beschrijving:
Gebruikte modules, nog niet getest!

terug

ABB frequentieomvormer

merk	ABB
soort	frequentieomvormer
type	ACS50-01E-01A4-2
bouwjaar	demo
voeding	1x230Vac
vermogen	0,18kW
locatie	Veldhoven
aantal	verkocht
prijs	EUR. 60,00

Beschrijving:
Demomodel, deze drive is nooit gebruikt.

terug

ABB softstarter

merk	ABB
soort	softstarter
type	PSR3-600-70
bouwjaar	demo
spanning	208-600Vac
stroom	3,9A
locatie	Veldhoven
aantal	1
prijs	EUR. 100,00

Beschrijving:
Driefasen aansluiting, tweefasen geregeld.
Aangebouwd zit een ABB MS116 motorbeveiligingsschakelaar voor 1,6-2,5A

Demomodel, nooit gebruikt.

terug

0.37kW motor

merk	ROTOR
soort	draaistroommotor
type	flens
bouwjaar	ongebruikt
spanning	230/400 Vac
vermogen	o,37kW
locatie	Aalst-Waalre
aantal	5
prijs	EUR. 150,00

Beschrijving:
nette motor, stoffig van het lange liggen.

terug

Vacuumpomp

merk	GAST
soort	vacuumpomp
type	R2103
bouwjaar	ongebruikt
spanning	110-220Vac, enkelfase
stroom	3,8/1,9A
locatie	Aalst-Waalre
aantal	1
prijs	EUR. 150,00

Beschrijving:
Demomodel, nooit gebruikt.

klik op de afbeeldingen voor aansluitgegevens.

terug

HVAC Vacuumpomp

merk	robinair
soort	vacuumpomp
gebruik	vacumeren airco
type	VacuMaster 15301
bouwjaar	2009
spanning	220Vac, enkelfase
locatie	Hellevoetsluis
aantal	1
prijs	EUR. 200,00

Beschrijving:
Lichtgewicht draagbare vacuumpomp voor het vacumeren van bijvoorbeeld airco installaties.
Gebruikt voor test. De pomp heeft ongeveer 8 draaiuren.

Neem voor meer informatie contact op met Willem Brugmans (VBPS)

terug

CT enkelfase netfilters

merk	Control techniques
soort	netfilter
bouwjaar	2009
spanning	250V
stroom	11A
locatie	Veldhoven
aantal	4
prijs	EUR. 25,00

Beschrijving:
Nieuwe enkelfase netfilters

terug

pneum. klepaandrijving

merk	Econosto
soort	klepaandrijving
type	ED 100/A
bouwjaar	ongebruikt
voeding	lucht, 3..8bar
slag	91,5 graad, instelbaar
locatie	Aalst-Waalre
aantal	1
prijs	EUR.

Beschrijving:
Pneumatische klepaandrijving. Dubbelwerkend.

terug

veiligheid

Pilz veiligheidsrelais

merk	PILZ
soort	veiligheidsrelais
type	PNOZ X3
bouwjaar	ongebruikt
voeding
locatie	Aalst-Waalre
aantal	5
prijs	EUR. 100,00

Beschrijving:
Ongebruikt, met beschrijving in originele verpakking. Deze is erg stoffig van de opslag.

terug

tellers / timers

Durant productivity monitor

merk	Eaton Durant
soort	productivity monitor
type	57202-421
bouwjaar	2003
voeding	230Vac
locatie	Veldhoven
aantal	1
prijs normaal	EUR. 1.200,00
prijs	EUR. 350,00

Beschrijving:
Deze productivity monitor word gebruikt om het rendement van een machine te bepalen. Er zijn telingangen voor producten die de machine ingaan en weer verlaten en 8 reason inputs die gebruikt worden om de reden van een stilstand te registreren. Daarnaast zijn er nog 4 control inputs, twee outputs en een RS485 om met een PC te communiceren met bijbehorende software (DOS).

Wij hebben hiermee wat tests gedaan in de werkplaats, daarna is hij weer in de originele verpakking gedaan. Apparaat is in nieuwstaat.
De afbeelding wijkt iets af.

terug

Crouzet timer

merk	Crouzet
soort	multifunctie timer
type	816 88 857 604
bouwjaar	2009
spanning	24-48Vac
locatie	Veldhoven
aantal	1
prijs normaal	EUR. 145,00
prijs	EUR. 100,00

Beschrijving:
Nieuw tijdrelais. Deze waren alleen per twee te bestellen, dus één over.

terug

sensoren

Leuze fotocel

merk	Leuze
soort	fotocel
type	PRK 25/66-S12
bouwjaar	nieuw
spanning	10-30Vdc
aansluitwijze	M12 conn
licht	rood
tastwijze	reflector
tastafstand	2500mm
locatie	veldhoven
aantal	5
prijs	EUR. 45,00

Beschrijving:
Exclusief reflector.
afbeelding is van de nieuwe 3 serie, deze fotocellen zijn de vorige serie. Afbeelding wijkt dus iets af.

terug

Leuze fotocel

merk	Leuze
soort	fotocel
type	PRK 25/66-S12*
bouwjaar	gebruikt
spanning	10-30Vdc
aansluitwijze	M12 conn
licht	rood
tastwijze	reflector
tastafstand	2500mm
locatie	*
aantal	43
prijs	EUR. 45,00

Beschrijving:
Exclusief reflector.
afbeelding is van de nieuwe 3 serie, deze fotocellen zijn de vorige serie. Afbeelding wijkt dus iets af.

terug

Leuze tastmerksensor

merk	Leuze
soort	fotocel
type	KRTG 8/24-10-S12
bouwjaar	onbekend
spanning	10-30Vdc
aansluitwijze	M12 conn
licht	groen
tastwijze	tastmerk
tastafstand	10mm
locatie	veldhoven
aantal	1
prijs	EUR. 175,00

Beschrijving:
Deze sensor in metalen behuizing is jaren gebruikt voor tests. De sensor ziet er erg netjes uit op enkele lichte gebruikssporen na.
afbeelding wijkt af.

terug

Leuze fotocel

merk	Leuze
soort	fotocel
type	PRKL 8/24.91-S12
bouwjaar	onbekend
spanning	10-30Vdc
aansluitwijze	M12 conn
licht	rood laser
tastwijze	reflector
tastafstand
locatie	veldhoven
aantal	1
prijs	EUR. 175,00

Beschrijving:
Deze sensor in metalen behuizing is kort gebruikt voor tests. De sensor ziet er erg netjes uit op enkele lichte gebruikssporen na.

terug

SUNX sensorcontroller

merk	Sunx
soort	fotocelcontroller
type	PS-930-D
bouwjaar	onbekend
spanning	110-230Vac
sensorvoeding	12Vdc
locatie	veldhoven
aantal	1
prijs	EUR. 50,00

Beschrijving:
Alleen voor vervanging van identieke controller.

AE draadencoder

merk	AE sensors
soort	draadencoder
type	WS12-1500-10-PP530
bouwjaar	onbekend
meetlengte	1500mm
pulsen	10,0004/mm
locatie	Veldhoven
aantal	2
prijs	EUR. 75,00

Beschrijving:
Encoder met een trekkabel.
afbeelding wijkt iets af.

Aansluitkabels en connectoren zitten er niet bij. Deze zijn wellicht nog te achterhalen.

terug

diversen

Simco antistatic bar

merk	Simco
soort	antistatic bar
type	EP-Sh-N
bouwjaar	1998
spanning	7kV
aktieve lengte	1850mm
werkzame afstand	150mm
locatie	Veldhoven
aantal	1
prijs	EUR. 350,00 (SET met voeding)

Beschrijving:

Antistatic bar, bedoeld om statische lading van bijvoorbeeld folie te elimineren. De afbeelding is die van een kortere antistatic bar. Hoort bij de voeding hieronder.

terug

Simco 7kV voeding

merk	Simco
soort	HV voeding
type	A2A7s
bouwjaar	1998
prim.spanning	230V
sec.spanning	7kV
behuizing	anod.aluminium
locatie	Veldhoven
aantal	1
prijs	zie hierboven

Beschrijving:

Voeding voor bovenstaande antistatic bar. Afbeelding wijkt iets af.

terug

adressen xj3

2010-07-28T17:52:20+02:00

adressen xj3

DREIJER industrial automation

Gerrit Jan Dreijer
Burgemeester van Hoofflaan 122
5503 BR Veldhoven

tel: +31(0)40-2928706
fax: +31(0)40-2928711
mobiel: +31(0)6-51 695 875

gj@xj3.nl

^{kvk 17127120}

Creative engineering

Ernst Noldus
Petunialaan 1
5582 HA Aalst-Waalre

tel: +31(0)40-2214125
fax: +31(0)40-2223312
mobiel: +31(0)6-51590832

ej@xj3.nl

^{kvk 17083955}

LC consultancy

Kees-Jan Goorissen
Geert Grootestraat 37
5643 RC Eindhoven

tel: +31(0)40-2115670
fax: +31(0)40-2111198
mobiel: +31(0)6-22397324

kj@xj3.nl

^{kvk 17168114}

VBPS

Willem Brugmans
Helmstraat 37
3222 XK Hellevoetsluis

tel: +31(0)181-453917
fax: +31(0)181-453923
mobiel: +31(0)6-20439426

wj@xj3.nl

^{kvk 24364443}

plattegronden

waar zijn we te vinden

voorwaarden

Voorwaarden kunnen per xj3 deelnemer verschillen. Indien niet anders overeengekomen gelden de FME-CWM voorwaarden:

fme-cwm_leveringsvoorwaarden.pdf

leveringsvoorwaarden_xj3.pdf

Hi speed aflegstation voor stickpacks

2008-10-24T11:09:28+02:00

Hi speed aflegstation voor stickpacks

Voor een soepen en sauzenfabrikant maakten we in samenwerking met Struik packaging een aflegstation om op hoge snelheid stickpacks in een bakjesketting af te leggen. Het aantal verpakkingen per bakje is uiteraard instelbaar.

Het station moest uit bulk minimaal 60 verpakkingen per minuut afleggen, hetgeen gemakkelijk gehaald werd. Uiteindelijk bleken ook snelheden van 80 per minuut gehaald te kunnen worden.

Opbouw van de installatie

De bulk verpakkingen word op een triller gestord die vervolgens een trilkom voedt. Deze trilkom orienteerd de verpakkingen en het bandje er achter bevat steeds netjes één verpakking tegelijk. Van hieruit worden de verpakkingen op een tweede baan geschoten die ze vervolgens in de multi-stage aflegger schiet.
Tijdens het vallen is de timing zodanig dat scheefvallende zakjes nét door de onder zich openende stages weer recht worden gelegd. De zakjes die wel recht vallen zullen deze stages niet of nauwelijks raken.

De besturing

De besturing is opgebouwd rond een Siemens CPU 314 met een ESA VT155 touchpanel. Verder zitten er twee Telemecanique frequentieomvormers en de aansturingen voor de trillers.

klik voor een vergroting

AVR snippets

2008-10-24T11:13:57+02:00

AVR snippets

Level 2 Headline

Omschrijving

programmacode

Level 2 Headline

Omschrijving

programmacode

besturingstechniek

2009-09-15T20:38:41+02:00

besturingstechniek

Wij hebben ruim 25 jaar ervaring met besturingstechniek: van relaisbesturing tot PLC besturingen met decentrale I/O. Wij hebben ervaring met vele merken PLC's zoals o.a.:

Allen Bradley
Eberle
Jetter
Koyo
Omron
Siemens
Square D
Telemecanique
VIPA
en meer……

Verder hebben we veel ervaring opgedaan met ALLE gangbare merken en types

frequentieomvormers
servoaandrijvingen

en verder nog met:…

Barcode scanners
Diverse soorten displays, toetsenborden en touchpanels
SCADA systemen
bussystemen, zoals Interbus, Profibus, ASibus enz.
enz…

Paternosterbuffer voor de tuinbouw

2009-02-15T14:40:29+02:00

Paternosterbuffer voor de tuinbouw

In samenwerking met Freshpack en van Eeden industrial services hebben we een paternosterbuffer gerealiseerd met een maximum opslagcapaciteit van 1600 dozen. De dozen worden op de verschillende stations ingevoerd maar moeten over één baan worden uitgevoerd naar de palletiser. Hiervoor moeten de dozen uiteraard in exact de juiste volgorden en in de juiste aantallen worden uitgevoerd.

Bartelt vulmachine

2008-10-29T08:24:31+02:00

Barteld vulmachine

In samenwerking met Struik packaging hebben we een oude Bartelt vulmachine gereviseerd en gemoderniseerd. Mechanisch is de machine weer als nieuw en elektrisch weer helemaal volgens de laatste stand der techniek. Veel oude componenten zijn geheel vervangen door moderne, zoals bijvoorbeeld de oude nokkenschakelaars (nu elektronisch, programmeerbaar met vervroeging) en de oude remkoppeling op de doseerschroef, welke vervangen is door een modern servodoseersysteem.

Op deze machine moest ook een extra tussenseal station gemaakt worden. De vepakking wordt hierdoor verdeeld in twee compartimenten. Eerst wordt er een pil onderin de verpakking „geschoten”, dan komt de tussenseal en vervolgens word het poedervormige product gedoseerd. Door Struik is er een geheel nieuwe doseur gebouwd voor de dosering van pillen. Ook is de machine een stuk veiliger en stiller geworden door o.m. een volledig nieuwe afscherming.

automaat voor luchtkussenverpakkingen

2010-01-08T10:47:31+02:00

_{klik op de afbeeldingen voor een grotere afbeelding.}

automaat voor luchtkussenverpakkingen

Voor een fabrikant van verpakkingsmaterialen ontwikkelden wij een apparaat voor het automatisch opblazen van luchtkussenverpakkingen.

beschrijving

De luchtkussens bevinden zich in een omdoos met een klein opblaasgat aan de buitenzijde. De luchtkussenfolie bevat zelf een strip met reedkleppen. De dozen moeten op de transportbaan automatisch worden opgeblazen zodanig dat de materialen in de dozen gefixeerd worden. Voor alle duidelijkheid: de doos is dan al dichtgelijmt.

uitvoering

Hiertoe ontwikkelden wij een stand-alone unit die langs de transportbaan word geplaatst. De unit hoeft alleen van een voeding en lucht te worden voorzien. In de sleufgaten kunnen stoppers en blaasunits gemonteerd worden op iedere gewenste hoogte. Het is dus ook mogelijk om meerdere blaasunits te monteren, voor verschillende soorten dozen. Ten slotte zijn er nog diverse communicatie signalen opgenomen die de klant naar behoeven kan opnemen in zijn eigen besturingen, bijvoorbeeld de baanbesturing. Het geheel is gepoedercaoted in de huiskleur van de eindklant.

werking

De doos word gedetecteerd door een afstandsmeting loodrecht op de baan. Hierdoor word ook de hoogte van de doos gemeten zodat de juiste opblaaskop geselecteerd kan worden. In het geval van deze eerste serie gaat het om twee dooshoogtes. Tijdens het opblazen word er eerst een luchtschot met relatief hoge druk gegeven om de ventielen te openen. Daarna word er met een sterk gereduceerde luchtstroom verder gevuld. Het vullen is klaar als aan een van de volgende condities word voldaan:

De doos begint te bollen (1mm, deze vervorming verdwijnt na enkele minuten weer als de luchtkussens zich nog wat „setten”)
Een instelbare druk bereikt is
Het overschrijden van de maximale tijd
Het overschrijden van de maximale druk NA het luchtschot

Voordeel van de LOGO is dat alle mogelijke settings eenvoudig zijn in te stellen op het display. Het programma voor deze unit's was alleen uitvoerbaar in de allerlaatste LOGO's (versie 6) doordat er weer een aantal handige nieuwe functies zijn toegevoegd.

Uitvoering en materialen

omschrijving	merk	type
constructie	Creative Engineering
co-engineering en plaatwerk	LC consultancy
besturing	Dreijer industrial automation
micro-PLC	Siemens	LOGO versie 6
pneumatiek	Metalworks
druksensor	Sunx
ultrasoonsensor	Microsonic

externe links

CairPack

CNC service

2009-09-15T20:43:13+02:00

CNC service

Voor meer informatie over wat wij voor U op het gebied van CNC kunnen betekenen, zoals on-site trainingen, kunt U contact opnemen met Kees Jan Goorissen.

Coatingbalk voor glazen flessen

2009-12-24T20:33:14+02:00

Coatingbalk voor glazen flessen

Voor de het coaten van flessen die uit een oven komen moest een nieuwe besturing gemaakt worden omdat de klant eiste dat de sprayguns niet boven maar tussen de flessen doorging.

Hiertoe hebben we twee programmeerbare CT Epsilon servodrives ingezet. Een drive voor de lange beweging tussen de flessen door en een drive om de beweging te synchroniseren met de ovenmat. Het programma in de drives controleerd eerst of de opening tussen de flessen groot genoeg is en onthoud waar deze opening blijft. Dit laatste is nodig omdat er twee sprayguns zijn die dus tussen drie rijen doorgaan. Als de openingen groot genoeg zijn en zich op de juiste positie bevinden start de beweging tussen de flessen door en zorgt de langsbeweging dat de sprayguns de beweging van de ovenmat exact volgen. Aan het einde van de slag word de langsbeweging weer gehomed.

De bestaande motoren waren tamelijk exotische stappenmotoren met een ongebruikelijke bouwvorm. Dat was ook een belangrijke reden om nieuwe servo's te plaatsen. De beide Hepco lineair geleidingen waren hierop nogal ingrijpend aangepast en moesten dus weer in originele staat gebracht worden en er moesten verloopstukken komen voor de beide motoren. Dit is geheel door Hepco Nederland verzorgd.

Ook het instellen van start en stoppunt van de spray zelf is instelbaar: de ovenmat hoeft niet perse over de volle breedte benut te zijn en zo word er bespaart op de coating en word overmatige vervuiling tegengegaan.

Alle instellingen zijn te maken op een full color Omron touchpanel op de kast.

Gebruikte materialen

omschrijving	merk	type
kast	Rittal	AE1350
hoofdschakelaar	Kraus&Naimer
automaten	ABB
DC voeding	Meanwell
aansluitmateriaal	Phoenix
servodrives	Control Techniques	Epsilon EPP
motoren	Control Techniques	UNImotor
encoder ovenmat	IFM	RO1364
Touchpanel	Omron
lineairgeleidingen	Hepco	SPD
		DLS

constructie

2009-09-15T20:41:48+02:00

constructie

Wij zijn inzetbaar voor alle soorten van constructiewerk. Verder hebben wij een aantal standaard oplossingen die wij kunnen aanbieden zonder engineeringkosten zoals bijvoorbeeld veiligheidshekken. (zie ook „producten-overigen”)

Voor meer infomatie neem contact op met Ernst Noldus.

counter

2010-09-03T17:50:28+02:00

Draadkleuren

2010-05-26T19:37:07+02:00

Draadkleuren

Voor klanten die geen eigen norm hanteren voor de draadkleuren in schakelkasten hanteren wij onze eigen norm. Klanten die wel een bestaande norm hanteren, of een eigen norm hebben kunnen dit uiteraard aangeven.

De gebruikte kleuren staan op het eerste blad van de bij de besturing behorende schema's vermeld

De eigen norm

400Vac

omschrijving	draadkleur
L1	zwart
L2	zwart
L3	zwart
aarde	geel/groen

230Vac

omschrijving	draadkleur
L	zwart
schakeldraad	zwart
N	blauw
aarde	geel/groen

110V

110V proberen we te vermijden. In sommige besturingen aanwezig voor bijvoorbeeld remmen en rem/koppelingen.

omschrijving	draadkleur
110V	zwart
schakeldraad	zwart
0V	zwart
aarde	geel/groen

24Vdc

omschrijving	draadkleur
+24Vdc	rood
schakeldraad	geel
0V	groen
aarde	geel/groen

24Vac

24Vac proberen we altijd te vermijden.

omschrijving	draadkleur
24Vac	paars
schakeldraad	paars
0V	paars
aarde	geel/groen

analoge signalen

omschrijving	draadkleur
plus	wit
min	grijs
aarde	geel/groen

vreemde/onbekende spanningen

omschrijving	draadkleur
alle	oranje

DIN

400Vac

omschrijving	draadkleur
L1	zwart
L2	zwart
L3	zwart
aarde	geel/groen

230Vac

omschrijving	draadkleur
L	rood
schakeldraad	rood
N	rood
aarde	geel/groen

24Vdc

omschrijving	draadkleur
+24Vdc	donkerblauw
schakeldraad	donkerblauw
0V	donkerblauw/wit
aarde	geel/groen

24Vac

24Vac proberen we altijd te vermijden.

omschrijving	draadkleur
24Vac	rood
schakeldraad	rood
0V	rood
aarde	geel/groen

HD308 S2:2001

Dit harmonisatiedocument beschrijft de aderkleuren voor kabels. Volgens dit document is het niet meer toegestaan om de geel/groene ader om te kleuren. Bij kabels met met dan 5 aders altijd zwarte genummerde aders.

omschrijving	draadkleur
L1	bruin
L2	zwart
L3	grijs
N	blauw
PE	geel/groen

Aderkleuren volgens DIN 47100

Aderkleuren voor meeraderige kabels vind U hier onderaan de pagina.

flessen positioneren

2008-10-24T11:05:27+02:00

flessen positioneren

Het systeem

Een typische xj3 klus: een klant belt met een probleem. Binnen 48 uur leverden we een oplossing, zowel mechanisch als elektrisch.

Een komplete unit voor het positioneren van flessen in een zeefdrukmachine. Het positioneren geschiedt door middel van een servomotor, de detektie van het referentiepunt met een speciale Leuze fotocel met door ons gemodificeerd optiek. De unit is zo geconstrueerd dat er één station in zijn geheel binnen 30 minuten vervangen kon worden door onze unit.

Later zijn er meerdere machines uitgerust met dezelfde units. Het systeem verder verbeteren bleek niet nodig te zijn.

Duidelijk te zien op de foto:

Control Techniques Unimotor
Leuze tastmerksensor met modif.optiek
unit gesneden op onze lasersnijtafel

Materialenlijst

omschrijving	merk	type
kast	Rittal	AE1380
voeding	Meanwell	Din series
Servodrive	Control Techniques	Epsilon
servomotor	Control Techniques	Unimotor FM
sensor	Leuze	KRTM (mod.)
rechtgeleidingen	Rollon	-
constructie	Creative Engineering	-
software	Dreijer	-

Foliewagens voor palletwikkelaars

2009-02-15T14:52:42+02:00

Foliewagens voor palletwikkelaars

Voor vrijwel elke foliewikkelaar maken we vervangende foliewagens. Deze foliewagens lijken sterk op de oude Pieri foliewagens zoals die hier veel geleverd zijn door de firma Borst (niet te verwarren met de huidige firma Borst). Wij hebben na hun beeindiging alles van de firma Borst overgenomen, inclusief technische gegevens, en maken nu deze nieuwe foliewagens voorzien van enkele verbeteringen.

Roemenie, Zwitserland...

Voor o.a. een bottelarij van de grootste frisdrankfabrikant ter wereld zijn we nu de floiewagens van al hun fabrieken in Roemenie en Zwitserland aan het vervangen. Een groot voordeel, buiten de grote betrouwbaarheid, is dat bij alle machines straks op dezelfde manier de folie in de wagens gelegd kan worden. Geen verwarring meer dus.

Kenmerken

Deze foliewagens kenmerken zich door:

grote betrouwbaarheid
uitstekende voorrek
weinig foliebreuk
redelijk eenvoudige opbouw
door ons in te bouwen in alle soorten/merken wikkelaars. (ook ringwikkelaars)

Het inbouwen kost gemiddeld ongeveer 6 uur met twee man.

Frequentieregelaars

2008-11-06T19:23:11+02:00

Frequentieregelaars

control techniques

Commander SK

Unidrive SP

gebruikte machines en machinedelen

2010-08-24T22:21:44+02:00

gebruikte machines en machinedelen

getoonde afbeeldingen kunnen afwijken.
prijzen per stuk.
prijzen exclusief omzetbelasting en verzendkosten.
wijzigingen voorbehouden.

kijk ook eens bij Aanbiedingen

MAZAK ST-X48H

merk	Mazak
soort	CO² lasersnijder
type	ST-X48H
vermogen	1500W
aslengtes	2500x1250x300
draaiuren	±4000 uur
bouwjaar	1992
locatie	Eindhoven
prijs	NOTK

Beschrijving:
MAZAK CO2 lasersnijmachine type ST-X48H (2500x1250x300)
Heel nette machine met hoge Z-as, 300mm, goed om kokers en gezette delen te bewerken!
Maximale snijdiktes circa:

Staal	1 t/m 12 mm
RVS	1 t/m 5 mm
Aluminium	1 t/m 4 mm

Neem voor meer informatie contact op met Kees Jan Goorissen

terug

Mazak Turbo onderdelen

merk	Mazak
soort	laser
type	Turbo-X36/48/510 L1
locatie	Eindhoven
prijs	NOTK

Beschrijving:
Diverse onderdelen voor Mazak Turbo-X36/48/510 L1

Compleet NC rack:
- MN-210
- MN-230
- MN-250
Bedieningspaneel
Motordrives
Precitec snijkop en amplifier 311 + bedrading

terug

Mitsubishi ventilator

merk	Mitsubishi
type
soort	ventilator
diameter
spanning	110Vac
vermogen	0,75kW (:?:controle)
aantal	2 stuks
locatie	Aalst Waalre
prijs	NOTK

Deze ventilatoren worden o.a. gebruikt op de chillers van Mazak lasersnijders.

terug

Borst wikkelaars

merk	Borst
soort	diversen
locatie	Hellevoetsluis

Van alle Borst foliewikkelaars hebben wij reserveondeldelen op voorraad liggen. Onze servicemensen hebben een jarenlange ervaring met foliewikkelaars en vooral ook met deze machines.
Ook voor de meeste overige door Borst geleverde machines hebben wij de onderdelen op voorraad.

Na het faillissement van Borst hebben we de hele inventaris overgenomen. Hiervan hebben we nog een behoorlijke voorraad materialen die per stuk maar eventueel ook als partij overgenomen kunnen worden.

Zie Lijst Borst onderdelen.

terug

"Machine" voor het testen van briefgeld

2009-02-15T14:36:06+02:00

"Machine" voor het testen van briefgeld

Voor een museum kregen wij de opdracht een machine te maken om kinderen op interaktieve wijze de echtheidskenmerken van briefgeld op te sporen en te controleren. Het was een duidelijke wens van het museum dat de machine er „industrieel” uit zou zien en dat alle mechaniek duidelijk zichtbaar moest zijn.

Opbouw

In de machine bevind zich een transportbaan die de houders met het briefgeld van station naar station transporteerd, drie in totaal. Met stoppers en inschuivers word de houder onder een camerasysteen geschoven. De camera's zijn met joysticks te bewegen.

Het geheel word bestuurd door een Koyo PLC. De aandrijving word geregeld door een Control Techniques SK drive en de sensoren zijn allen van Leuze.

Hoes- en krimpstraat

2008-10-29T08:29:57+02:00

Hoes- en krimpstraat

de installatie

Voor één van onze klanten hebben we een aantal machines opgebouwd nadat deze eerst een jaar buiten gelegen hadden. Het laden en lossen van de transporten was kennelijk met een bulldozer gedaan: de machines waren ernstig beschadigd , de schakelkasten onbruikbaar.

De installatie bestaat uit:

een glaspalletiser
een machine die een hoes maakt en over een pallet trekt
een krimpraam met 32 gasbranders om de hoes te krimpen
het bijbehorende transportsysteem door de machines en richting magazijn.

aanpassingen aan machine en bouw

De machines waren te hoog voor de productieruimte dus deze zijn voor zover mogelijk verlaagd en deels in de grond verzonken.
Hiertoe is de bestaande betonvloer opengezaagt en is er in de ontstane putten een nieuwe betonvloer gelegd. Op deze manier steken de transportbanen nog maar enkele millimeters boven de normale vloer uit.

de besturing

De nieuwe schakelkast is wel van een fors formaat maar grotendeels leeg: alleen wat frequentieomvormers, een noodstopcircuit, voedingen en een Siemens S7-CPU314 processor met een Phoenix interbusmodule. De I/O in het veld zit aangesloten op Phoenix inlinemodules. In een later stadium is de lijn steeds verder uitgebreid. Door de remote I/O was dit steeds erg snel te verwezelijken. Het interbussysteem heeft zich hier ook weer volledig bewezen in betrouwbaarheid en flexibiliteit.

Voor de bediening, instellingen en de storingsmeldingen hebben we gebruik gemaakt van een ESA touchpanel.

IEC 61131-3 snippets

2010-05-26T12:58:08+02:00

IEC 61131-3 snippets

PID regeling

PID regelaar

FUNCTION_BLOCK PID_control
VAR_INPUT
	ProcesVal		:INT;		(*proceswaarde*)
	SetVal			:LREAL;		(*wenswaarde*)
	Auto			:BOOL;		(*als true dan automatisch regelen*)
	Direct			:BOOL;		(*als true dan direct acting, oftewel: verwarmen of koelen *)
	TimeBase		:LREAL;		(*moet 1000 of groter zijn*)
	Gain			:LREAL;		(* Kp *)
	ResetRate		:LREAL;		(* Tr  *)
	Derivative		:LREAL;		(* Td *)
END_VAR
VAR_OUTPUT
	ControllerOut		:LREAL;		(* output *)
END_VAR
VAR
	testbit			: BOOL;
	TON_pulstijd		: TON;
	TON_pauzetijd		: TON;
	Puls			: R_TRIG;
	Err			: LREAL;
	ErrLast			: LREAL;
	ErrlastLast		: LREAL;
	ControllerOutTemp	: LREAL;
END_VAR
 
 
 
testbit := TRUE;
 
(*		cyclustijd PID regeling*)
TON_pulstijd (in := NOT ton_pauzetijd.Q, PT := LREAL_TO_TIME(Timebase - 500));
TON_pauzetijd (in := ton_pulstijd.Q, PT := t#500ms);
Puls (clk := TON_pulstijd.Q);
 
(*		PID regeling*)
IF
	Puls.Q
THEN
	IF	(*---------------------------------------------------------------------auto mode*)
		 auto
	THEN
		Err := SetVal - ProcesVal;
 
		IF 		(*------------------------direct mode*)
			NOT direct
		THEN
			Err := 0 - Err;
		END_IF	(*-----------------------------------------*)
 
                (*de PID zelf: *)
                ControllerOutTemp := ControllerOut + (Gain * ( Err - ErrLast + (ResetRate * Err) + (Derivative * ( Err -(ErrLast *2) + errlastLast))));
		ControllerOut := ControllerOutTemp; (*alleen voor controle, verder is het niet nodig dit via een kladvariabele te doen*)
 
		ErrLastLast := ErrLast;
		ErrLast := Err;
	ELSE
		ControllerOut := 0;
		ErrLastLast := Err;
		ErrLast := Err;
 
 
	END_IF	(*-------------------------------------------------------------------------------*)
END_IF
 
IF
	ControllerOut > 100
	AND auto
THEN
	ControllerOut := 100;
END_IF
 
IF
	ControllerOut < 0
	OR NOT auto
THEN
	ControllerOut := 0;
END_IF

PID versie 2

Verbeterde PID regeling.

Deze is ook wat eenvoudiger in te regelen. Begin met de resetrate op 0 en probeer dan een zo rustig mogelijke regeling te krijgen. Daarna pas de resetrate inregelen.

Een begin voor een sealbalk van 350W bij een cyclustijd van 10s: Gain 1,5; ResetRate 0,1; Derivative 40

FUNCTION_BLOCK PID_control_2
VAR_INPUT
	ProcesVal		:INT;		(*proceswaarde*)
	SetVal			:LREAL;		(*wenswaarde*)
	Auto			:BOOL;		(*als true dan automatisch regelen*)
	Direct			:BOOL;		(*als true dan direct acting*)
	Gain			:LREAL;		(* Kp *)
	ResetRate		:LREAL;		(* Tr  *)
	Derivative		:LREAL;		(* Td *)
END_VAR
VAR_OUTPUT
	ControllerOut		:LREAL;		(* output in 1/10% *)
	Err			:LREAL;         (* eigenlijk geen output, maar handig bij inregelen *)
END_VAR
VAR
	testbit			: BOOL;
	TON_pulstijd		: TON;
	TON_pauzetijd		: TON;
	Puls			: R_TRIG;
 
	ProcesVal_D		: LREAL;
	ProcesValLast		: LREAL;
	ControllerOut_temp	: LREAL;
	Feedback		: LREAL;
END_VAR
 
 
 
testbit := TRUE;
 
(*cyclustijd PID regeling*)
TON_pulstijd (in := NOT ton_pauzetijd.Q, PT := t#5s);
TON_pauzetijd (in := ton_pulstijd.Q, PT := t#5s);
Puls (clk := TON_pulstijd.Q);
 
(*PID regeling*)
IF
	Puls.Q
THEN
	IF	(*---------------------------------------------------------------------auto mode*)
		 auto
	THEN
		ProcesVal_D := ProcesVal + ( ProcesVal - ProcesValLast ) * Derivative;
		ProcesValLast := ProcesVal;
		Err := SetVal - ProcesVal_D;
		IF direct THEN Err := 0 - Err; END_IF
 
		ControllerOut_temp := Err * Gain + Feedback;
		IF ControllerOut_temp > 1000 THEN ControllerOut_temp := 1000; END_IF
		IF ControllerOut_temp < 0 THEN ControllerOut_temp := 0; END_IF
 
		ControllerOut := ControllerOut_temp;
 
		Feedback := Feedback + ( Controllerout - Feedback ) * ResetRate;
 
	ELSE
		ProcesValLast := Procesval;
		Feedback := 0;
		ControllerOut := 0;
 
	END_IF	(*-------------------------------------------------------------------------------*)
END_IF

PWM quick and dirty

Let op: dit is een trage en onnauwkeurige PWM, alleen geschikt voor bijvoorbeeld verwarmingselementen met een PWM cyclusduur van minimaal 1000ms, liefst nog langer!

FUNCTION_BLOCK PWM_simple
VAR_INPUT
	PwmVal		:LREAL;
	PwmTimeBase	:LREAL;
	PwmValMax	:LREAL;
	PwmValMin	:LREAL;
END_VAR
VAR_OUTPUT
	PwmOutput	:BOOL;
END_VAR
VAR
	PwmPause        : TON;
	PwmPulse        : TON;
	PwmValPause     : LREAL;
	PwmValPulse     : LREAL;
END_VAR

(*PWM only for slow PMW: periode time must be at least > 1000ms*)
IF PwmVal > PwmValMax THEN PwmVal := PwmValMax; END_IF
IF PwmVal < PwmValMin THEN PwmVal := PwmValMin; END_IF
PwmValPause := PwmTimebase * (100 - PwmVal) /100;
PwmValPulse := PwmTimebase * PwmVal /100;
PwmPause(IN:= NOT PwmPulse.Q, PT:= LREAL_TO_TIME (PwmValPause));
PwmPulse(IN:= PwmPause.Q, PT:= LREAL_TO_TIME (PwmValPulse));
IF PwmVal > 0 THEN PwmOutput := PwmPause.Q; ELSE PwmOutput := FALSE; END_IF

Niveau 2 kop

declaraties

programma

indirect adressing STEP7

2010-06-06T18:20:44+02:00

indirect adressing STEP7

van: plcdev.com
door: automationtraining.ca

Introduction

The most common form of addressing used in the Siemens S7 PLCs is direct and symbolic. When a direct addressed is referenced by an instruction there is no question as to the location in memory. The following are examples of direct addressing:

Inputs: I4.0, IB4, IW4 , ID4

Outputs: Q124.0, QB124, QW124, QD124

Markers: M11.0, MB10, MW10, MD10

Timers: T34

Counters: C23

Local: L0.0, LB1, LW2, LD4

Data Block: DB5.DBX2.0, DB5.DBW6, DBD8

By using the methods of indirect addressing the address used by an instruction can be varied to point to any number of locations. In this case, a memory location stores a “pointer” to another memory location. While this may increase the difficulty of troubleshooting, its advantage is to greatly reduce the number of networks and instructions needed to control a process. It is also a method that must be understood to use some of the library and system function calls provided by Siemens. The POINTER and ANY Data Types

A POINTER data type is used to format a number to be accepted as an address rather then a value. A pointer is always preceded by a P# symbol. The pointer address may be in three different formats.

Format				Example 		Memory Storage

P#<byte>.<bit>			P#8.0	P#124.3		4 Bytes
P#<area><byte>.<bit>		P#M50.0	P#I4.0		6 Bytes
P#<area><byte>.<bit><length>	P#DB25.DBX0.0 BYTE 14
				P#M0.0 WORD 2
				P#I0.0 DWORD 5		10 Bytes

The ANY data type is used to pass a parameter of an unknown or undefined data type. Some functions in the library use the ANY data type to work on whole sections of memory. To do this, the last pointer method is used to describe an area. For example the address P#DB25.DBX 0.0 Byte 14 points to the first byte of DB25 with a length of 14 bytes.

NOTE: A DINT can be converted to a POINTER by simply shifting the double word left by 3 bits. Data Block Instructions

When working with indirect addressing it is sometimes needed to first of all open a DB and then begin working on the address without directly referring to any one DB. This is done using the OPN instruction. The OPN instruction can open either a shared data block (DB) or an instance data block (DI).

OPN 	DB 	10 	//Open DB10 as a shared data block
L 	DBW 	36 	//Load data word 36 of DB10 into ACCU1
T 	MW 	22 	//Transfer the contents of ACCU1 into MW22
  	  	  	 
OPN 	DI 	20 	//Open DB20 as an instance data block
L 	DIB 	12 	//Load data byte 12 from DB20 into ACCU1
T 	DBB 	37 	//Transfer the contents of ACCU1 to data
			//byte 37 of the open shared data block DB10

When monitoring in STL the shared DB number is displayed in the DB1 column and the instance DB number is displayed in the DB2 column.

Furthermore, there are instructions to confirm that the correct DB number is opened and that it is large enough for the next operation.

L 	DBNO 	  	//Loads the number of the opened
			//shared data block into ACCU1
L 	DBLG 	  	//Loads the length of the opened
			//shared data block into ACCU1
  	  	  	 
L 	DINO 	  	//Loads the number of the opened
			//instance data block into ACCU1
L 	DILG 	  	//Loads the length of the opened
      		        //instance data block into ACCU1

Memory Indirect Addressing

The first method of indirect addressing is called memory indirect addressing because it allows for a memory location (M, DB or L) to determine or point to another.

The memory area identifiers T, C, DB, DI, FB and FC use a word (16-bit) pointer location in integer format. Two examples are as follows:

L 	5 	  	//Load ACCU1 with pointer value
T 	MW 	2 	//Transfer pointer into MW2
L 	T [MW 2] 	//Load ACCU1 with T5 current time value
  	  	  	 
OPN 	DB [#DB_Temp] 	//Open DB whose data block number is
			//from the interface temp parameter
			//named DB_Temp

The memory area identifiers I, Q, M, L, DB use a double word (32-bit) location using the POINTER data type.

L 	P#0.7 	  	//Load ACCU1 with pointer value
T 	MD 	2 	//Transfer pointer into MD2
A 	I [MD 2] 	//Check state of I0.7
= 	M [MD 2] 	//Assign value of RLO to M0.7
  	  	 
OPN 	DB 	5 	//Open DB5
L 	P#2.0 	        //Load pointer into ACCU1
T 	#TempPointer 	//Transfer pointer to temp location
L 	DBW [#TempPointer] 	//Load the value at DB5.DBW2 into ACCU1
L 	0 	        //Load a zero into ACCU1
>D 	  	        //Check if the value is greater
		        //then zero

When monitoring memory indirect addressing the INDIRECT column displays the current address the instruction is using.

Note that math can be done on the POINTER data type using the double math instructions (e.g. P#2.0 + P#5.0 = P#7.0).

L 	P#2.0 	  	//Load ACCU1 with pointer value
L 	P#5.0 	  	//Load ACCU1 with secondpointer value
+D 	  	  	 
T 	MD 	0 	//MD0 now contains the value P#7.0

Since the bit position only goes to eight the result of P#8.7 + P#1.1 = P#10.0 and not P#9.8. These methods can be used to offset the address or increase/decrease the pointer in a loop. The Address Registers

Besides the regular accumulators, there are two 32-bit address registers (AR1, AR2) for storing pointers used in register indirect addressing methods. A series of different load and transfer type instructions can be used to work with AR1. A similar set is available for AR2.

STL		Description

LAR1		Loads AR1 with the contents of ACCU1
LAR1 P#M100.0	Loads AR1 with a pointer constant
LAR1 MD24	Loads AR1 with the pointer in MD24
LAR1 AR2	Loads AR1 with the contents of AR2
TAR1		Transfers the contents AR1 into ACCU1
TAR1 MD28	Transfers the contents in AR1 to a memory location
TAR1 AR2	Transfers the contents in AR1 to AR2
CAR		Exchanges the contents of AR1 with AR2

Addition can be directly accomplished on AR1 and AR2 with the following:

STL		Description

+AR1		Adds the contents of ACCU1 to AR1 and stores the result back into AR1
+AR1 P#100.0	Adds the pointer constant to AR1 and stores the result back into AR1

Area-Internal Register Indirect Addressing

The area-internal register indirect addressing method uses one of the address registers plus a pointer to determine the address the instruction is to reference. The format is:

address identifier [address register, pointer]

The address identifier can be I, Q, M, L, DI or DB in bit, byte, word or double word form. The address register must be previously loaded with a double word pointer without reference to the address identifier. The exact address is determined by adding the address register with the pointer. The example below shows the area-internal method using bit locations.

L 	P#0.7 	  	//Load ACCU1 with pointer value
LAR1 	  	  	//Load AR1 with pointer in ACCU1
A 	I [AR1, P#0.0] 	//Check input I0.7
= 	Q [AR1, P#1.1] 	//If RLO=1 turn on Q2.0

Area-Crossing Register Indirect Addressing

Area-crossing register indirect addressing is similar to the area-internal method except the pointer loaded into the address register references a memory area (e.g. P#M10.0 or P#DBX0.0). This means the address identifier used before the opening bracket is not needed if referencing a bit otherwise it will be a B for byte, W for word or D for double. The example below shows the area-crossing method using bit locations.

L 	P#I0.7 	  	//Load ACCU1 with pointer value
LAR1 	  	  	//Load AR1 with pointer in ACCU1
L 	P#Q124.0 	  	//Load ACCU1 with pointer value
LAR2 	  	  	//Load AR2 with pointer in ACCU1
A 	[AR1, P#0.0] 	//Check input I0.7
= 	[AR2, P#1.1] 	//If RLO=1 turn on Q125.1

This next example shows area-crossing methods using a word and double word format.

L 	P#M0.0 			//Load ACCU1 with pointer value
LAR1 	  			//Load AR1 with pointer in ACCU1
L 	W [AR1, P#10.0] 	//Load the word whose address is
				//determined by the contents of
				//AR1 plus 10 bytes (MW10) into ACCU1
OPN 	DB 	5 		//Open DB5
L 	P#DBX 0.0 		//Load ACCU1 with pointer value
LAR2 	  			//Load AR2 with pointer in ACCU1
L 	L#0 			//Load zero into ACCU1
T 	D [AR2, P#50.0] 	//Transfer the value in ACCU1 to the
				//double word whose exact location is
				//the address in AR2 plus 50 bytes
				//(DB5.DBD50)

Balk om flessen in een oven te schuiven

2009-12-19T15:16:10+02:00

Balk om flessen in een oven te schuiven

in bewerking…

1) balk voor inschuiven

flessen in pakketten zetten > steeds verder opschuiven en dan weer kort inschuiven > ruime openingen tussen de pakketten tegen het omvallen van de hele ovenlading

2) synchronisatie

geen sensoren meer op de baan
flespositie op de baan exact bekend
ruimte tussen de flessen altijd zelfde en onafhankelijk van machinesnelheid

Gebruikte materialen Synchronisatie

omschrijving	merk	type
kast	Rittal	AE
hoofdschakelaar	Kraus&Naimer
automaten	ABB
DC voeding	Meanwell
aansluitmateriaal	Phoenix
Frequentieregelaar	Control Techniques	UNIdrive SP0
Encoderkaart	Control Techniques	Encoder plus
Motionkaart	Control Techniques	EZ motion
encoders	IFM	RO1364
Touchpanel	ESA	VT155

Gebruikte materialen inschuiver

omschrijving	merk	type
kast	Rittal	AE
hoofdschakelaar	Kraus&Naimer
automaten	ABB
DC voeding	Meanwell
aansluitmateriaal	Phoenix
Frequentieregelaar	Control Techniques	CSK
PLC	VIPA	CPU 115
encoder	IFM	RO1364
Touchpanel	ESA	VT155
naderingsschakelaars	IFM	M16 quadronorm
fotocellen	Leuze	vervallen
ultrasoonsensor	Leuze	vervallen

laserservice

2009-09-15T20:49:13+02:00

laserservice

Wij kunnen vrijwel iedere snijopdracht in alle „laserbare” materialen aan. Ook voor onderdelen, zoals spiegels, eb voor onderhoud kunt U bij ons terecht.
Voor meer informatie hierover of over on-site training kunt U kontakt opnemen met Kees Jan Goorissen.

Lijmapplicator

2008-10-24T11:07:51+02:00

Lijmapplicator

Veel klanten kunnen heel goed zelf een machine maken of aanpassen, mechanisch en elektrisch. Ook het aanpassen van een PLC programma kan men vaak heel goed zelf doen.

Een heel nieuw programma opzetten, goed gestructureerd zodat het later eenvoudig aan te passen is, is lastiger. Hier kunnen wij behulpzaam zijn zoals bij een klant die een lijmautomaat had gebouwd. Hier hebben we samen met de eigen TD een programma opgezet dat later door de klant zelf onderhouden kan worden. Als de klant later wijzigingen aanbrengt en het aan ons toestuurd archieveren wij dit (kostenloos) zodat wij bij storingen ook de beschikking hebben over de meest recente versie.

Op deze wijze bespaart de klant op de ontwikkelkosten en op de kosten van het latere onderhoud maar heeft wel altijd de mogelijkheid om op ons terug te vallen.

Handige links

2010-01-15T09:04:20+02:00

Handige links

Control techniques. Download manuals en gratis software

Nederlandse Phoenix website

Nederlandse Leuze website

Siemens automation

Vipa, ASEM, Progea en meer…

Nederlandse IFM website

Directe link naar het beroemde schakelschema boek van Moeller

Technische woorden vertalen van en naar het engels. Erg handig!

De New approach website van de europese commissie

site van de grootste open source gemeenschap ter wereld.

Circuitsonline, het grootste elektronicaforum van de benelux

Het PLC forum, stel hier al uw PLC vragen.

Nuttige java applets (?), zowel voor educatieve doeleinden als tegen de verveling

Fuzzy logic, drie lessen in jip-en-janneke taal.

Zoek naar datasheets. Kostenloos en zonder registratie.

logo

2010-06-30T09:14:07+02:00

locatie: xj3.nl/dokuwiki/lib/tpl/arctic/images

buttons

machinebouw

2009-09-15T20:40:12+02:00

machinebouw

Door alle verschillende disciplines die we „aan boord” hebben zijn we ook in staat om snel alle soorten van machines geheel volgens uw specificaties te bouwen.

Mail voor meer informatie met Ernst Noldus.

Microchip μC snippets

2008-10-24T11:13:28+02:00

Microchip μC snippets

Level 2 Headline

Omschrijving

programmacode

Level 2 Headline

Omschrijving

programmacode

Microchip PIC Basic snippets

2009-02-20T18:22:39+02:00

Microchip PIC Basic snippets

Level 2 Headline

Omschrijving

programmacode

Level 2 Headline

Omschrijving

programmacode

motorsturing voor twee RC inputs

Voor een experimentje met een RC boot geschreven:
Twee servouitgangen van de receiver rechtstreeks op de pic aangesloten:

links-rechts
vooruit-achteruit

Het bootje heeft geen roer, wel twee motoren. Door de beide signalen te mixen kan de boot nu eenvoudig manouvreren en zelf op de plaats draaien.

Het is niet zo'n fraai programma, maar het is in enkele uurtjes op een regenachtige zaterdagmiddag geschreven en het werkt. Het staat hier bij de snippets, terwijl het een heel programma is: dit is eigenlijk gebeurt om de pagina te testen; dit programma had ik snel bij de hand.

Let op: de draairichting word in dit programma nog bepaald door een H-brug van relais aan te sturen. Het motortoerental word gestuurd door één enkele mosfet per motor.

'****************************************************************
'*  Name    : motormix.BAS                                      *
'*  Author  : G.J. Dreijer                                      *
'*  Notice  :  *
'*          :                               *
'*  Date    : 7-6-05                                            *
'*  Version : 20.0.1.2                                          *
'*  Notes   : voor relais H-brug                                                  *
'*          :                                                   *
'****************************************************************
    device 18f452
    xtal 10
    DECLARE PLL_REQ = on
 
 
 
'LCD display    
    all_digital             true
    declare lcd_type        0
    declare lcd_interface   4
    declare lcd_lines       2
    declare lcd_dtpin       portd.0
    declare lcd_enpin       portd.4
    declare lcd_rspin       portd.5
 
'ingangen
    trisb           = 0xff
    portb           = 0x00
    intcon.7        = 0
    symbol servoT   = portb.0
    symbol servoS   = portb.1
    symbol in2      = portb.2
    symbol in3      = portb.3
    symbol in4      = portb.4
    symbol in5      = portb.5
    symbol in6      = portb.6
    symbol in7      = portb.7
    symbol inreg    = portb   
'uitgangen
    trisc           = 0x00        
    portc           = 0x78
    symbol uit0     = portc.0
    symbol motor1_F = portc.1
    symbol motor2_F = portc.2
 
    symbol motor1_R = portc.3
    symbol motor1_L = portc.4
    symbol motor2_R = portc.5
    symbol motor2_L = portc.6
 
    symbol uit7     = portc.7
    symbol uitreg   = portc
 
 
'diverse declaraties
    symbol uit      = 1
    symbol aan      = 0
 
    dim ServoT_in as word
    dim ServoS_in as word 
    dim Tpos as word
    dim Tneg as word
    dim Spos as word
    Dim Sneg as word
 
 
    dim Motor1_val as word
    dim Motor2_val as word
    dim motor1_out as byte
    dim motor2_out as byte
 
 
'uitgangen allemaal uit
    uitreg = 0xFF        
 
 
'    cls
'regelloop-----------------------------------------------------
regelloop:
'servo ingang 1         
    while servoT = uit                  'wacht tot signaal laag is....
        servoT_in = 0                   '...reset teller...
    wend
    while servoT = aan                  '...en wacht tot ie weer hoog gaat
        servoT_in = 0                   '...reset teller...
    wend
 
    while servoT = uit
        servoT_in = servoT_in + 1
'        delayus 5
    wend
 
'servo ingang 2         
    while servos = uit                  'voor servo 2 het zelfde ritueel
        servos_in = 0
    wend
    while servos = aan
        servos_in = 0
    wend
 
    while servos = uit
        servos_in = servos_in + 1
'        delayus 5
    wend   
 
'servo waarden aanpassen

'                       +trim   vol+    neutr   vol-    -trim
'      waarden gas:             2600    1900    1250
'      waarden stuur:           2500    1900    1200

 
print at 1, 1, dec servoT_in, "    "
print at 1, 9, dec servos_in, "    "
 
'Netjes centreren en te hoge/lage waardes afkappen
    select servot_in
        case < 1300
            servot_in = 1300
        case > 2500
            servot_in = 2500
    endselect
 
    select servos_in
        case < 1300
            servos_in = 1300
        case > 2500
            servos_in = 2500
    endselect
'positieve en negatieve waardes bepalen
    select servot_in
        case < 1900
            tneg = 1900 - servot_in
            tpos = 0
        case > 1900
            tpos = servot_in - 1900 
            tneg = 0
        case else
            tpos = 0
            tneg = 0
    endselect               
 
    select servos_in
        case < 1900
            sneg = 1900 - servos_in
            spos = 0
        case > 1900
            spos = servos_in - 1900 
            sneg = 0
        case else
            spos = 0
            sneg = 0
    endselect               
 
'Waarde voor PWM bepalen                
        motor1_val = (1200 + tpos + spos - tneg - sneg)     
        motor2_val = (1200 + tpos - spos - tneg + sneg)
'1200 is nu neutraal
'600 minimum
'1800 maximum
'waardes kunnen hier nog wel boven/onder komen: afkappen!
    select motor1_val
        case < 600
            motor1_val = 600
        case > 1800
            motor1_val = 1800
    endselect
 
    select motor2_val
        case < 600
            motor2_val = 600
        case > 1800
            motor2_val = 1800
    endselect
 
 
'nu adhv de motorval de h-brug sturen
    select motor1_val
        case < 1180
            motor1_l = aan
            motor1_r = uit
        case > 1220
            motor1_l = uit
            motor1_r = aan
        case else
            motor1_l = aan
            motor1_r = aan
    endselect
 
    select motor2_val
        case < 1180
            motor2_l = aan
            motor2_r = uit
        case > 1220
            motor2_l = uit
            motor2_r = aan
        case else
            motor2_l = aan
            motor2_r = aan
    endselect    
 
'motorval schalen en naar pulsuit sturen
    select motor1_val
        case < 1200
            motor1_val = 1200 - motor1_val
        case > 1200    
            motor1_val = motor1_val - 1200
    endselect        
    motor1_out = motor1_val / 3
 
    select motor2_val
        case < 1200
            motor2_val = 1200 - motor2_val
        case > 1200    
            motor2_val = motor2_val - 1200
    endselect        
    motor2_out = motor2_val / 3    
 
print at 2, 1, dec motor1_r, dec motor1_l, " ", dec motor1_out, "  "
print at 2, 9, dec motor2_r, dec motor2_l, " ", dec motor2_out, "  "    
 
    hpwm 1,  motor1_out, 3000     'pulsout maximaal 255. 
    hpwm 2,  motor2_out, 3000    
 
goto regelloop

De microtransat

2010-05-20T20:34:42+02:00

De microtransat

De microtransat is een race over de atlantische oceaan voor onbemande zeilboten. De boten moeten volledig autonoom zijn, er mag geen informatie naar de boot verzonden worden. Wel is een uplink verplicht om op gezette tijden de positie van de boot door te geven. We overwegen mee te doen met een eigen boot. Dit is uiteraard niet eenvoudig, een atlantische oversteek met een relatief korte finishlijn en een boot die het ongeveer 100 dagen vol moet houden zonder ingrijpen van buitenaf.

verder....

met dank aan:

LAATSTE NIEUWS: we kunnen varen

You can find our blog in english here.

MMI's

2009-09-12T15:27:59+02:00

MMI's

ESA

VT touchpanels
IT touchpanels

Siebert

industriele lichtkranten

montage

2009-11-19T17:45:24+02:00

montage

Machines demonteren, verhuizen en monteren is voor ons geen probleem. Ook het transport kan door ons verzorgd worden.

Mail voor meer informatie met Ernst Noldus

Motionchair

2010-02-17T08:39:23+02:00

pagina in bewerking…

Motionbase™ is een handelsmerk van van Krieken design & engineering.

Nieuws

2010-08-01T13:50:12+02:00

Nieuws

^{U kunt zelf ook nieuws toevoegen. Hiervoor moet U wel eerst geregistreerd zijn: klik op [inloggen] en de rest wijst zich vanzelf. Nieuwe berichten graag boven in de pagina invoegen. Begin met een kop „H2” met hierin de datum en de koptekst.
Wij behouden ons het recht voor berichten te wijzigen of te verwijderen.

syntax:

De syntax van de wiki vindt je hier: Formatting Syntax.

Om even de wiki syntax te oefenen gebruik je de PlayGround.}

31-7-2010, vakantie Dreijer.

Van 5-8-2010 t.m. 17-8-2010 is Gerrit Jan Dreijer met vakantie. Woonhuis en zaak zijn wel „bemand” dus boodschappen kunnen worden aangenomen. De voicemail van de mobiel word zoveel mogelijk afgeluisterd, maar omdat het bereik op zee in veel gevallen gewoon nul is zal zich dat beperken tot de avonden dat we in een haven of voor de kust voor anker liggen. Voor wie het weten wil: we gaan zeilen rond Griekenland en hebben daarvoor een Bavaria 37 geleend.

26-6-2010, het gebruik van normen.

Eigenlijk geen nieuws, maar naar aanleiding van vragen nog maar eens een uitleg over normengebruik m.b.t. het bouwbesluit.

Het Bouwbesluit geeft prestatie-eisen waaraan een bouwwerk moet voldoen. Wanneer het bijvoorbeeld gaat om een minimale afmeting in meters, is eenduidig vast te stellen of deze prestatie wordt geleverd of niet. Soms vraagt de bepaling van de prestatie echter een uitgebreidere uitleg. Bijvoorbeeld bij de eisen ten aanzien van het energiegebruik van een gebouw. In zo'n geval wijst het Bouwbesluit naar een NEN-norm. Daarin staan één of meerdere methoden om aan het betreffende voorschrift te voldoen. Als u gebruik maakt van de NEN-norm weet u dus zeker dat op dat onderdeel aan het Bouwbesluit zal worden voldaan. Het gebruik van NEN-normen is echter niet verplicht.

In plaats daarvan zijn er nog andere mogelijkheden:

Het Bouwbesluit biedt de mogelijkheid om een 'gelijkwaardige oplossing' toe te passen. Dat betekent dat een andere invulling mag worden gegeven aan de prestatie-eis, als er maar voldaan wordt aan de doelstellingen van die eis. De gekozen oplossing wijkt in dat geval af van de voorgeschreven eis, maar biedt tenminste dezelfde mate van veiligheid, gezondheid, bruikbaarheid, energiezuinigheid en bescherming van het milieu als de oorspronkelijke eis.
Ook is het mogelijk gebruik te maken van een Nederlandse Praktijkrichtlijn (NPR). NPR-en worden - evenals de NEN-normen - uitgegeven door het Nederlands Normalisatie Instituut. Een NPR kan bestaan uit bijvoorbeeld een computerprogramma, een vereenvoudigde bepalingsmethode of een reeks concrete voorbeelden die voldoen aan een bepaalde Bouwbesluit-eis. Bij het volgen van de aanwijzingen mag worden verwacht dat aan de minimale eisen van het Bouwbesluit zal worden voldaan
Ten slotte wordt in het Bouwbesluit gerefereerd aan kwaliteitsverklaringen afgegeven door erkende certificeringsinstellingen. Hierbij gaat het om een verklaring waarin is aangegeven dat een bouwmateriaal of bouwdeel, mits toegepast op de omschreven manier, voldoet aan de eisen die aan zulke materialen of delen worden gesteld in het Bouwbesluit.

Erg handig zijn die extra oplossingen over het algemeen niet. De normen zijn eigenlijk bedoeld als een eenvoudig hulpmiddel om aan de wet te voldoen. Daar moet wel bij vermeld worden dat de normen in enkele gevallen ook niet altijd even helder zijn, en veel ruimte voor discussie laad. In die gevallen mankeerd er dus duidelijk een en ander aan de norm zelf. Ondanks dat is het aan te raden gewoon de benodigde normen aan te schaffen en te volgen.

Eigenlijk geld bovenstaande ook voor bijvoorbeeld de machinerichtlijn. De richtlijn is bedoeld om in de wetten van de EU lidstaten verankerd te worden. In de richtlijnen word zo hier en daar ook verwezen naar europeese normen, maar de EC geeft ook duidelijk aan dat het volgen van de normen zeker niet verplicht is. Ook hier geld weer dat het zelf opnieuw uitvinden van normen onhandig en onnodig duur is.

20-5-2010; EDRI en de gevaren van de informatiemaatschappij

De EDRI heeft een stripboek uitgebracht om jongeren te wijzen op de mogelijke gevaren van de informatiemaatschappij.
Under surveillance

26-04-2010; Galileo open service signal

The European Commission grants free access to the technical information on the future Galileo open service signal, i.e. the specifications manufacturers and developers need to process data received from satellites. The updated „Galileo Open Service Signal-In-Space Interface Control Document” informs receiver manufacturers, application developers and service providers on how to use the future Galileo system and what they can expect in terms of performance. This information is free-of-charge. Independent studies indicate that Galileo is expected to deliver downstream market revenues of EUR 14 billion between 2014 and 2027 primarily in the market of receivers and applications. You can find the document at www.ec.europa

^{bron: Directoraat-generaal Ondernemingen en industrie van de CE}

19-04-2010; week van het MKB

Van 25 mei tm 1 Juni is het europeese week van het MKB. Voor bestaande bedrijven moet het voornaamste doel zijn het geven van informatie over wat de overheid allemaal voor je kan betekenen. Nu is het een beetje zuur te constateren dat er in Nederland dus helemaal niets gebeurd in het kader van de week van het MKB, en dat terwijl ruim 99% van de bedrijven het stempel MKB hebben meegekregen en goed zijn voor ruim 2/3 van de werkgelegenheid in de private sector.
Nou is het waarschijnlijk goed zoeken geblazen naar MKB'ers die tijd hebben voor zo een feestelijke week vol evenementen maar helemaal niets is natuurlijk wel erg karig. Op de lijst met nationale evenementen staan alleen de normale, betaalde seminairs van de KvK.

^{bron: Directoraat-generaal Ondernemingen en industrie van de CE}

09-04-2010; zes praktijkgidsen REACH

De ECHA heeft zes praktijkgidsen uitgegeven die het voldoen aan de richtlijn REACH moet vergemakkelijken. Deze gidsen zijn te downloaden van de ECHA website

^{bron: Directoraat-generaal Ondernemingen en industrie van de CE}

10-01-2010; softwarehulp bij machinerichtlijn

Bij de nieuwe machinerichtlijn zijn ook twee nieuwe normen gelanceerd, de IEC 62061 en de ISO 13849-1, kortweg SIL en PL. Het rekenen met deze normen is niet echt eenvoudig maar gelukkig is er software verkrijgbaar om U hierbij te assisteren: Ook met deze (gratis) software bent U er nog niet natuurlijk, enige kennis over de nieuwe normen en de richtlijn blijven noodzakelijk.

Een paar tips:
Sistema (gratis)
Siemens online tool (gratis)

Niet gratis, maar de demo mode geeft een aardig idee van de werking van de software. In demo mode kunnen er maximaal 3 SRCF's per project worden toegevoegd. De prijs van een licentie zal Pilz kennende wel meevallen:
PAScal van Pilz (demo, licentie nodig)

terug

09-12-2009; overgangstermijn EN954-1 verlengd

De EC Machinery Working Group is gisteren overeengekomen dat de overgangsperiode voor de EN954-1 word verlengd. Daarmee is de kous nog niet af, de duur van de verlenging is nog niet vastgesteld. De geruchten gingen over drie jaar verlenging, maar korter is natuurlijk ook mogelijk. Een langere overgangsperiode is overigens ook niet geheel uitgesloten, er is ook gesproken over een periode van vijf jaar.

In eerste instantie was de overgangsperiode al verlengt tot 31 december 2012, maar van die beslissing werd enkele maanden later weer ingetrokken. Nu dus is de verlenging dus definitief, alleen de termijn moet nog worden vastgesteld.

update 13-01-2010

De NEN-EN 954-1 is met 2 jaar verlengd tot 31-12-2011 aldus een extra mededeling in het publicatieblad van de EU (C321 van 29.12.2009)

terug

24-11-2009; Nieuw: SM-safety module van Control Techniques

Control Techniques heeft een nieuwe SM safety module voor gebruik in de Unidrive en Digitax drives. Behalve de standaard reeds aanwezige safe toque off functie voegt dit nog vele extra veiligheidsfuncties toe. Voor het configurteren is gratis software ter beschikking.

Flyer (PDF)

terug

12-10-2009; overgangstermijn EN954-1

Wordt de overgangstermijn van de EN954-1 verlengd?

Over een eventuele verlenging van de overgangstermijn wordt op 7-8 december 2009 vergaderd door de Europese commissie in Brussel. De EN954-1 word op 29 december 2009 ingetrokken, tenzij op bovenstaande datum anders wordt beslist.

Twee weken geleden kwam deze verlenging al in het nieuws maar later kwam men hier weer op terug.

Quote D&F:

Er is een lobby gaande om de overgangstermijn te verlengen, omdat sommige leveranciers van veiligheidscomponenten de faalkansgegevens nog niet allemaal beschikbaar hebben. Om die reden vinden machinebouwers de overgangstermijn van drie jaar te kort. Veelal is het ook een smoes omdat men te laat begonnen is met het zich verdiepen in de twee nieuwe normen.

Dit een „smoesje” noemen is natuurlijk wel erg kort door de bocht. De nieuwe normen zijn nog maar net „af” en tot voor een half jaar geleden konden ook de opstellers van de normen niet op alle vragen een antwoord geven. Bovendien vinden velen dat de nieuwe normen juist doordat ze wel een heel stuk ingewikkelder zijn en juist daarom niets bijdragen aan de veiligheid. Gelukkig zijn er bij D&F nog genoeg mogelijkheden om zich ook op het laatste moment nog te laten informeren over die nieuwe normen. Voor slechts 525,- euro kun je je in slechts één dag laten bijspijkeren.

terug

onderhoud

2009-10-05T12:53:06+02:00

onderhoud

Wij doen onderhoud aan uiteenlopende soorten machines.
Voor enkele machinebouwers verzorgen wij ook de service binnen de Benelux.

Bij onderhoudsbeurten kunnen wij desgewenst gelijk de installatie controleren met behulp van een thermografische kamera om zo problemen die onzichtbaar op de loer liggen kunnen voorkomen.

In samenwerking met VBPS doen wij veel onderhoud aan diverse merken en types palletwikkelaars. Wij hebben hierbij in het bijzonder voor alle machines die geleverd zijn onder de naam BORST. Toen de firma BORST door interne problemen in 2003 genoodzaakt was haar aktiviteiten te staken heeft VBPS de komplete inboedel overgenomen, dus alle documentatie, onderdelen en klantgegevens. Alle systemen van de firma BORST kunnen nu dus onderhouden worden door VBPS.

Overig μC snippets

2008-10-25T13:13:21+02:00

Overig μC snippets

Level 2 Headline

Omschrijving

programmacode

basic stamp navigatie, initialisation

initialisatie. De overige programmadelen staan hieronder. Deze programma's zijn bedoeld voor in een UAV, „Released under a Creative Commons attribution licence by Chris Anderson, DIYDrones.com”

'This is the UAV scheduler program
'Released under a Creative Commons attribution licence by Chris Anderson, DIYDrones.com

' {$STAMP BS2p}
' {$PBASIC 2.5}

' Set this to the total number of waypoints
TotalWaypoints CON 3

' Waypoints (decimal format: degrees.minutes_as_fractional_degrees.
' Put the degrees in the first CON; the fractional degrees (decimal minutes) in the second.
' These are just placeholders. Insert your own waypoints and adjust the TotalWaypoints number accordingly
Waypoint1Lat  CON 47
Waypoint1LatMin CON 5906
Waypoint1Long CON  122
Waypoint1LongMin CON 1239
Waypoint2Lat  CON 47
Waypoint2LatMin CON 5913
Waypoint2Long CON 122
Waypoint2LongMin CON 1225
Waypoint3Lat  CON 47
Waypoint3LatMin CON 5906
Waypoint3Long CON 122
Waypoint3LongMin CON 1224
'Waypoint4Lat  CON 37
'Waypoint4LatMin CON 3853
'Waypoint4Long CON 122
'Waypoint4LongMin CON 2327
'Waypoint5Lat  CON 37
'Waypoint5LatMin CON 3853
'Waypoint5Long CON 122
'Waypoint5LongMin CON 2327
'Waypoint6Lat  CON 37
'Waypoint6LatMin CON 3853
'Waypoint6Long CON 122
'Waypoint6LongMin CON 2327
'Waypoint7Lat  CON 37
'Waypoint7LatMin CON 3853
'Waypoint7Long CON 122
'Waypoint7LongMin CON 2327
'Waypoint8Lat  CON 37
'Waypoint8LatMin CON 3853

basic stamp navigatie, navigation

Navigatie

' This is the program for UAV navigation.
' Released under a Creative Commons attribution licence by Chris Anderson, DIYDrones.com
' Bug fixes by Wayne Garris

' {$STAMP BS2p}
' {$PBASIC 2.5}

' -----[ I/O Definitions ]-------------------------------------------------

gio             PIN     15     ' connects to GPS Module SIO pin
sdat PIN 14                     'serial io for servo
chan5in         PIN       13   'swich channel input
' -----[ Constants ]-------------------------------------------------------
bauds CON  1021
'RX5in           CON     5
Scale       CON     $0C0
ra CON 0
hipulse CON 1
lowpulse CON 0
ch4 CON 4
T4800           CON     500
Open            CON     $8000
Baud            CON     Open | T4800    ' Open mode to allow daisy chaining
'pin2            CON     9

' GPS Module Commands
GetLat          CON     $05
GetLong         CON     $06
GetHead         CON     $09

' -----[ Variables ]-------------------------------------------------------

TotalWaypoints VAR Nib: CurrentWayNum VAR Nib
TempLat VAR Byte: TempLatMin VAR Word: TempLong VAR Byte: TempLongMin VAR Word
CurrentWayLat VAR Byte: CurrentWayLatMin VAR Word: CurrentWayLong VAR Byte: CurrentWayLongMin VAR Word
DeltaLat VAR Word: DeltaLong VAR Word

workVal   VAR      Word     ' for numeric conversions

degrees   VAR      Byte     ' latitude/longitude degrees
minutes   VAR      Byte     ' latitude/longitude minutes
minutesD  VAR      Word     ' latitude/longitude decimal minutes
dir       VAR      Byte     ' direction (latitude: 0 = N, 1 = S, longitude: 0 = E, 1 = W)

heading   VAR      Word     ' heading in 0.1 degrees

' ------[ Main ]-------------

Main:
DO
' We'll use workVal as a temporary variable here to save variable space
  PULSIN chan5in,1,workVal
    workVal= (workVal */ scale)/2
    IF workVal > 750 THEN  RUN 0'1900 is a safe value for a mid-point (if the value is greater than 1900, then the
      'gear switch has been moved to the “manual” position).
  GET 68, CurrentWayNum
  GET 69, TotalWaypoints
  IF CurrentWayNum <= TotalWaypoints THEN GOSUB GetCurrentWay ELSE GOSUB GoHome
  GOSUB Get_Lat
  GOSUB Get_Long
  GOSUB Check_Proximity
  GOSUB Get_Heading
  GOSUB Get_Angle
  GOSUB Get_Rudder_Angle
  GOSUB Steer

  'RUN 3

LOOP
' -----[ Subroutines ]-----------------------------------------------------
Get_Angle:
  DeltaLong = -1 * DeltaLong 'reverse to conform with ArcTangent coordinate standards
  DeltaLat = DeltaLat ** 839'(128/9999)adjust them so the max values are +- 128, to conform with ArcTangent standards.
  DeltaLong = DeltaLong ** 839'=deltalong * (128 / 9999)
  workVal = DeltaLong ATN DeltaLat ' reuse workVal (to save variable memory) to hold binary radian result of ArcTangent
  DEBUG "angle", workVal,CR,11
  RETURN

' ----------------------------------------------------
Get_Rudder_Angle:
  heading = 256 - heading + 64 ' Convert GPS brad frame of reference to Basic Stamp frame of reference (reversed and rotated)
  workVal = workVal - heading ' Rotate them both so Heading is at zero
  IF workVal < 0 THEN workVal = workVal + 256 'Make all angles positive. Left is less than 128; right is larger than 128
  IF workVal < 128 THEN workVal = 128 - workVal ELSE workVal = 256 - workVal ' Adjust to reflect that 0 and 256 are maximum deflection
  ' for the servo; 128 is the neutral position.
  RETURN

' ----------------------------------------------------

Steer:
' We're going to reuse a lot of variables here; pay no attention to their names.
' Basically, we're turning the rudder by the value of workVal
 DEBUG "steer",DEC workval,CR,11
 workval = workval + 500
 SEROUT  sdat, bauds+$8000,["!SC",ch4,ra,workval.LOWBYTE,workval.HIGHBYTE,CR]
  RETURN

' ----------------------------------------------------
Check_Proximity:
  'we'll reuse CurrentWayNum here to save variable space
  CurrentWayNum = CurrentWayLat - TempLat

  'we can safely assume that we're never more than one degree away from the next waypoint, so we can reduce the degree delta into
  ' 1, -1 or 0 and collapse degrees and minutes into one word, with one degree = 10,000 and minutes 1-9,999
  IF CurrentWayNum = 1 THEN CurrentWayLatMin = CurrentWayLatMin + 10000
  IF CurrentWayNum = -1 THEN TempLatMin = TempLatMin + 10000
  DeltaLat = CurrentWayLatMin - TempLatMin

  'now do the same for longitude
  CurrentWayNum = CurrentWayLong - TempLong
  IF CurrentWayNum = 1 THEN CurrentWayLongMin = CurrentWayLongMin + 10000
  IF CurrentWayNum = -1 THEN TempLongMin = TempLongMin + 10000
  DeltaLong = CurrentWayLongMin - TempLongMin

  'set this for how close to the waypoints you want to get (these are set for one hundredth of a degree.)
  'If we're within range, go to the incrementing subroutine and switch to the next program
  IF ABS DeltaLat <= 100 AND ABS DeltaLong <= 100 THEN GOTO Next_Waypoint
  DEBUG "lat to waypoint",DEC deltalat,CR,11
  DEBUG "long to waypoint",DEC deltalong,CR,11
RETURN

' ----------------------------------------------------
Next_Waypoint:
'increment the waypoint counter and temprarily exit the navigation program
  CurrentWayNum = CurrentWayNum + 1
  PUT 68, CurrentWayNum
  DEBUG "waypoint #",DEC currentwaynum,CR,11
 ' RUN 3
  RETURN
' ----------------------------------------------------

GetCurrentWay:
  GET (5+(3*CurrentWayNum)), CurrentWayLat
  GET (6+(3*CurrentWayNum)), Word CurrentWayLatMin
  GET (8+(3*CurrentWayNum)), CurrentWayLong
  GET (9+(3*CurrentWayNum)), Word CurrentWayLongMin
  RETURN

' ----------------------------------------------------
GoHome:
  GET 0, CurrentWayLat
  GET 1, Word CurrentWayLatMin
  GET 3, CurrentWayLong
  GET 4, Word CurrentWayLongMin
  RETURN

' ----------------------------------------------------
Get_Lat:
  SEROUT gio, Baud, ["!GPS", GetLat]
  SERIN  gio, Baud, 3000, No_Response, [degrees, minutes, minutesD.HIGHBYTE, minutesD.LOWBYTE, dir]

  ' convert to decimal format
  workVal = (minutes * 1000 / 6) + (minutesD / 60)
  TempLat = degrees
  TempLatMin = workVal
  DEBUG "lat", DEC degrees,"deg",DEC minutes,".",DEC minutesd,"min",CR,11
  RETURN

' ----------------------------------------------------
Get_Long:
  SEROUT gio, Baud, ["!GPS", GetLong]
  SERIN  gio, Baud, 3000, No_Response, [degrees, minutes, minutesD.HIGHBYTE, minutesD.LOWBYTE, dir]

  ' convert to decimal format
  workVal = (minutes * 1000 / 6) + (minutesD / 60)
  TempLong = degrees
  TempLongMin = workVal
  DEBUG "long" ,DEC degrees,"deg",DEC minutes,".",DEC minutesd,"min",CR,11
  RETURN

' ----------------------------------------------------
Get_Heading:
  SEROUT gio, Baud, ["!GPS", GetHead]
  SERIN  gio, Baud, 3000, No_Response, [heading.HIGHBYTE, heading.LOWBYTE]
  DEBUG "heading" ,DEC heading ,CR ,11
  heading = (heading*100)/141 'convert to binary degrees (1 degree = 1.41 binary degrees)

  RETURN

' ----------------------------------------------------
No_Response:
  PAUSE 1000
  GOTO Main

basic stamp navigatie, UAV

UAV hoofdprogramma


' This is the main UAV program.
' Released under a Creative Commons attribution licence by Chris Anderson, DIYDrones.com

' This first program just passes RX rudder and elevator commands through the Basic Stamp and watches for the gear
' switch to change state. When that changes this program transfers control to the initialization program for autonomous control.
' Based on demonstration code created by Dan DeGard (http://www.seattlerobotics.org/encoder/200304/AirmailStamp.htm)

'{$Stamp BS2p, initialize, navigation, altitude}''Initialization program is loaded in program slot 1; navigation in 2; altitude hold in 3
' {$PBASIC 2.5}
''pin 15 = gps io
''pin 14 = servo io
''pin 13 = chan5 ,switch
''pin 12 = chan4 ,rudder
''pin 11 = chan3 ,throttle
''pin 10 = chan2 ,elevator
''pin 9 = chan1 , aileron


' --------[Variables

'permission VAR Word: CntrlInput VAR Word: Position VAR Word
'Lbyte VAR Byte: Ubyte VAR Byte: interim VAR Word
'RX5in CON 5: RX4in CON 7: RX2in CON 6

'These constants are used by the FT639

'pin1 CON 8: pin2 CON 9: baud CON 17405: header CON 103
'pulse CON 90 :

chan2in PIN 10 'channel 1 input
chan3in PIN 11
chan4in PIN 12 'channel 2 input
chan5in PIN 13   'swich channel input
sdat PIN 14
bauds CON  1021       'baud rate
ra CON 0
hipulse CON 1
lowpulse CON 0
ch2 CON 2
ch4 CON 4
 Scale       CON     $0C0
chan2 VAR Word   'channel 1 value
chan4 VAR Word   ' channel 2 value
chan5 VAR Word   ' swich value
'GOSUB setup 'these steps initialize the FT639.
'GOSUB setpulse '
'GOSUB setheader '
'GOSUB setactive '

'The following subroutine first checks to see if the “gear” switch has been changed. Then, it reads the length of the
' square-wave pulse from the R/C receiver. The time value of the pulse is converted arithmetically to a number
' between 0 and 128. This position number is then split into two 4-Bit nibbles and sent to the FT639 chip (all this
' is just to create the required syntax for the FT chip). Note: it's possible to generate a square wave and drive the servos
' with the Basic Stamp chip directly, but it's a computational drain and uses more scarce memory. We offload that
' to the FT639 chip to simplify matters.

check:

  PULSIN chan5in,1,chan5
  chan5 = (chan5 */ scale)/2

  DEBUG DEC chan5,TAB

  IF chan5 > 750  THEN GOSUB through_put ELSE GOSUB Auto
  'IF Permission < 1900 THEN Autonomous '1900 is a safe value for a mid-point (if the value is less than 1900, then the
    'gear switch has been moved to the “autonomous” position).
 'throughput sub
 through_put:

 PULSIN chan2in , HIpulse , chan2
 chan2 = (chan2 */ scale)/2
 DEBUG DEC chan2 ,TAB
 SEROUT  sdat, bauds+$8000,["!SC",ch2,ra,chan2.LOWBYTE,chan2.HIGHBYTE,CR]


 PULSIN chan4in , HIpulse , chan4
 chan4 = (chan4 */ scale)/2
 DEBUG DEC chan4 ,CR,11
 SEROUT  sdat, bauds+$8000,["!SC",ch4,ra,chan4.LOWBYTE,chan4.HIGHBYTE,CR]





GOTO check

Auto:

  DEBUG "auto on",CR,11
  RUN 1
END

basic stamp navigatie, altitude

hoogteregeling

' This is the UAV altitude hold program
' Released under a Creative Commons attribution licence by Chris Anderson, DIYDrones.com

' {$STAMP BS2p}
' {$PBASIC 2.5}

' -----[ I/O Definitions ]-------------------------------------------------

Sio             PIN     15     ' connects to GPS Module SIO pin


' -----[ Constants ]-------------------------------------------------------

RX5in           CON     5
T4800           CON     500
Open            CON     $8000
Baud            CON     Open | T4800    ' Open mode to allow daisy chaining
GetAlt          CON     $07
pin2            CON     9

' -----[ Variables ] ------------------------------------------------------

Alt       VAR      Word(3)
AltOriginal VAR Word: Position VAR Word
Lbyte VAR Byte: Ubyte VAR Byte: interim VAR Word
Temp VAR Word

'------[ Main ]------------------------

Main:
  PULSIN RX5in,1,Temp
  IF Temp > 1900 THEN RUN 0 '1900 is a safe value for a mid-point (if the value is greater than 1900, then the
    'gear switch has been moved to the “manual” position).

    ' ------- Get three readings. First...-------
  SEROUT Sio, Baud, ["!GPS", GetAlt]
  SERIN  Sio, Baud, 3000, No_Response, [alt.HIGHBYTE, alt.LOWBYTE]
' ------- Second... -------
  SEROUT Sio, Baud, ["!GPS", GetAlt]
  SERIN  Sio, Baud, 3000, No_Response, [alt.HIGHBYTE(1), alt.LOWBYTE(1)]
' ------- Third...-------
  SEROUT Sio, Baud, ["!GPS", GetAlt]
  SERIN  Sio, Baud, 3000, No_Response, [alt.HIGHBYTE(2), alt.LOWBYTE(2)]
' ------- Average them ----------------
  alt = (alt + alt(1) + alt(2)) / 3

  ' move elevator as required to stay within +-10 meters of original altitude
  GET 6, Word AltOriginal
  IF alt < (AltOriginal + 10) OR alt > (AltOriginal - 10) THEN GOSUB Center
  IF alt >= (AltOriginal + 10) THEN GOSUB Down
  IF alt <= (AltOriginal - 10) THEN GOSUB Up
  DEBUG "Going to program 2"
  RUN 2

' --------[ Subroutines]--------
Center:
  Position = 128 'adjust this so it's centered
  Interim = Position & %00001111 'keep last 4 bits
  Lbyte = Interim | %00100000 'create lower nibble for servo 3 (0010 means “lower nibble for servo 3” in FT639-speak
  Interim = Position & %11110000
  Ubyte = (Interim >> 4) | %10100000 'create upper nibble for servo 3 (1010 means “upper nibble for servo 3” in FT639-speak
  SEROUT pin2,baud,[Lbyte,Ubyte]:PAUSE 10 'sends command to FT639
  RETURN

Down:
  Position = 100 'adjust this so it's a bit down
  Interim = Position & %00001111
  Lbyte = Interim | %00100000
  Interim = Position & %11110000
  Ubyte = (Interim >> 4) | %10100000
  SEROUT pin2,baud,[Lbyte,Ubyte]:PAUSE 10
  RETURN

Up:
  Position = 150 'adjust this so it's a bit up
  Interim = Position & %00001111
  Lbyte = Interim | %00100000
  Interim = Position & %11110000
  Ubyte = (Interim >> 4) | %10100000
  SEROUT pin2,baud,[Lbyte,Ubyte]:PAUSE 10
  RETURN

No_Response:
  PAUSE 5000
  GOTO Main

Level 2 Headline

Omschrijving

programmacode

Level 2 Headline

Omschrijving

programmacode

Level 2 Headline

Omschrijving

programmacode

Level 2 Headline

Omschrijving

programmacode

Overige PLC snippets

2010-07-17T11:30:38+02:00

Overige PLC snippets

Siemens LOGO! pompinstallatie

programma voor een dubbele rioolpomp met een Siemens LOGO!

Twee pompen moeten om de beurt draaien. De draaitijd per pomp is instelbaar (serviceinterval). Let op: deze staat nu nog op 1 minuut, in de praktijk zal dit bijvoorbeeld 10 uur moeten zijn. 1 minuut is zeker te kort!
Instellen in B01 en B02

De ingangen voor automaat en hand moeten volgens de tekening worden aangesloten.

Verder is het mogelijk om een pomp uit te schakelen, de installatie draait dan op 1 pomp verder. Ook bij een thermische storing van een pomp neemt de andere over. Als de installatie te lang achtereen draait of bij een thermische storing geeft de LOGO een alarm.

pompinstallatie

De volgende aansluitnamen zijn in het programma niet benoemd:
Q1 = pomp1
Q2 = pomp2
Q3 = alarm

Siemens LOGO! pompinstallatie 2

Dezelfde als hierboven maar dan met per pomp een keuzeschakelaar hand - 0 - auto
Dit is wellicht minder handig maar wel meer gebruikelijk op bestaande installaties.

pompinstallatie 2

75kW aandrijving pastapers

2009-09-29T20:52:32+02:00

75kW aandrijving pastapers

Bij een machine voor het extruderen van diverse pasta's moest een defekte gelijkstroommmotor met regeling met spoed vervangen worden. De 55kW DC motor is vervangen door een 75kW AC motor, wij hebben de aandrijving geleverd en ingeregeld. De aandrijving bestaat uit een 75/90kW Frequentieomvormer van Control Techniques. Omdat deze gewoon bij Control Techniques in Sliedrecht op voorraad liggen waren we in staat om zeer snel een nieuwe kast te leveren.

Deze pers drukt de pasta met een maximale druk van 140bar door een tweetal matrijzen. Dit gebeurd met twee persschroeven waarvan er nu dus bij één de motor is vervangen. Waarschijnlijk zal de tweede motor ook nog vervangen gaan worden. In de kast zijn uiteraard de voorzieningen al aanwezig voor een tweede aandrijving voor de tweede persschroef.

Aan de kast komt nog een koelaggregaat van Rittal om de temperatuur op een aanvaardbaar niveau te houden.

Paternosterkast

2008-10-24T11:08:30+02:00

Paternosterkast

Voor een student van de design academie: een grote paternosterkast. Uitgevoerd in staal, hout en kunstof.

Plattegronden

2010-06-27T12:02:12+02:00

Plattegronden

PLC's

2009-03-25T10:27:08+02:00

PLC's

Siemens

300

De Siemens 300 serie is waarschijnlijk de meest verkochte PLC van Europa. Dat maakt de serie voor de klant de meest guntige keuze: op iedere straathoek zijn de onderdelen en de programmeurs te vinden. Door ons veelgebruikte processoren:

CPU 313C
CPU 314
CPU 315-2DP

LOGO

De LOGO! is een geniaal bedacht apparaatje. Geen wonder dat na de introductie van de LOGO! alle vooraanstaande merken „logo-achtigen” op de markt brachten, waarvan sommigen wellicht beter of uitgebreider. Feit is wel dat de LOGO! gestart is met een voorsprong en deze nooit heeft ingeleverd. Wij rijden bijna standaard met één of meer LOGO!'s in de servicewagen: ze komen geregeld van pas, al was het maar als luxetimer.

VIPA

100 serie

Deze serie gebruiken we erg veel. Behalve de ondertaande punten is hij ook nog eens erg goedkoop, een niet onbelangrijk voordeel. Wij zijn van mening dat waar bij Siemens de PLC range aan de onderkant ophoud met de 300-serie Vipa verder gaat met hun eigen 200 serie en hun 100 serie.

De meeste modellen hebben standaard snelle teller ingangen plus twee potmeters op de CPU welke in het programma gebruikt kunnen worden (de potmeters geven een waarde van 0..1023 in een EW). Verdere punten:

Programmeerbaar met Step®7 van Siemens
Programmeersoftware WinPLC7 lite van VIPA inbegrepen
Geïntegreerd werkgeheugen - Memory card niet nodig tijdens bedrijf!
Geïntegreerd ROM geheugen voor het ononderbroken opslaan van programma en data
Geïntegreerde batterij voor de back-up van het RAM geheugen
Ondersteund standaard MMC kaarten voor het opslaan van programma en data
MPI-interface
Toepassing in centrale en decentrale toepassingen mogelijk
Uitbreidbaar met 4 uitbreidingsmodules van de VIPA 100V en 200V serie

200 serie

De 200 serie lijkt qua bouw erg op de 100 serie maar is verder uitbreidbaar en uitermate geschikt voor decentrale I/O.

300 serie

Over de 300 serie hoeven we het niet te hebben: deze is vrijwel gelijk aan de 300 serie van Siemens en de modules zijn ook gewoon door elkaar te gebruiken.

SPEED7

De 300 speed7 van VIPA is wel een klasse apart: supersnel.

benodigdheden

Profibusconnector

programmeren op afstand

PLC direct/Koyo

low budget PLC's

Naast de reeds lang bekende Koyo PLC's heeft Koyo nu ook de Koyo Click. Deze volwaardige PLC is goedkoper dan alle „programmeerbare elektronische relais”, zoals de Logo.
Wij gebruiken deze PLC's vooral voor musea, in de tuinbouw, veilingen enz. Hoewel de PLC's prima zijn voor de industrie gebruiken we ze daar niet, deels omdat de acceptatie vanuit de industrie nog niet daar is.

Phoenix

ILC

inline I/O

Veel verkochte producten

2009-04-08T07:59:52+02:00

Veel verkochte producten

Voor informatie over de veel door ons verwerkte merken en types kunt u kijken bij de xj3 norm.
De producten daar kunnen we ook snel en voordelig leveren. Bel of mail ons voor een prijsopgave.

Servodoseersysteem

Voor alle soorten vulmachines hebben wij een servodoseersysteem. Deze worden veel ingezet bij schroefdoseurs ter vervanging van de rem-koppelings aansturing. Bij vervanging van dit soort systemen zijn de grootste voordelen:

geen slijtage meer
nauwkeuriger vullen

Eventueel is dit systeem uit te breiden met een complete aansturing voor papieropvoer ter vervanging van oudere remsystemen.

De volgende instellingen zijn o.m. te maken:

doseerhoeveelheid
acceleratie
deceleratie
tendensregeling
snelheid roerwerk
enz

Daarnaast zijn er nog vele extra's, zoals een proefdosering met correctie, om snel de juiste dosering te bereiken en een detektie dat de dosering dreigt vast te lopen. Dat laatste is handig om bij „smerende” producten doseerschroeven tegen breuk te beschermen.

Alle in te stellen parameters (via touchpanel) kunnen worden opgeslagen in recepten.

Veiligheidshekwerken

Wij maken uiterst robuuste hekwerken voor om uw machines. Geheel op maat en naar klantspecificatie. Ook de bevestigingen van eventuele doorloopbeveiligingen worden direct aan de palen gelast voor het poedercoaten.

Laserbenodigdheden

LC consultancy levert alle benodigdheden voor uw laser. Korte levertijden en goede service zijn standaard bij LC Consultancy. Ook voor problemen met uw laser kunt U terecht bij LC consultancy

adressen

Taxameters

Wij zijn dealer van Digitax taximeters. Dit zijn moderne taximeters met zeer veel mogelijkheden.

Verder hebben wij automatische camera bewakingssystemen speciaal voor taxi's. Deze hebben zich in de regio Rotterdam reeds op grote schaal bewezen. U kunt ons altijd bellen voor meer informatie of een demonstratie.

Prijzen F1 taximeter:
F1 taximeter:	€ 585,00
eerste fase keuring NMi:	€ 63,00
printer:	€ 225,00
inbouw:	€ 140,00
klein materiaal:	€ 10,00
datasysteem:	op aanvraag
daklicht:	op aanvraag

prijzen excl 19%BTW. Prijzen kunnen op ieder moment gewijzigd worden.

Program snippets

2010-03-11T12:14:20+02:00

Program snippets

Veel voorkomende stukjes programma met een lastig te onthouden syntax en handige stukjes programma die met anderen gedeeld worden.
U kunt zelf ook snippets toevoegen. Hiervoor moet U wel eerst geregistreerd zijn: klik op [inloggen] en de rest wijst zich vanzelf.

PLC's

μControllers

Computer en WEB

Voor erg veel snippets en goede tutorials is het beter hier een kijkje te nemen:
Sitemasters

en hier:
w3schools devker DEVx

syntax

De syntax van de wiki vindt je hier: Formatting Syntax

Om even de wiki syntax te oefenen gebruik je de PlayGround

Een complete beschrijving van de wiki: Formatting Syntax

Projecten

2009-09-29T20:09:26+02:00

Projecten

Hier een kleine greep uit onze projecten. Helaas komen wij er niet echt aan toe om deze pagina geregeld aan te passen. Zodoende mag dit niet als een kompleet overzicht beschouwt worden.

Voor wie op de hoogte wil blijven van wijzigingen: onderaan de pagina zit een „RSS - XML feed” button.

propellor snippets

2008-10-25T12:31:09+02:00

propellor snippets

GPS functies op een Propellor

Gevonden op internet.

{{ ***********************************
   *  GPS Smart Mode Object          *
   *  (C) 2007 Gary Noel Boone, PhD  *
   ***********************************

   This object provides access to the Smart Mode of the Parallax GPS module. It provides
   accessors for each Smart Mode function. For the time and date functions, GPS Smart Mode
   Object will automatically convert the UTC times returned by the GPS module into local
   times, accounting for both the time zone and Daylight Saving Time.
   

   Hardware Connections:

   The GPS Module can be connected to the Propeller Chip's P0 pin through a 1k resistor.
   For the demo board, the connections to the labelled header are as follows:
     
            ┌──────────────────┐          ┌──────────────────┐ 
            │                  │          │                  │ 
            │             VSS ┼──────────┤ GND              │ 
            │ Propeller        │          │        GPS       │ 
            │ Demo        VDD ┼──────────┤ VCC    Receiver  │
            │ Board            │    1k    │        Module    │ 
            │              P0 ┼────────┤ SIO              │  
            │                  │          │                  │ 
            │                  │         ┤ /RAW             │  
            └──────────────────┘          └──────────────────┘ 

                                                                            
   Software Use:

   The GPS Smart Mode Object can automatically localize the UTC times returned from the
   GPS module. To use it, you need to initialize two variables:
      - the desired time zone
      - whether or not to allow the use of Daylight Saving Time

   Example:
      OBJ
        GPS   : "GPS_SmartMode"

      PUB start | x, y
        GPS.start(GPS#PACIFIC_TIME, TRUE)                   ' Start the GPS object with localization

   See the included demo for complete usage samples.
    
}}


CON
        ' US time zones. Pass these into the start function to set the time zone.         
        EASTERN_TIME            = -5                    ' Eastern Standard Time
        CENTRAL_TIME            = -6                    ' Central Standard Time 
        MOUNTAIN_TIME           = -7                    ' Mountain Standard Time
        PACIFIC_TIME            = -8                    ' Pacific Standard Time
        ALASKAN_TIME            = -9                    ' Alaskan Standard Time
        HAWAIIAN_TIME           = -10                   ' Hawaii-Aleutian Standard Time

        ' GPS unit commands
        GPS_GetInfo             = 0                     ' (2 bytes) Hardware, Firmware
        GPS_GetValid            = 1                     ' (1 byte)  0 = Not Valid, 1 = Valid
        GPS_GetSats             = 2                     ' (1 byte)
        GPS_GetTime             = 3                     ' (3 bytes) UTC, Hours, Minutes, Seconds
        GPS_GetDate             = 4                     ' (3 bytes) UTC, Day, Month, Year
        GPS_GetLat              = 5                     ' (5 bytes) Degrees, Minutes, Fractional Minutes (Word), Direction (0 = N, 1 = S)
        GPS_GetLong             = 6                     ' (5 bytes) Degrees, Minutes, Fractional Minutes (Word), Direction (0 = E, 1 = W) 
        GPS_GetAlt              = 7                     ' (word) in tenths of meters                                             
        GPS_GetSpeed            = 8                     ' (word) in tenths of knots
        GPS_GetHead             = 9                     ' (word) in tenths of degrees

        
OBJ

  Ser   : "FullDuplexSerial"
  F     : "FloatMath"
  Cal   : "Calendar"

  
VAR

  long  rx, tx, baud                                    ' for the serial object
  long  _time_offset, _allow_DST

  
DAT

  HardwareStr byte      "x.x", 0
  FirmwareStr byte      "x.x", 0

  
PUB start(offset, allowDST)
'' Initialize the GPS Smart Mode Object
  _time_offset := offset
  _allow_DST := allowDST
  
  ' Start the serial object
  tx := rx := 7                                        ' Set tx & rx to P0
  baud := 4800                                         ' Set baud to 4800 bps
  Ser.start(rx, tx, %1100, baud)                       ' Start Full Duplex Serial Object


PUB GetInfo(hwStr, fwStr) | hw, fw  
''Retrieve the hardware and firmware versions, storing them as strings.
''This function must be called before the strings can be read using GetHardware and GetFirmware. 
  Ser.str(string("!GPS"))                              ' Send GPS Command Header
  Ser.tx(GPS_GetInfo)                                  ' Send GPS Command

  hw := Ser.rx                                         ' Receive first byte
  fw := Ser.rx                                         ' Receive second byte
  
  ' write and pass out the result strings
  LONG[hwStr] := WriteHardwareStr(hw)
  LONG[fwStr] := WriteFirmwareStr(fw) 


PRI WriteHardwareStr(hw)
  '' format the string and return it
  HardWareStr[0] := "0" + $0F & (hw >> 4)              ' Add high nibble to 0 character
  HardWareStr[1] := "."
  HardWareStr[2] := "0" + $0F & hw                     ' Add low nibble to 0 character
  HardWareStr[3] := 0
  return @HardWareStr

  
PRI WriteFirmwareStr(fw)
  '' format the string and return it
  FirmWareStr[0] := "0" + $0F & (fw >> 4)              ' Add high nibble to 0 character
  FirmWareStr[1] := "."
  FirmWareStr[2] := "0" + $0F & fw                     ' Add low nibble to 0 character
  FirmWareStr[3] := 0
  return @FirmWareStr


PUB GetHardware
'' Return the hardware version of the GPS module
'' GetInfo must be called first to set the string.
  return @HardwareStr


PUB GetFirmware
'' Return the firmware version of the GPS module
'' GetInfo must be called first to set the string.
  return @FirmwareStr


PUB GetValid
'' Is the GPS module returning valid data?
  return GetGPSByte(GPS_GetValid)


PUB GetSats
'' Return the number of satellites received by the GPS module
  return GetGPSByte(GPS_GetSats)


PUB GetDateAndTime(dateStr, timeStr) | yy, mon, day, hrs, mns, sec
{{ The GPS module returns the time in UTC time. GetTimeAndDate reads the time from
   the module, then adjusts it to local time.
   Returns the time as a string formatted hh:mm:ss.
   Returns the date as a string formatted mm/dd/yy.

   Note: The GPS module provides separate time and date functions. However, localizing
   the time may change the date. Because the time and date are therefore dependent
   on each other, the GPS Smart Mode Object provides only one function for date and time.

   This function returns formatted data and time strings by setting two string pointers
   passed into the function. Another way to  return the values would be to set two internal
   string variables, then provide accessors to them. However, those accessors could be called
   long after the last call to GetDateAndTime and be considerably stale. Therefore, the GPS
   Smart Mode Object retains no state and returns the strings only when GetDateAndTime is called.
   
}}

  Ser.str(string("!GPS"))                              ' Send GPS Command Header
  Ser.tx(GPS_GetTime)                                  ' Send GPS Command (GetTime)
  hrs := Ser.rx                                        ' Receive 1st byte
  mns := Ser.rx                                        ' Receive 2nd byte
  sec := Ser.rx                                        ' Receive 3rd byte

  Ser.str(string("!GPS"))                              ' Send GPS Command Header
  Ser.tx(GPS_GetDate)                                  ' Send GPS Command (GetDate)
  day := Ser.rx                                        ' Receive 1st byte
  mon := Ser.rx                                        ' Receive 2nd byte
  yy := Ser.rx                                         ' Receive 3rd byte, 2 digit year

  Cal.ConvertUTCtoLocaltime( _time_offset, 2000 + yy, mon, day, hrs, mns, sec, _allow_DST, dateStr, timeStr)  


PUB GetLatitude
'' Return the latitude from the GPS modules as a single floating point value
  return GetXitude(GPS_GetLat)


PUB GetLongitude
'' Return the longitude from the GPS modules as a single floating point value
  return GetXitude(GPS_GetLong)

    
PRI GetXitude(cmd) | deg, mn, minFrac, negate
'' Get the lat/long-itude from the GPS unit
'' Return as a single floating point value
  Ser.str(string("!GPS"))                              ' Send GPS Command Header
  Ser.tx(cmd)                                          ' Send GPS Command (GetLat)
  deg := Ser.rx                                        ' Receive 1st byte
  mn := Ser.rx                                         ' Receive 2nd byte
  minFrac := ReadWord                                  ' Receive 3rd, 4th bytes as word
  negate := Ser.rx==1                                  ' Receive 5th byte 
  return GetGPSFloat(deg, mn, minFrac, negate)

  
PUB GetGPSFloat(deg, mn, minFrac, negate) : single | minsF, ang
'' convert the given degrees, mins, and fractional minutes to a single floating point value
'' The negate flag converts from W to E or from N to S
  minsF := F.FAdd(F.FFloat(mn), F.FDiv(F.FFloat(minFrac), 10000.0)) 
  ang := F.FAdd(F.FFloat(deg), F.FDiv(minsF, 60.0))
  if negate
    ang := F.FNeg(ang)
  return ang


PUB GetGPSFixed(deg, mn, minFrac, negate) : integer | minsFx, ang
'' convert the given degrees, mins, and fractional minutes to a single fixed point value
'' The negate flag converts from W to E or from N to S
  minsFx := mn*10000 + minFrac
  ang := deg*10000 + minsFx / 60
  if negate
    -ang 
  return ang 


PUB GetAltitude
'' Altitude is returned from the GPS module in meters; convert to feet
'' 1 meter = 3.2808399 feet
  return ReadTenthsAndScale(GPS_GetAlt, 3.2808399) 


PUB GetSpeed
'' Speed is returned from the GPS module in knots; convert to MPH
'' 1 knot = 1.1507771555 MPH  
  return ReadTenthsAndScale(GPS_GetSpeed, 1.1507771555) 


PUB GetHeading
'' Read the heading from the GPS module in degrees. No conversion needed.
  return ReadTenthsAndScale(GPS_GetHead, -1.0) 


PRI ReadTenthsAndScale(cmd, cfact) | val
'' read the given cmd value as a word in tenths. Convert to a floating point value.
'' Then apply the conversion factor, if greater than zero, and return.
  val := F.FDiv(F.FFloat(GetGPSWord(cmd)), 10.0)
  if cfact > 0.0
    val := F.FMul(val, cfact)
  return val
  



PUB GetGPSByte(cmd)  
'' Send a command to the GPS module and read a byte back
  Ser.str(string("!GPS"))                              ' Send GPS Command Header
  Ser.tx(cmd)                                          ' Send GPS Command
  return Ser.rx                                        ' Receive byte


PUB GetGPSWord(cmd)  
'' Send a command to the GPS module and read a word back
  Ser.str(string("!GPS"))                              ' Send GPS Command Header
  Ser.tx(cmd)                                          ' Send GPS Command
  return ReadWord                                      ' Receive word


PRI ReadWord : aword
'' Read a word from the GPS module. Put the first value read into the high byte of the word
  aword.byte[1]  := Ser.rx                            'high byte transmitted first
  aword.byte[0]  := Ser.rx                            'then low byte into rightmost byte

Level 2 Headline

Omschrijving

programmacode

Recoiler

2008-10-29T08:32:59+02:00

Recoiler

Een volledig in eigen huis ontwikkelde machine om stalen banden te wikkelen. Op de wikkelas kunnen, afhankelijk van de staalbandbreedte, 8 tot 20 banden tegelijk gewikkeld worden. De gewenste lengte is instelbaar op het touchpanel.

Voor de veiligheid speelt het wikkelen zich af achter een hekwerk en deuren met polycarbonaatramen waarin ook de bedieningskast geintegreerd is. Voor de duurzaamheid is de gehele machine gepoedercoated en zijn alle wikkelrollen hardverchroomd. Het bedieningspaneel is lasergegraveerd RVS.

Constructie

Het machineframe is opgebouwd uit dikwandige vierkante profielen. De beplating is dubbel omgezet zodat de bevestigingsschoeven verzonken konden worden. Om de voorkomen dat tijden (de-)montage de schroeven achter het plaatwerk vallen zijn tussen de grote gaten voorin en de kleinere in het omgezette deel busjes gelast. Alle delen zijn ofwel gepoedercoat ofwel hardverchroomt (rollen)

De besturing

De besturing is opgebouwd rond een 100 serie van VIPA, welke in standaard step7 geprogrammeerd is. Het touchpanel is een ESA VT155 waarop alle instellingen te maken, voor storingsmeldingen en het vastleggen van recepten voor vaker terugkomende producten.
Voor de aandrijving zit een Control Techniques Commander SK drive opgenomen.

Materialenlijst

omschrijving	merk	type
constructie	Creative Engineering
engineering	Creative Engineering
co-engineering en plaatwerk	LC consultancy
besturing	Dreijer
kast	rittal
schakelmateriaal	Telemecanique
automaten	ABB
hoofdschakelaar	Kraus&Naimer
voeding	Meanwell
PLC	VIPA	CPU115
MMI	ESA	VT155
frequentieregelaar	Control Techniques	Commanders SK

samenwerking

2009-12-20T14:44:35+02:00

samenwerking

Behalve de samenwerking binnen xJ3 werken wij met nog meer bedrijven samen om er voor te zorgen dat we een zo kompleet mogelijk pakket aan diensten kunnen verlenen.

Daarnaast werken wij nog nauw samen met de diverse fabrikanten/importeurs.

Struik packaging service

De naam Struik is in de wereld van inpakkers een oude bekende. Stuik levert zowel nieuwe als gebruikte machines. Ook machinerevisie is een van hun activiteiten.

AVA Techniek

De samenwerking met AVA techniek is historisch gezien vanzelfsprekend: Gerrit Jan Dreijer heeft hier 15 jaar lang ervaring opgedaan als project engineer.
Bij vakantie en/of ziekte van Gerrit Jan kan AVA techniek de zaken waarnemen. Ook bij extreme drukte kunnen wij een beroep op AVA techniek doen.

Behalve Industriele automatisering houdt AVA techniek zich ook bezig met computers en computernetwerken.

EJE Electronics

EJE Electronics is in staat razendsnel elektronica op maat te ontwikkelen. Ook voor de ontwikkeling van embedded software voor de meest gebruikelijke microcontrollers.

schakelmateriaal

2008-11-06T19:40:01+02:00

schakelmateriaal

telemecanique

motorstarters

bediening

ABB

automaten

kraus&naimer

nokkenschakelaars

Releco

hulprelais

IC electronic

solidstaterelais

softstarters

Phoenix

motorstarters

Phoenix heeft een serie solidstate omkeermotorstarters van slechts 22mm breed met een geintegreerde noodstopfunctie.

Sealwiel voor plotter

2008-10-28T14:14:21+02:00

Sealwiel voor plotter

Voor een fabrikant van verpakkingsmaterialen hebben wij een sealwiel gemaakt dat in een bestaande snijplotter gebruikt kan worden. In de beperkte ruimte van 40mm rond moesten we dus ook de verwarming, sensor en isolatie onderbrengen.

Opbouw

De houder is gemaakt van aluminium met een isolerend deel van teflon. Het wiel is gemaakt van brons en gelagerd op een RVS as. Bovenin de houder zit een Mercotac™ collector die het vermogen en de sensorsignalen draaiend overgeeft.
De gebruikte sensor is een Pt100 en voor de verwarming zit er aan iedere kant van het wiel een verwarmingselement van 200W.

Besturing

In het bijbehorende kastje zit voor de regeling een autotuning PID regelaar van JUMO™ en een Omron™ solid state relais, geschikt voor maximaal 20A. De regelaar blijkt de ingestelde temperatuur te kunnen regelen tot ±0,1ºC.

Sensoren

2009-09-12T15:29:06+02:00

Sensoren

IFM electronic

inductieve sensoren
capacitiev sensoren
encoders

Leuze

fotocellen
lichtschermen
scannende sensoren
barcode scanners
tastmerksensoren
metende sensoren
ultrasoon sensoren

Jumo

temperatuursensoren
procesregelaars

Endress+Hauser

niveausensoren
druksensoren
flowmeters

HBM

loadcellen
electronische micrometers
weegapparatuur
toebehoren

Deutschmann

electronische nokkenwerken

Service

2009-11-12T21:01:22+02:00

Service

24/7 service

Servo's

2008-11-06T19:28:41+02:00

Servo's

Control techniques

Epsilon

Unidrive SP

Digitax

sidebar

2010-09-03T17:49:26+02:00

elektro tabellen
werktuigbouw tabellen
kabels
eenheden, periodiek systeem

downloads

_©backsite

Overzicht voorradige Siemens C1 blokken

2010-08-01T19:43:03+02:00

Overzicht voorradige Siemens C1 blokken

Voorraad Siemens C1 logische modules

De blokken in de lijst zijn meest nog niet getest. Het is gebruikelijk om deze pas voor verzending te testen. Een deel van de blokken komt uit een magazijn en is ongebruikt, een deel komt uit werkende machines.

De blokken kunnen niet als partij opgekocht worden.

type (6EC1-..)	functie	aantal	prijs
000-3A	15x 2*UND	4	EUR. 75,00
001-3A	11x 3*UND	6	EUR. 75,00
010-3A	15x 2*ODER	4	EUR. 200,00
011-3A	11x 3*ODER	4	EUR. 75,00
040-3A	15x 2*NOR	6	EUR. 75,00
110-3A	3x ZEIT 10ms..120s	5	EUR. 95,00
111-3A	onb.	3	EUR. 125,00
140-3A	onb.	3	EUR. 95,00
150-3B	1x TAKT 0.1..100Hz	2	EUR. 150,00
220-3A	6x RS SPEICHER	5	EUR. 50,00
310-3A	1x VORW.ZAHLER 2DEK	6	EUR. 250,00
600-3A	onb.	5	EUR. 350,00
607-3A	onb.	2	EUR. 150,00
620-3A	onb.	4	EUR. 100,00
651-3A	onb.	3	EUR. 125,00
652-3A	8x AUS 0.4A	4	EUR. 75,00
653-3A	onb.	4	EUR. 125,00
654-3A	2x AUS 1,5A	2	EUR. 150,00
655-3A	onb.	5	EUR. 150,00
660-3A	8x AUS REL	4	EUR. 75,00
661-3A	onb.	2	EUR. 75,00
700-3A	onb.	1	EUR. 100,00
802-3A	onb.	1	EUR. 250,00

Siemens S5 snippets

2010-07-17T14:55:18+02:00

Siemens S5 snippets

Gemiddelde uit 16 meetwaardes

Een kort programma om meetwaardes te middelen. Omdat S5 niet bekent staat om z'n geweldige floating point eigenschappen is dit een mooie oplossing van Peter. Uiteraard ook bruikbaar in S7. M 0.4 is een flank van bv een timer.

           U      M   0.4
           SPBN   =NTEL

           L      MW  10            > JOUW GEMETEN WAARDE VAN DE SENSOR
           L      MW  40
           +I
           T      MW  40

NTEL:      U      M   0.4
           ZV     Z   1

           L      z   1
           L      16
           >=I
           SPBN   =NGEM
           SET
           R      Z   1
           L      MW  40
           SRW    4
           T      MW  50    //>> GEMIDDELDE WAARDE OVER 16 METINGEN
           L      0
           T      MW  40
NGEM:      NOP 0

Flankdetectie

Voor een student die op zoek was naar een flankdetektie.


  positieve flank:               
U   E  1.0      de ingang waar we een opgaande flank van gaan detekteren
UN  M 20.1      hulpbit
=   M 20.0      de flankdtektie
U   E  1.0
=   M 20.1 

  negatieve flank:               
UN  E  1.0      de ingang waar we een neergaande flank van gaan detekteren
UN  M 20.1      hulpbit
=   M 20.0      de flankdtektie
UN  E  1.0
=   M 20.1

Tellen in een dubbelwoord

Tellen in een dubbelwoord in S5, door Joop.

„In dit voorbeeld word DW0 als teller aantal gebruikt, DW 3 is het LW van het teller DWord DD2 . Als voor de telling DW3 negtief is (dus > 32767) dan wordt M255.0 hooggemaakt. Als deze merker niet hoog is is de telling na het optellen klaar. Is deze hoog dan wordt er weer een vergelijking gemaakt is DW3 nog negatief is de telling klaar, als DW3 niet meer negatief an wordt DW2 met 1 verhoogt. M255.0 is een smeermerker.”

      AUF DB3                     //DB van teller
      L     DW    3                //LW teller
      L     0
      <F   
      =    M255.0                 //LW is negatief

      L     DW    0                //teller aantal
      L     DW    3                //LW teller
      +F   
      T     DW    3                //LW teller
      UN    M255.0
      SPB   OK                     //LW was positief ->klaar
      L     DW    3
      L     0
      <F   
      SPB   OK                     //LW is nog negatief ->klaar
      L     DW    2                // HW teller
      L     1
      +F                             //HW met 1 verhogen
      T

S7 snippets

2010-06-06T18:07:56+02:00

S7 snippets

een simpele toggle

      U     E    0.0      
      FP    M    1.0     
      SPBN  m001          
      UN    A    4.0       
      =     A    4.0
m001: NOP 0

een elegante toggle

Met dank aan Joop B uit Weert.

      X(   
      U     M     20.0            //of b.v een ingang
      FP    M     20.1            // flank positief merker
      )     
      X     M     20.2            // troggle merker of b.v. een uitgang.
      =     M     20.2

100 serie VIPA potmeter als timer

Een 100 serie CPU van VIPA heeft twee potmeters in het front. Heel handig om te gebruiken in je programma om een timer mee in te stellen. De tijdbasisbitjes bepalen op de counts voor bv 0.01s, 0.1s, 1s of 1min is. Even proberen doet wonderen.

FUNCTION FC 1 : VOID
TITLE =
VERSION : 0.1

BEGIN
NETWORK
TITLE =
//S5T maken voor 0-1s
//potmeter 0 = PEW 128
//potmeter 1 = PEW 130
//MW 100:
//xxTT.1111.2222.3333 (S5 timer formaat)
//x = nvb
//TT = tijdbasis
//1111 = bcd 100-tal
//2222 = bcd 10-tal
//3333 = bcd 1-tal
      L     PEW  128; //potmeter laden
      T     MW   100; //en opslaan in mw100
      L     999; 
      <I    ; //controleren of niet te groot
      SPB   m001; 
      T     MW   100; // anders 999 maken
m001: L     MW   100; 
      ITB   ; //bcd van maken
      SRW   4; //4 schuiven (=delen door 10)
      T     MW   100; //  anders timer tot 10s
      R     M    100.4; //tijdbasisbitje 0
      R     M    100.5; //tijdbasisbitje 1

END_FUNCTION

CPU 313C analoog

Uit een oud programma gemaakt om te testen. Later niet meer gecontroleerd.

opmerking: de gebruikte methode om te controleren of het een negatieve waarde is klopt wel. Het naderhand botweg terugzetten van dat bit is natuurlijk fout!

FUNCTION FC 103 : VOID
TITLE =
//Funtie FC103 haalt alle analoge inputs binnen en schrijft de waarden weg
//op de woorden beginnnend met het startadr_bit.
//bv:
//startadr_bit is M100.0
//dan staat val ch0 in mw100
//              ch1 in mw102
//              ch2 in mw104
//              ch3 in mw106
//              ch4 in mw108 (PT100)
VERSION : 0.1


VAR_OUTPUT
  STARTADR_bit : BOOL ;	
END_VAR
VAR_TEMP
  WOORD : WORD ;	
  BIT : BOOL ;	
  ADR_PTR : DWORD ;	
END_VAR
BEGIN
NETWORK
TITLE =
//Ch0..Ch3 kunnen gewoon direct uitgelezen worden.
//bereik loopt dan van pos/neg 0-27648 (0h-6c00h)
//pointer in adresregister 1 schrijven
      L     P##STARTADR_bit; 
      LAR1  ; 
NETWORK
TITLE =
//ch 0
//
//teken bepalen 
//kladbit is '1' als waarde 
//negatief is.
      L     PEW  752; 
      UW    W#16#8000; 
      T     #WOORD; 
// 
      L     #WOORD; 
      L     0; 
      <>I   ; 
      =     #BIT; 
//------------------------------ 
// waarde bepalen en wegschrijven
      L     PEW  752; 
      SLW   1; 
      SRW   5; 
      T     W [AR1,P#0.0]; 
// sign terugzetten
      U     #BIT; 
      =      [AR1,P#0.7]; 
NETWORK
TITLE =
//ch 1
//teken bepalen 
//kladbit is '1' als waarde 
//negatief is.
      L     PEW  754; 
      UW    W#16#8000; 
      T     #WOORD; 
// 
      L     #WOORD; 
      L     0; 
      <>I   ; 
      =     #BIT; 
//------------------------------ 
// waarde bepalen en wegschrijven
      L     PEW  754; 
      SLW   1; 
      SRW   5; 
      T     W [AR1,P#2.0]; 
// sign terugzetten
      U     #BIT; 
      =      [AR1,P#2.7]; 
NETWORK
TITLE =
//ch 2
//teken bepalen 
//kladbit is '1' als waarde 
//negatief is.
      L     PEW  756; 
      UW    W#16#8000; 
      T     #WOORD; 
// 
      L     #WOORD; 
      L     0; 
      <>I   ; 
      =     #BIT; 
//------------------------------ 
// waarde bepalen en wegschrijven
      L     PEW  756; 
      SLW   1; 
      SRW   5; 
      T     W [AR1,P#4.0]; 
// sign terugzetten
      U     #BIT; 
      =      [AR1,P#4.7]; 
NETWORK
TITLE =
//ch 3
//teken bepalen 
//kladbit is '1' als waarde 
//negatief is.
      L     PEW  758; 
      UW    W#16#8000; 
      T     #WOORD; 
// 
      L     #WOORD; 
      L     0; 
      <>I   ; 
      =     #BIT; 
//------------------------------ 
// waarde bepalen en wegschrijven
      L     PEW  758; 
      SLW   1; 
      SRW   5; 
      T     W [AR1,P#6.0]; 
// sign terugzetten
      U     #BIT; 
      =      [AR1,P#6.7]; 
NETWORK
TITLE =
//ch4
//de weggeschreven waarde is te temperatuur in de 
//eenheid zoals met step7 geconfigureerd in units
//van 0.1 graad of 0.1 Kelvin
//------------------------------ 
// waarde wegschrijven
      L     PEW  760; 
      T     W [AR1,P#8.0]; 
END_FUNCTION

Gemiddelde uit 16 meetwaardes

Een kort programma om meetwaardes te middelen, eigenlijk bedacht voor S5. Omdat S5 niet bekent staat om z'n geweldige floating point eigenschappen is dit een mooie oplossing van Peter. Uiteraard ook bruikbaar in S7. M 0.4 is een flank van bv een timer.

           U      M   0.4
           SPBN   NTEL

           L      MW  10            //> JOUW GEMETEN WAARDE VAN DE SENSOR
           L      MW  40
           +I
           T      MW  40

NTEL:      U      M   0.4
           ZV     Z   1

           L      z   1
           L      16
           >=I
           SPBN NGEM
           SET
           R      Z   1
           L      MW  40
           SRW    4
           T      MW  50    //>> GEMIDDELDE WAARDE OVER 16 METINGEN
           L      0
           T      MW  40
NGEM:      NOP 0

Machinesnelheid met tandjesteller

Op een machine een slagen/minuutteller dmv een sensor op een tandwiel. Niet zo fraai, werkt wel en iedereen snapt het. Ook belangrijk.

NETWORK
TITLE =snelheid

//os'en tellen
      U     E      1.7;  telingang  
      UN    M     10.5;    hulpbit 
      =     M     10.4;  one shot opgaande flank
      U     E      1.7;  telingang 
      =     M     10.5;    hulpbit  
//
      UN    E      1.7;  telingang
      UN    M     10.7;    hulpbit  
      =     M     10.6;  one shot neergaande flank 
      UN    E      1.7;  telingang 
      =     M     10.7;    hulpbit  
//
//door gebruik te maken van op- en neergaande flank 
//verhogen we het "oplossend" vermogen van de teller
//
      UN    M     10.4;  one shot opgaande flank 
      UN    M     10.6;  one shot neergaande flank 
      SPB   m004; 
      L     DB100.DBW   12; telregister
      +     1; 
      T     DB100.DBW   12; telregister 
//
//uitrekenen snelheid
//afhankelijk van aantal telnokken en tijdbasis (m10.0)
//
m004: UN    M     10.0;  one shot (1x per seconde) 
      SPB   m005; 
      L     DB100.DBW   12; telregister 
      L     2; 
      *D    ; 
      T     DB100.DBW   10; snelheid 
// 
//telregister terug op nul zetten
      L     0; 
      T     DB100.DBW   12; 
//
//einde sprong en laadistructie voor debugging
m005: L     DB100.DBW   10;

analoog in op 313C

FUNCTION FC 101 : VOID
TITLE =
//Bouwsteen is alleen getest op CPU 313 C
//Ch0..Ch3 loopt van 27648 tot -27648 (6C00h..9400h)normaal.
//Ch4 hoeft niet bewerkt te worden: hierin staat de waarde in
//graden C/F of Kelvin in units van 0,1 graad/Kelvin.
AUTHOR : DREIJER
VERSION : 0.1


VAR_INPUT
  IN_ADR : WORD ;	
  MAXVAL : INT ;	
  ZEROVAL : INT ;	
END_VAR
VAR_OUTPUT
  ANA_OUT : WORD ;	
  ERROR : BOOL ;	
END_VAR
VAR_TEMP
  FACTOR : WORD ;	
  SHIFT : WORD ;	
  RANGE : WORD ;	
END_VAR
BEGIN
NETWORK
TITLE =unipolair

//aantal delen uitrekenen
      L     #MAXVAL; 
      L     #ZEROVAL; 
      -I    ; 
      T     #RANGE; 
// 
//verhouding input/output
      L     27648; 
      L     #RANGE; 
      /I    ; 
      T     #FACTOR; 

      L     #ZEROVAL; 
      T     #SHIFT; 
// 
//input in pointer zetten
//      L     #ANA_ADR
//      T     #INREG
// 
//output berekenen
//      L     PEW [#INREG]
      L     #IN_ADR; 
      L     #FACTOR; 
      *I    ; 
      L     #SHIFT; 
      -I    ; 
      T     #ANA_OUT; 

END_FUNCTION

Datum en Tijd

omschrijving Datum en tijd gebruiken in een 300.
niet gecontroleerd!

FUNCTION FC 6 : VOID
TITLE =
VERSION : 0.1
 
 
VAR_TEMP
Datum_Tijd : DATE_AND_TIME ;
RV : INT ;
Datum_Tijd_Nieuw : DATE_AND_TIME ;
Fout_SFC : INT ;
END_VAR
BEGIN
 
 
NETWORK
TITLE = Lezen klok
 
CALL SFC 1 (
RET_VAL := #RV,
CDT := #Datum_Tijd);
NOP 0;
 
 
NETWORK
TITLE = tijd naar integer
 
L LB 3;
BTI ;
L 100;
*I ;
L LB 4;
BTI ;
+I ;
T MW 28;
 
 
NETWORK
TITLE = Dag bepalen
 
L LW 6;
L W#16#F;
UW ;
T MB 27;
 
 
NETWORK
TITLE =
 
U( ;
L MW 28;
L 300;
>=I ;
) ;
U( ;
L MW 28;
L 500;
<I ;
) ;
= M 50.0;
 
 
NETWORK
TITLE =
 
U( ;
L MW 28;
L 715;
>=I ;
) ;
U( ;
L MW 28;
L 1230;
<I ;
) ;
= M 50.1;
 
 
NETWORK
TITLE =
 
U( ;
L MW 28;
L 1346;
>=I ;
) ;
U( ;
L MW 28;
L 1711;
<I ;
) ;
= M 50.2;
 
 
NETWORK
TITLE =
 
U( ;
L MW 28;
L 2200;
>=I ;
) ;
U( ;
L MW 28;
L 2300;
<I ;
) ;
= M 50.3;
END_FUNCTION

CT Unidrive op profibus

Unidrive settings staan in FC 80

Saven van de configuratie in de unidrive, erg belangrijk:
1. Save Menu 1 through Menu 19 by setting #x.00 = 1000 and press the red ”reset” button on the Unidrive.
2. Save the Menu 20 values by setting #17.19 = 1 (resets itself back to zero).
3. Activate this configuration by setting #x.00 = 1070 and press the red ”reset” button on the Unidrive.
Hier word vooral punt 2 nogal eens vergeten!

DATA_BLOCK DB 80
TITLE =
VERSION : 0.1


  STRUCT 	
   Schrijf_naar_ct_1620 : DWORD ;	
   Schrijf_naar_ct_1621 : DWORD ;	
   Schrijf_naar_ct_1622 : DWORD ;	
   Schrijf_naar_ct_1623 : DWORD ;	
   Schrijf_naar_ct_1624 : DWORD ;	
   Schrijf_naar_ct_1625 : DWORD ;	
   Schrijf_naar_ct_1626 : DWORD ;	
   Schrijf_naar_ct_1627 : DWORD ;	
   Lees_vanaf_ct_1620 : DWORD ;	
   Lees_vanaf_ct_1621 : DWORD ;	
   Lees_vanaf_ct_1622 : DWORD ;	
   Lees_vanaf_ct_1623 : DWORD ;	
   Lees_vanaf_ct_1624 : DWORD ;	
   Lees_vanaf_ct_1625 : DWORD ;	
   Lees_vanaf_ct_1626 : DWORD ;	
   Lees_vanaf_ct_1627 : DWORD ;	
  END_STRUCT ;	
BEGIN
   Schrijf_naar_ct_1620 := DW#16#0; 
   Schrijf_naar_ct_1621 := DW#16#0; 
   Schrijf_naar_ct_1622 := DW#16#0; 
   Schrijf_naar_ct_1623 := DW#16#0; 
   Schrijf_naar_ct_1624 := DW#16#0; 
   Schrijf_naar_ct_1625 := DW#16#0; 
   Schrijf_naar_ct_1626 := DW#16#0; 
   Schrijf_naar_ct_1627 := DW#16#0; 
   Lees_vanaf_ct_1620 := DW#16#0; 
   Lees_vanaf_ct_1621 := DW#16#0; 
   Lees_vanaf_ct_1622 := DW#16#0; 
   Lees_vanaf_ct_1623 := DW#16#0; 
   Lees_vanaf_ct_1624 := DW#16#0; 
   Lees_vanaf_ct_1625 := DW#16#0; 
   Lees_vanaf_ct_1626 := DW#16#0; 
   Lees_vanaf_ct_1627 := DW#16#0; 
END_DATA_BLOCK

FUNCTION FC 80 : VOID
TITLE =
//Setting CT memorygroup 16 SP Unidrive
//
//01 = 403
//02 = 3.00
//03 = 11 (profibusadres)
//04 = 5
//05 = 16
//06 = 157
//07 = 200
//08 = OFF
//09 = ON
//10 t/m 19 = leesdata
//20 t/m 29 = schrijfdata
//30 = OFF
//31 = Off
//32 = OFF
//33 = OFF
//34 = OFF
//35 = 9158049 (versienummer)
//36 = OFF
//37 = OFF
//38 = 0
//39 = 16
//40 = 16
//41 = 0
//42 = 0
//43 = 0
//44 = 0
//45 = 0
//46 = 0
//47 = 0
//48 = 0
//49 = 0
//50 = 0
//51 = 0
//
//Na wijziging eerst 16.00 op 1000 zetten en daarna de rode knop bedienen.
//Na wijziging eerst 16.00 op 1070 zetten en daarna de rode knop bedienen.
//
//CT data via DB 80
VERSION : 0.1

BEGIN
NETWORK
TITLE =
//DB 80 koppelen aan CT-data

//SCHRIJVEN NAAR CT

//Ct adres 16.20
      L     DB80.DBD    0; 
      T     AD    80; 
//Ct adres 16.21
      L     DB80.DBD    4; 
      T     AD    84; 
//Ct adres 16.22
      L     DB80.DBD    8; 
      T     AD    88; 
//Ct adres 16.23
      L     DB80.DBD   12; 
      T     AD    92; 
//Ct adres 16.24
      L     DB80.DBD   16; 
      T     AD    96; 
//Ct adres 16.25
      L     DB80.DBD   20; 
      T     AD   100; 
//Ct adres 16.26
      L     DB80.DBD   24; 
      T     AD   104; 
//Ct adres 16.27
      L     DB80.DBD   28; 
      T     AD   108; 


//LEZEN VANAF CT

//Ct adres 16.10
      L     ED    80; 
      T     DB80.DBD   32; 
//Ct adres 16.11
      L     ED    84; 
      T     DB80.DBD   36; 
//Ct adres 16.12
      L     ED    88; 
      T     DB80.DBD   40; 
//Ct adres 16.13
      L     ED    92; 
      T     DB80.DBD   44; 
//Ct adres 16.14
      L     ED    96; 
      T     DB80.DBD   48; 
//Ct adres 16.15
      L     ED   100; 
      T     DB80.DBD   52; 
//Ct adres 16.16
      L     ED   104; 
      T     DB80.DBD   56; 
//Ct adres 16.17
      L     ED   108; 
      T     DB80.DBD   60; 


END_FUNCTION

bubble sort in een DB

omschrijving

FUNCTION FC 10    : VOID
TITLE =
VERSION           : 0.1


VAR_INPUT
  Sorteer_DB     : BLOCK_DB ;	
  DB_lengte      : WORD ;	
END_VAR
VAR_TEMP
  kladvariabele  : WORD ;	
  teller         : WORD ;	
  klaar          : BOOL ;
END_VAR
BEGIN
NETWORK
TITLE =

      AUF   #Sorteer_DB; 
M002: LAR1  P#DBX 0.0; 
      SET   ; 
      S     #klaar; 
      L     #DB_lengte; 
      L     1; 
      -I    ; 
Lus:  T     #teller;        
      L     W [AR1,P#0.0];  
      L     W [AR1,P#2.0]; 
      <=I   ; 
      SPB    M003; 
      L     W [AR1,P#0.0]; 
      T     #kladvariabele; 
      L     W [AR1,P#2.0]; 
      T     W [AR1,P#0.0]; 
      L     #kladvariabele; 
      T     W [AR1,P#2.0]; 
      SET   ; 
      R     #klaar; 
M003: TAR1  ; 
      L     16; 
      +D    ; 
      LAR1  ; 
      L     #teller; 
      LOOP  Lus; 
      UN    #klaar; 
      SPB    M002; 
      BE    ; 


END_FUNCTION

eenvoudige PID

Een eenvoudige PID regeling. Getetst op een 500W sealbek van een verpakkingsmachine. De bouwsteen is nog niet helemaal voltooid (zie onderin) Bij de variabelen declaraties staan tussen de []haakjes voorbeelden van geldige invoeren, tussen {}haakjes de gebruyikte eenheden.

FUNCTION_BLOCK FB 2
TITLE =
VERSION : 0.1

VAR_INPUT
  procesval  : INT ;	//proces value [MW202]{1/10deg}
  setpoint   : INT ;	//setpoint [MW200][1200]{1/10deg}
  GAIN       : REAL ;   //gain [1.5]
  RESETRATE  : REAL ;	//resetrate [0.1]
  DERIVATIVE : REAL ;	//derivative [40.0]
  direct     : BOOL ;	//0 for heating [FALSE]
  auto       : BOOL ;   //auto [M100.0][TRUE]
  tim        : TIMER ;	//cycle timer [T100]
  cycl       : S5TIME ;	
END_VAR

VAR_OUTPUT
  Output     : INT ;	//output for PWM [MW20]{1/10%}
  Err_D      : INT ;    //for adjusting [MW22]
END_VAR

VAR
  PVD        : REAL ;	
  PVLAST     : REAL ;	
  ERR        : REAL ;	
  FEEDBACK   : REAL ;	
  temp_cycl  : BOOL ;	
END_VAR

VAR_TEMP
  OUTTEMP    : REAL ;	
  PV         : REAL ;	
  SP         : REAL ;	
  TEMP0      : BOOL ;	
  out_conv   : DINT ;	
END_VAR

BEGIN
NETWORK
TITLE =

// timer voor de cyclustijd
      UN    #temp_cycl; 
      L     #cycl; 
      SE    #tim; 
      U     #tim; 
      =     #temp_cycl; 
      UN    #temp_cycl; 
      SPB   eind; 

NETWORK
TITLE =

      L     #procesval; 
      ITD   ; 
      DTR   ; 
      T     #PV; 

      L     #setpoint; 
      ITD   ; 
      DTR   ; 
      T     #SP; 

NETWORK
TITLE =

//1.  IF AUTO = true THEN
      U     #auto; 
      SPBN  auto; 

//2.     PV_D = PV +(PV - PV_last) * Derivative
      L     #PV; 
      L     #PVLAST; 
      -R    ; 
      L     #DERIVATIVE; 
      *R    ; 
      L     #PV; 
      +R    ; 
      T     #PVD; 

//3.     PV_last = PV
      L     #PV; 
      T     #PVLAST; 

//4.     ERR = SP - PV_D         
      L     #SP; 
      L     #PVD; 
      -R    ; 
      T     #ERR; 

//5.     IF Direct = true THEN Err =0  Err //Change sign if direct.
      U     #direct; 
      SPBN  dir; 
      L     0; 
      L     #ERR; 
      -R    ; 
      T     #ERR; 

//6.     ENDIF
dir:  NOP   0; 
//ERR naar buiten brengen voor afregelen
      L     #ERR; 
      RND   ; 
      T     #Err_D; 

//7.     out_temp = Err * Gain + Feedb //Calc gain time the error and add 
//                                        the feedback.
      L     #ERR; 
      L     #GAIN; 
      *R    ; 
      L     #FEEDBACK; 
      +R    ; 
      T     #OUTTEMP; 

//8.     IF Out_Temp > 100 THEN Out_Temp =100  //Limit output to between
      L     #OUTTEMP; 
      L     1.000000e+003; 
      >R    ; 
      SPBN  gr; 
      T     #OUTTEMP; 
gr:   NOP   0; 

//9.      IF Out_Temp < 0 THEN Out_Temp =0     //  0 and 100 percent.
      L     #OUTTEMP; 
      L     0; 
      <R    ; 
      SPBN  kl; 
      T     #OUTTEMP; 
kl:   NOP   0; 

//10.     Out = Out_Temp                       //    The final output 
      L     #OUTTEMP; 
      RND   ; 

      T     #out_conv; 
      T     #Output; 

//11.     Feedback = Feedback +(Out - Feedback) * ResetRate
      L     #OUTTEMP; 
      L     #FEEDBACK; 
      -R    ; 
      L     #RESETRATE; 
      *R    ; 
      L     #FEEDBACK; 
      +R    ; 
      T     #FEEDBACK; 

//12.   ELSE
auto: NOP   0; 

//------------------------------moet nog
//13.     PV_last = PV  //While loop in manual, stay ready for bumpless switch 
//                          to Auto.
//14.     Feedback = Out
//15.  ENDIF

eind: NOP   0; 

END_FUNCTION_BLOCK

PWM voor PID

Een grove PWM, niet volmaakt, maar werkend getest op bovenstaande PID

FUNCTION_BLOCK FB 3
TITLE =
VERSION : 0.1

VAR_INPUT
  input : INT ;	//PWM value[MW20][450]{1/10%}
  t_pulse : TIMER ;	//pulse timer [T20]
  t_pause : TIMER ;	//pause timer [T21]
END_VAR

VAR_OUTPUT
  output : BOOL ;	//output [M24.0]
END_VAR

VAR
  pulse : S5TIME ;	
  pause : S5TIME ;	
END_VAR

BEGIN
NETWORK
TITLE =

      L     #input; 
      L     10; 
      /I    ; 
      ITB   ; 
      T     #pulse; 
      L     1000; 
      L     #input; 
      -I    ; 
      L     10; 
      /I    ; 
      ITB   ; 
      T     #pause; 
      UN    #t_pause; 
      L     #pause; 
      SE    #t_pulse; 
      U     #t_pulse; 
      L     #pulse; 
      SE    #t_pause; 
      U     #t_pulse; 
      =     #output; 

END_FUNCTION_BLOCK

indirect adressing

Een aparte pagina met uitleg en voorbeelden vind je hier. (engels)

kop

omschrijving

xj3 engineering

2010-09-03T14:27:15+02:00

xj3 engineering

xj3 engineering is een samenwerkingsverband van kleine bedrijven, werkzaam in de industrie. Ieder bedrijf apart heeft zijn eigen specialismen, samen kunnen we dus een breed pakket van diensten aanbieden.

Wie „zijn” xj3 engineering:

DREIJER industrial automation

paneelbouw
aandrijftechniek
automatisering

Creative Engineering

machinebouw
constructies
onderhoud

LC Consultancy

machinebouw
cnc techniek
lasersnijden

VBPS

foliewikkelaars
transportsystemen
onderhoud

^{disclaimer

Wij doen ons best deze site „zuiver” te houden. Maar omdat veel van de pagina's ook door derden gewijzigd kunnen worden, nemen wij geen verantwoording voor schade ontstaan door verkeerde informatie.
Beledigende, bedreigende en/of discriminerende uitlatingen, en overige zaken die tegen de wet ¹⁾ zijn of een copyright schenden, zullen zo spoedig mogelijk na het bekend worden verwijderd worden. Diegenen ²⁾ die zich hieraan schuldig maken, zal de toegang tot de site ontzegd worden.}

¹⁾ op deze site is alleen de Nederlandse wet van toepassing

²⁾ ip adressen worden geregistreerd

Walsstraat met stoomverwarmde wals

2008-12-08T22:56:52+02:00

Walsstraat met stoomverwarmde wals

De lijn eerst

Een van onze klanten had in Frankrijk een unieke wals gekocht. In deze walsmachine bevinden zich een grote stoomverwarmde wals en nog een aantal walsen om de plaat van diverse soorten „ribbels” te voorzien. De verwarmde wals is bedoeld om op het plaatmateriaal (ALU of RVS) een papierlaag voorzien van PE coating te „plakken”. Helaas was de bijbehorende besturing volledig gesloopt. Hoe de precieze werking van de wals was wist helaas ook niemand meer.

De verbeteringen

Wij hebben de demontage en opbouw van de wals geheel verzorgd. Verder hebben wij in eerste instantie de wals (tijdelijk) weer aangesloten en draaiend gemaakt. Nadat duidelijk was wat de precieze wensen van de klant waren hebben we de hele installatie aangepast. Er is een hydraulische decoiler voor en een hydraulische coiler achter geplaats en een lateraal uitschuifbare afwikkelunit voor de papierrol gemaakt en geinstalleerd. Ook is er een nieuwe besturing gemaakt om de machine weer aan de eisen van deze tijd te laten voldoen.

Materialenlijst

omschrijving	merk	type
constructies	Creative engineering
besturing	Dreijer
kasten	Rittal
schakelmateriaal	Telemecanique
automaten	ABB
hoofdschakelaar	Kraus&Naimer
frequentieregelaars	Control techniques	Commanders SK
softstarters	Solcon	RVS-AX
motoren	Verhagen
ventielen	Festo
cylinders	Festo

Testrig voor de certificatie van LNG pijpleidingsteunen

2009-05-24T13:30:48+02:00

Testrig voor de certificatie van LNG pijpleidingsteunen

Voor Power piping international te Moergestel maakten wij een testopstelling voor de certificatie van de door hun gefabriceerde geisoleerde steunen voor een LNG transportleiding.

constructie

De steun met daarin een stuk LNG leiding, aan beide zijden dichtgelast, moet bestand zijn tegen 30 ton vertikale kracht op de pijp en tot 7 ton horizontaal zonder te verschuiven. Dat alles bij een temperatuur tussen de -160 en de -170 graden celcius.
Voor het koelen is in het pijpdeel een constructie gemaakt om te trachten de koeling, met grote hoeveelheden vloeibaar stikstof, zo gelijkmatig te laten verlopen. Voor het persen zijn twee hydraulische handpersen gebruikt.

meetapparatuur

Voor de 8 temperatuurmetingen zijn Pt100's gebruikt met speciale koudebestendige kabel. Verder zijn twee krachtopnemers gebruikt, een 60ton's en een 10 ton's, en een elektronische micrometer.
Alle sensoren zijn uiteraard door de daartoe bevoegde instanties gekalibreerd. Ook dit is door ons verzorgd. Al deze metingen zijn gelogd op een Jumo datalogger met een kleurenscherm zodat tijdens de test de data al bekeken kon worden.

resultaat

Het spreekt voor zich dat zowel de steunen als de isolatieschalen ruim aan de eisen voor certificatie voldeden.
De schakelkast met datalogger en de meetapparatuur zijn later ook nog voor andere tests gebruikt.

Tijdens de test, die ruim 12 uur duurde, is voor de koeling een volledige tankwagen stikstof verbruikt.

het vervolg...

De kast met de datalogger is oorspronkelijk gebouwd voor deze ene test. Dat betekend natuurlijk niet dat deze hierna gelijk afgeschreven is. Met de datalogger is later nog een speciaal isolatiemateriaal (ook voor LNG) getest.

Daarna is de datalogger uitgebreid met een bussysteem en extra Pt100 ingangsmodules voor het testen van een nieuw type LNG opslag in Noorwegen. De test zelf heeft ruim een week geduurd, de opgeslagen data bestaat uit meer dan 2,5 miljoen samples. Het bruikbaar maken van deze data voor analyse word ook door ons verzorgd.

tracker

2010-04-19T08:40:39+02:00

Veiligheid

2008-11-07T08:22:58+02:00

Veiligheid

Leuze

lichtschermen

Jocab

Noodstopsrelais

Veiligheidsbus

Veiligheids PLC's

Verlicht viaduct

2010-07-28T20:10:22+02:00

Verlicht viaduct

Op het viaduct bij afslag HighTech campus (randweg Eindhoven) hebben wij RGB-LED verlichting aangebracht.
Het ontwerp is van Har Hollands, lichtarchitect.

Onze rol

Onze rol in het hele project was:

Het uitwerken van de schetsen
Het lasersnijden van de staaldelen
Het fabriceren van de constructie
Het verzorgen van het verzinken/poedercoaten
De montage van de staalconstructie
De montage van de bedrukte glaspanelen

Het ontwerp

Het ontwerp van Har Holland bestaat uit de volgende delen:

De opdruk

De opdruk stellen hersencellen van een muis voor. De opdruk is half lichtdoorlatend: de cellen, zenuwen enz, laten licht door, de rest niet.

De verlichting

Aan de bovenzijde van de glaspanelen zijn RGB LED-balken gemonteerd. Deze balken hangen aan de binnenzijde en aan de buitenzijde over de volle lengte van het viaduct.
De LED-balken aan de binnenzijde zorgen voor het licht dat door de doorlatende delen van de opdruk zichtbaar is. De LED-balken aan de buitenzijde zorgen voor de verlichting van de niet-doorlatende delen van de opdruk.
Door nu de kleur van beide zijden onafhankelijk van elkaar te veranderen ontstaat er een mooi schouwspel.

In verband met de verkeersveiligheid is er voor gekozen de verandering van kleur slechts zeer langzaam te doen verlopen.

De xj3 norm: de materialen die wij graag gebruiken.

2010-07-08T16:47:04+02:00

De xj3 norm: de materialen die wij graag gebruiken.

Wij maken graag gebruik van een aantal standaardmaterialen. De voordelen zijn duidelijk, het beperkt voorraden en men hoeft ook niet iedere keer uit te vinden met wat voor onderdeel men te maken heeft.

Er kunnen natuurlijk ook goede redenen zijn om van deze norm af te wijken. Een specifieke toepassing kan soms om specifieke oplossingen vragen, of een klant heeft eigen wensen.

paginaoverzicht

Draadkleuren

materiaal overzicht

De meeste materialen die wij verwerken zijn standaardmaterialen, een overzicht:

soort	Merk	typenummers
schakelmateriaal
magneetschakelaars	Telemecanique
hulprelais	Releco	C10-A10BX
bedieningselementen	Telemecanique
automaten	ABB
schakelaars	Kraus&Naimer
PLC's
modulair	Siemens	300 serie
	Phoenix	ILC series
compact	VIPA	200 serie
micro	Siemens	LOGO!
low budget	Koyo	Klick en D06
MMI
klein	ESA	VT155
standaard	ESA	VT505
low budget	Koyo	C-more
low budget, full colour	Omron
controllers
Temperatuur	Jumo
electronische nokkenschakelaars	Deutschmann	Locon 17
	Deutschmann	Locon 100
encoders	Kubler
aandrijftechniek
frequentieregelaars	Control Techniques	Commander SK
FO's closed loop	Control Techniques	Unidrive
servodrives	Control Techniques	Unidrive, EZmotion
compact servodrives	Control techniques	Epsilon
softstarters	Solcon
sensoren
inductief M18 5mm (conn/6m kabel)	IFM	IG5595/IG5620
inductief M18 8mm	IFM	IG5953
inductief blokvorm	IFM	IM5037/IM5132
capacitief	IFM
analoog	IFM	IG6084
fotocellen	Leuze
ultrasoon	Microsonic
druk	Sunx
encoders	IFM
	Kubler
veiligheid
	Jokab
	Leuze
aansluiten
aansluitklemmen	Phoenix	ST2.5 / ST4
initiatorklemmen	Phoenix	STIO-IN 2,5/3 OG