Je vais donc vous présenter Douchy, petite bourgade de +/- 1000 habitants, installées le long de l’Ouanne.

J’ai importé le bâti de cette commune en moins de 10mn, sans grande vérification, sans grand sérieux. Depuis j’ai tracé quelques routes, car les précédentes étaient horribles, et le résultat donne quelque chose de très.. très moche. Un réseau routier sans grand intérêt. Admirez donc !

Il parait donc que les bâtiments sont strictement inutile sans routes pour y aller. Très bien, sauf que des routes qui ne mènent à rien ne sont pas très utiles non plus.
La cadastre task force, équipe qui devra s’occuper de l’import à la demande [en gros], ne voit pas l’intérêt de bâtiment sans routes… Qu’elle belle communauté française tout de même. Openstreetmap est censé représenter la cartographie libre par excellence, sauf que déclarer le bâti sans route, à proximité, nuisible va à l’encontre du projet, cartographier ce que l’on veut librement.

Les fichiers disponibles ici ne contiennent que le bâti cadastral. Il est ridicule d’importer ses fichier sans prendre le temps de tracer les voies de la commune. En effet, la trace du bâti n’a pas le moindre intérêt si on ne voit pas les rues correspondantes. cléo-carto

Étant un grand amateur de chemin en vtt, openstreetmap n’a plus le moindre intérêt en partant de ce principe. Comment pourrais-je ajouter des points d’intérêts sans bâti pour me guider rapidement ? Comment pourrais-je me repérer sur une zone très mal couverte alors que le bâti aurait plus être là au loin, pour m’orienter depuis la forêt ?

Bref, j’en ai un peu marre de certains contributeur qui reste bloqué sur leurs pensées.

L’acquisition de la vitesse ce faisait sur la roue grâce à un capteur à fourche, rien de plus simple. Concernant la tension de la batterie, j’ai utilisé un pont diviseur tout simple, en partant du principe que la batterie ne pourra jamais dépasser 15v, donc 15/3=5v, le picbasic ne risque rien.
Une barre de « progression » permet de visualiser la tension de la batterie.

const device=3B
dim IMPU AS integer
dim VIT1 AS integer
dim MOY as integer
dim C as integer
dim MOY1 as integer
dim volt as integer
dim v as integer
dim tmp as byte

dim v1 as integer
dim rest as integer

const bpreset	= 13
const lv		= 16	'lumière verte
const lr		= 15	'lumière rouge

set PICBUS HIGH

	LCDINIT
	CLS

debut:
	IMPU=count(1)		'récupération du nombre d\'impulsion sur l\'entrée/sortie CLKIN
	VIT1=IMPU/2			'transformation de la valeur prise en km/h
	delay 900			'attente de 0.9s

	IF IN(bpreset)=0 THEN	'Si le bouton RESET est pressé
	gosub moyenne
	END IF

	MOY=MOY+VIT1		'Calcul de la moyenne
	C=C+1
	MOY1=MOY/C
	tmp=tmp+1			'Mémorisation du nombre de valeur prise pour la moyenne

	IF tmp >= 20 then gosub moyenne	'quand le nombre de valeur atteind 20, la moyenne est reset

	IF MOY1>30 THEN		'Si MOY1 est supérieur à 30km/h alors
	OUT lv,0			'la lumière verte s\'éteint
	OUT lr,1			'la lumière rouge s\'allume
	ELSEIF MOY1<30 THEN	'sinon si MOY1 est inférieur à 30 alors
	OUT lv,1			'la lumière verte s\'allume
	OUT lr,0			'la lumière rouge s\'éteint
	END IF

	volt=adin(3)
	v=volt*2
	v1=v/83
	rest=v mod 83
	rest=rest*12
	rest=rest/10

    LOCATE 1,0
	PRINT "Vitesse",dec(VIT1)," km/h"

	LOCATE 1,1
	PRINT "Vmoy. ",dec(MOY1)," km/h"

	LOCATE 5,2
	PRINT dec(v1,2),",",dec(rest,2,0)," Volts"

	LOCATE 0,3
	PRINT "-"
	IF volt>452 THEN
	PRINT 255
	ELSE PRINT 0
	END IF
	IF volt>461 THEN
	PRINT 255
	ELSE PRINT 0
	END IF
	IF volt>470 THEN
	PRINT 255
	ELSE PRINT 0
	END IF
	IF volt>479 THEN
	PRINT 255
	ELSE PRINT 0
	END IF
	IF volt>488 THEN
	PRINT 255
	ELSE PRINT 0
	END IF
	IF volt>497 THEN
	PRINT 255
	ELSE PRINT 0
	END IF
	IF volt>506 THEN
	PRINT 255
	ELSE PRINT 0
	END IF
	IF volt>515 THEN
	PRINT 255
	ELSE PRINT 0
	END IF
	IF volt>524 THEN
	PRINT 255
	ELSE PRINT 0
	END IF
	IF volt>533 THEN
	PRINT 255
	ELSE PRINT 0
	END IF
	IF volt>542 THEN
	PRINT 255
	ELSE PRINT 0
	END IF
	IF volt>551 THEN
	PRINT 255
	ELSE PRINT 0
	END IF
	IF volt>560 THEN
	PRINT 255
	ELSE PRINT 0
	END IF
	IF volt>569 THEN
	PRINT 255
	ELSE PRINT 0
	END IF
	IF volt>578 THEN
	PRINT 255
	ELSE PRINT 0
	END IF
	IF volt>587 THEN
	PRINT 255
	ELSE PRINT 0
	END IF
	IF volt>596 THEN
	PRINT 255
	ELSE PRINT 0
	END IF
	IF volt>605 THEN
	PRINT 255
	ELSE PRINT 0
	END IF
	LOCATE 19,3
	PRINT "+"

	CSROFF

	GOTO DEBUT

moyenne:
	MOY=0				'MOY, C et MOY1 sont remis à  0
	C=0					'pour remettre la moyenne à  0
	MOY1=0
	tmp=0
	return

J’ai laissé de la moquette sous le parquet pour isoler un peu l’habitacle du bruit. Pour le moment ça fonctionne.

600euro pour une voiture qui a passé le contrôle technique sans soucis, un cardan neuf, et quelques autres cochonneries neuves.
Son seul vrai problème est sa consommation d’huile moteur. Un petit total de 200euro pour changer les segments, c’est assez raisonnable. =)

Elle pompe 8l/100km, et pointe les 140km/h avec un peu de mal.

L’intérieur a été une plaie à nettoyer. 21ans de poussière qui s’accumule dans les sièges et la moquette. Le volant était couvert de crasse.
Mais l’odeur n’est déjà plus ! Rien de tel qu’un bon nettoyage vapeur et 2 psitt de Febreze parfum lavande vanillé pour la faire disparaître

Photo sous licence Creative Commons, prise par Ludovic Mauduit

Je viens d’apprendre quelque chose d’assez intéressant.

Certains d’entre vous se mette à vandaliser des radars par haine, et bien d’autre chose. Mais pourquoi faire autant de dégât alors que vous pouvez les neutralisez simplement.

Tout les radars automatiques ont des compteurs électrique ! Et sa personne ne doit y penser.
Ils sont à environs 100 ou 200m du radar. Il suffit donc de longer la route sur cette distance pour y trouver le compteur, même s’ils sont quand même bien cacher. Ensuite à vous de faire votre choix sur l’action à entreprendre !

Cet article n’est pas là pour vous incitez à vandaliser ces installations.