Cheminée bois pas cher, insert bois moins cher - Cheminée ethanol murale en promo - Kit Bi-xénon H4 55W en promo ! - Alarme sans fil - Kit Vidéosurveillance moins cher
Aidez-nous à améliorer ce Forum, inscription gratuite ici
Votre Dernier Investissement
#46
Posté 26 November 2013 - 07H02
un tiroir de plus, une hauteur plus confortable pour bricoler, et d'une grande marque "Facom"
Cheminée ethanol en promo Recharge climatisation automobile Climatisation auto faites le vous-même https://www.tiweo.fr/ Outillage automobile http://www.minivanchrysler.fr/
#47
Posté 31 December 2013 - 12H39
pour ceux qui ne comprendrais pas le sens de ce post, merci de bien vouloir vous rendre ici
Cheminée ethanol en promo Recharge climatisation automobile Climatisation auto faites le vous-même https://www.tiweo.fr/ Outillage automobile http://www.minivanchrysler.fr/
#48
Posté 11 May 2014 - 11H35
Vendredi fin après midi achat d'un groupe électrogène pour me déplacer avec "LayKa-CNC".
Donc hier, déballage en mise en service de la bête, 49 Kg quand même.
Le voici prêt pour la route, après l'avoir préparé, remplissage d'huile (+/- 600 cl) car fourni sans huile et carburant (Essence normal 10 litre).
Et avoir refait les connexion électrique sur le moteur, et monter les accessoires,
Roues (pas simple), pieds en CTC, poignée, et refait tout les taraudages des vis de tôlerie, car dur a dévissé a la main.
Car un des fil était déjà mal serti, et était prés de cassé, donc refait toutes des soudures des fils et gainage rétractable.
Vendu sous une enseigne Allemande "Made in Germanie",
Mais fabriquée en chine et ça se vois bien. Moteur sous licence "Honda"
Comme c'est un "Spécial édition" il a un autre "Gueule" que la photo, Pourquoi ??, sais pas.
Il était présenté comme 2800 W au lieu de 2500 W, c'est peut être le pourquoi !!!.
Et bien voila, je vais pourvoir tester "LayKa-CNC" en balade, et faire des "Démonstrations".
Le voila présenté dans les "Pub" de cette GSB quelques mois avant, encore une autre "Gueule".
Voila cette "pub" de cette semaine, qui est valable jusqu'au 20/05/2014.
Hier, "Pluie" comme "Vache qui pisse" et ce jour "Soleil", A plus, PapyKy.
Modifié par PapyKy, 11 May 2014 - 11H02.
Du Forum "CNC-PapyKyKa" du "BricAuBoisAuFer" pour les amateurs du bricolage.
Forum de PapyKy: http://cnc-papykyka.xooit.be/index.php
Sa Chaîne YouTube: https: //www.youtube .... VxZacgRq1MvHS7g
#49
Posté 11 May 2014 - 09H52
perso je voulais revende le mien que j'ai acheter il y a environ 15 ans, il a tourné que quelques heures, puis j'ai laissé tomber.. ben tu sais quoi, je m'en suis servi il y a 3 mois sans sa j'aurais du scier et percer à la main
pas top bruyant ?
le mien est d'époque et pour chantier donc il est pas trop fait pour ne pas être silencieux
Cheminée ethanol en promo Recharge climatisation automobile Climatisation auto faites le vous-même https://www.tiweo.fr/ Outillage automobile http://www.minivanchrysler.fr/
#50
Posté 11 May 2014 - 10H49
Non pas trop de bruit, Moteur essence 4 temps, et gros silencieux.
Ferais une vidéo demain, A++, PapyKy.
Du Forum "CNC-PapyKyKa" du "BricAuBoisAuFer" pour les amateurs du bricolage.
Forum de PapyKy: http://cnc-papykyka.xooit.be/index.php
Sa Chaîne YouTube: https: //www.youtube .... VxZacgRq1MvHS7g
#51
Posté 12 May 2014 - 12H33
Pour cela pris une bonne puissance, 2.300 Watts.
Une disqueuse "Metabo" qui a déjà pas mal d'age, et surtout beaucoup donnée du travail
Sur ce groupe prévu pour 2.500 Watts en utilisation continue.
Et bien le groupe a assuré sur "boulot".
A++, PapyKy.
Modifié par VxS, 20 May 2014 - 03H13.
Du Forum "CNC-PapyKyKa" du "BricAuBoisAuFer" pour les amateurs du bricolage.
Forum de PapyKy: http://cnc-papykyka.xooit.be/index.php
Sa Chaîne YouTube: https: //www.youtube .... VxZacgRq1MvHS7g
#52
Posté 12 May 2014 - 05H52
Cheminée ethanol en promo Recharge climatisation automobile Climatisation auto faites le vous-même https://www.tiweo.fr/ Outillage automobile http://www.minivanchrysler.fr/
#53
Posté 08 August 2014 - 07H30
je peut toutefois indiqué que comme l'ancien, ce nouveau PC et refroidi par eau
ce qui fait que je suis un peu moins présent en ce moment, avec tous mes sites, etc.. je doit bien tout calculer pour ne rien perdre puis il faut faire sa bien pour être tranquille !!
Cheminée ethanol en promo Recharge climatisation automobile Climatisation auto faites le vous-même https://www.tiweo.fr/ Outillage automobile http://www.minivanchrysler.fr/
#54
Posté 08 August 2014 - 08H02
Eh oui 10 ans c'est plus que ..........
Le mien a déjà 2 ans, mais n'est pas encore mort, car ......
Intel I7-950 sur carte mère Gigabyte
Petit résumé des composants.
Boitier : Antec Df-85 avec 4x Hot Swap Module
Cpu : Intel I7-950 avec Refroidissement : Corsair H70 CPU Liquid Cooler
Mb : Ga-X58a-Ud3r_V2.0
Hd's Sys : 2x Western Digital Caviar Black 1to en 6gbs. (USB3) en Raid 0
Hd's Data Sys : 2x 1.5 To Western Digital green, arrêt automatique si pas utilisé
Hd's Stokage : 5x 1.5 To - 3x 1 To en Seagate & Western Digital, arrête sur commande externe
Ram : Corsair Triple channel - Cmp6gx3m3a1600c7, 2 ventilateur avec sonde interne
Corsair Airflow Pro placer sur Ram avec affichage en temps réel de l'utilisation
Allim : Corsair Gold AX1200 High Performance 1200W
Video : Gigabyte - Gvr545sc1gi
Ecran : ACER V234HQ
DVD Graveur : HL-DT-ST BD-RE BH10LS
OS : Windows Seven intégrale 64 Bits
AV : Norton Internet Security
Printer : Brother DCP-J925DW
Excuser la qualité de la photos, car pris avec GSM, car APN cassé ce jour là.
Bon montage a toi, PapyKy.
Du Forum "CNC-PapyKyKa" du "BricAuBoisAuFer" pour les amateurs du bricolage.
Forum de PapyKy: http://cnc-papykyka.xooit.be/index.php
Sa Chaîne YouTube: https: //www.youtube .... VxZacgRq1MvHS7g
#55
Posté 08 August 2014 - 09H59
pas contre qu'est ce que tu fait avec toute ses place, ca te fait 14.5 Terabyte lol
#56
Posté 08 August 2014 - 10H53
C'est vrais que un SSD serais bien, mais il y a deux ans c'était hors de prix.
Et les capacités faible, mais se sera bientot possible.
Quand a la capacité en HD, cela n'est pas très utile, c'est vrais, mais les copies de sauvegarde sont plus sur et plus sécurisé que sur DVD
A tu déjà rechercher sur plusieurs centaine de CD/DVD un fichier nommé *.* - Sans joué au DJ, ce qui n'est plus de mon n'age,
Musique, vidéo, photo, série TV et autres sont sur des HD différent, et facilement accessible par recherche simple.
Surtout que cela ne tourne qu'a la demande, par une commande externe de mise en fonction des HD's a utilisé.
Quand a la carte vidéo, c'est vrais que cela pourrais être plus rapide, mais je ne joue pas ,
les joueurs ne sont jamais content de la vitesse de leurs carte graphiques, avoir 2 ou 3 voir quatre cartes graphique et autant d'écran voir plus.
Je sais que cela existe, mais pas pour moi qui suis de la génération des début de l'informatique.
Commodore 64 K et sans HD sur floppy de 170 K simple face.
A tu connu cela 8 pouces - 5.1/4 - 3.5 de 720K ?
Ou mieux encore sur K7 audio.
Bonne fin de soirée a tous ceux qui sont encore sur la toile, PapyKy.
Du Forum "CNC-PapyKyKa" du "BricAuBoisAuFer" pour les amateurs du bricolage.
Forum de PapyKy: http://cnc-papykyka.xooit.be/index.php
Sa Chaîne YouTube: https: //www.youtube .... VxZacgRq1MvHS7g
#57
Posté 09 August 2014 - 12H45
Cheminée ethanol en promo Recharge climatisation automobile Climatisation auto faites le vous-même https://www.tiweo.fr/ Outillage automobile http://www.minivanchrysler.fr/
#58
Posté 09 August 2014 - 06H44
RETOUR movedoor1: JOUER »mb T225 o5 l40 bagfedc o4 bagfedc" verser y = touches (1, 4) des Touches (1, 5) grille $ (petites touches (1, 3), y, 1) = "12" (touches 1, 1) = 0 y SUIVANT RETOUR movedoor2: JOUER "mb T225 o5 l40 bagfedc o4 bagfedc" verser y = touches (2, 4) à des Touches (2, 5) grille $ (touches (2, 3), y, 1) = touche "12" (2, 1) = 0 y SUIVANT RETOUR "--- Déplacez-marins guyleft: Si l'= -1 ALORS contre RETOUR P1S2 = POINT (homme (1) - 3, l'homme ( 2) + 30) SI xdir> -1 ET P1S2 = bc ALORS olddir = xdir: xdir = xdir - 1 = 0 Contre RETOUR guyright: Si l'= 1 contre ALORS RETOUR p3s2 = POINT (homme (1) + 15, l 'homme (2) + 30) SI xdir <1 ET p3s2 = bc ALORS olddir = xdir: xdir = xdir + 1 = 0 Contre RETOUR guyjump: SI Ydir <> 0 ALORS RETOUR Ydir = -3 saut = 1 RETOUR check4fruit: SI LEFT $ (grille $ (gx, gy, 1), 1) = "f" ALORS SI GOSUB getfruit0 LEFT $ (grille $ (gx + 1, gy, 1), 1) = "f" ALORS SI GOSUB getfruit1 GAUCHE $ (grille $ (gx, gy + 1, 1), 1) = "f" getfruit2 ALORS SI GOSUB LEFT $ (grille $ (gx + 1, gy + 1, 1), 1) = "f" ALORS GOSUB getfruit3 RETOUR getfruit0: num = VAL (RIGHT $ (grille $ (gx, gy, 1), 1)) grille $ (gx, gy, 1) = points «12» De GOSUB RETOUR getfruit1: num = VAL (RIGHT $ (grille $ (gx + 1, gy, 1), 1)) grille $ (gx + 1, gy, 1) = 12 points "" De GOSUB RETOUR getfruit2: num = VAL (RIGHT $ (grille $ (gx, gy + 1, 1), 1)) grille $ (gx, gy + 1, 1) = points «12» De GOSUB RETOUR getfruit3: num = VAL (RIGHT $ (grille $ (gx + 1, gy + 1, 1), 1) ) grille $ (gx + 1, gy + 1, 1) = "12" GOSUB des points Souligne de RETOUR: SI num <4 ALORS SCORE SCORE = + 10 * num + 10 PLAY "de o3co4c mb T220 L60" Sinon, si num = 4 ALORS Redkey = 1 SI num = 5 ALORS yellowkey = 1 si num = 6 THEN GOTO victoire play end "CDEFGAB de mb T220" SI RETOUR fini: fini = 1 victoire: «--- Fade out a $ =" final.pal "fondu = 0 GOSUB fadepal DEF SEG = & HA000 BLOAD "results.spr", 0 DEF SEG LINE (129, 0) - (286, 30), 0, BF LINE (2, 30) - (239, 57), 0, BF non $ = "results.pal" fondu = 1 GOSUB fadepal LOCATE 16, 2 SI Fini = 1 ALORS JOUER "mb x" + VARPTR $ (Perdre $) PRINT "Vous êtes inconscient et" LOCATE 17, 2: PRINT "le Monde est-pris! sur "niveau 1 = 0 niveau 2 = 0 AUTRE CONFÉRENCE« MB x "+ VARPTR $ (Gagner $) PRINT" Félicitations "LOCATE 17, 2: PRINT"! Vous battu un le Niveau "LOCATE 18, 2:. PRINT" Votre marquer en Ontario totalisent »; SCORE; "." niveau 1 = niveau 1 + 1 = niveau 2 niveau 2 + 1 FIN SI DO: boucle JUSQU'A CE Que INKEY $ = "" DO: boucle JUSQU'A CE Que INKEY $ <> "" SI Niveau 1 = 1 THEN GOTO niveau 1 niveau 2 SI = 1 THEN GOTO niveau 2 SI Niveau 1> = 2 et Niveau 2> = 2 PUIS localisez 20, 2: PRINT "Vous Avez sauvé la terre!": "JOUER mb x" + VARPTR $ (sélection) GOTO backtomenu '---------- - gameexit: gamequit: ECRAN 0, 0, 0 CLS DataForMouse: DATA 55,8b, ec, 56,57,8b, 76,0c, 8b, 04,8b, 76,0a, 8b, 1c, 8b, 76, 08,8b, 0c, 8b, 76,06,8b Données 14, cd, 21,8b, 76,0c, 89,04,8b, 76,0a, 89, 1c, 8b, 76,08,89,0c, 8b, 76,06,89,14,5f Données 5e, 5d, ca, 08,00 namesdata: Semaines Données Sean, Kevin, Troy, Chris Igaz, Adrien, Eric, Alan, Michael, Jason Données Maranatha, Bretagne, Melissa, M. Hirsch, Arianna, Bretagne, Matthew Données M. Smith, Danny, Nancy, Anthony, Pamela, Marc, Matthieu, Timothy Données Marita, Amy Joe, Nathan, Bob, Billy , William, Jonathan, Charles, leveldata fin:....... DONNÉES 152 161 DONNEES DONNEES DONNEES DONNEES 5,16,6,14,15 16,19,17,17,18,,,,,,, f0 , f0, f1, f1,.,., 8, f6,.,.,.,.,.,., f3,.,.,.,.,.,.,.,., 5,5 DATA. ,.,.,.,.,.,.,. ,.,.,.,.,., 8,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,. DATA 7, 7,7,7,.,.,.,.,.,.,.,.,., 8,6,6,.,.,.,.,., 8,.,.,. , 8,.,.,.,.,.,. f4 DE DONNEES,.,., 8,.,., 1,.,.,.,., $,.,.,., l, g,.,. ,.,., 8,8,8,8,8,.,.,.,.,.,. DATA.,.,., 8,6,6,6,6,6,6,6,. ,.,.,., L, 8,8,.,.,.,.,.,.,.,.,., E,.,.,.,. Données 6,.,.,.,. ,.,.,.,.,.,.,.,.,.,., L, 8,8,8,.,.,.,.,.,.,.,.,.,.,. ,.,. Données 8,.,.,.,.,.,.,.,.,.,.,.,., 6,6,6,6,6,6,6,6,6,6, 6,6 , 6,6,6,6, e,.,. Données 8,6,.,.,.,.,., E, e, f3,.,.,.,.,., 8, f1, f1,.,.,.,.,.,.,. ,.,.,.,.,.,., e Données 8,.,.,., 8,8,9,9,9, 9,8, a, a, a, a, 8, f1, f1 ,.,.,.,.,.,.,.,.,.,.,.,.,.,. DONNÉES 8,. ,., 6,8,8, d, d, d, d, 8,8,8,8,8,8,8,8,8,8,.,., 6,6,6,6,6 , 6,6,6,6,6 Données 8,.,., 8,8,8, d, d, d, d, 8,.,.,.,.,., f5,.,., 8 , 8,.,.,.,.,.,.,.,.,., f3,. DONNEES 8,6,.,.,., 8, d, d, d, d, 8,.,. ,.,.,., 2,.,., 8,.,.,.,.,.,.,.,.,.,., F3,. Données 8,.,.,.,., 8, 8,8,8,8,8,.,.,., 8,8,8,.,., 8,6,6,6,6 ,. ,.,.,.,.,.,. ,. Données 8,.,.,.,., B,.,.,.,.,.,.,., #,.,.,.,.,., 8,8,8,8,8,. ,.,.,.,., e,.,. Données 8,6,6,.,., B,.,.,.,.,.,., 8,.,.,.,. ,.,., 8,8,8,8,8,8, $,.,.,.,.,.,. 8,8,8,6,6,6,6 DE DONNEES,.,.,. , 6,5,5,6,6,6,6,6,6,8,8,8,8,8,8,.,.,.,.,., E,. Données 8,.,. ,.,.,.,.,.,.,.,.,.,.,.,.,., B,.,.,.,.,.,.,.,.,.,., 8 ,.,.,.,. Données 8, #,.,.,.,.,.,., E,.,.,.,.,.,.,., B,.,.,.,. ,.,.,.,.,.,.,.,., E,.,. Données 8,.,.,.,.,.,.,.,.,.,.,.,.,. ,.,., 6,6,6,6,6,6,6,6,6,.,., 6,.,.,.,. Données 8,6,6,6,6,6,6, 6,6,6,6,9,9,6,6,6,8,8,8,8,8,8,8,8,8 , 8,8,8,8,8,8,8 DATA.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,. ,.,.,.,.,.,.,. ,.,.,.,.,.,.,. Données Données Données 151 161 9,14,10,10,13 DONNEES DONNEES 9,5,8,1,4.,.,., L,.,. ,., B,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,., L, f3, f3 ,. DATA.,.,., L,.,.,., B,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,. ,.,.,.,., L, f3, f3,. Données 6,6,., L,., F6,., B,.,.,.,.,.,., E, e,. ,.,.,.,.,.,.,.,.,.,.,., L,.,.,. DATA.,.,., L,.,.,., B,.,. , E, e, e,.,.,.,.,.,.,.,.,.,.,.,.,.,.,., L,.,.,. DATA.,.,. , L, 6,6,6,6,6,6, a, a, a, a, a, a, 6,6,6,6,6,6,6,6,6,6,.,. , L,., 8,. DATA., 6,6,6,.,.,.,.,., 8,8,8,8,8,8,8,8,.,.,.,. ,.,.,.,.,.,.,., L,.,.,. DATA.,., F3, l,.,.,.,.,., 8,.,.,.,. ,.,.,.,.,.,.,.,.,.,.,.,., $,., L,.,.,. DATA.,.,.,.,.,.,. ,.,., 8,.,.,.,.,.,.,.,.,.,.,.,., 1,.,.,.,.,.,., 8,.,. Données e,.,.,.,.,.,.,.,., 8,.,., $,., 6,6,6,6,6,.,., 5,5,5,5 , 5,.,.,.,.,.,. DATA a, a, 6,6,.,.,.,.,., B,.,.,.,.,.,.,.,. ,.,.,.,.,.,.,.,.,.,.,.,., F5,. DONNÉES 8,8,8,8,.,.,.,.,., B,. ,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,., 6,6,6,. DATA.,.,.,. ,.,.,.,.,., B,.,.,.,.,.,., 5, $,., 5,5,5,5,., F3, f3,.,.,. ,.,.,. DATA.,.,.,.,.,.,.,.,., B,.,.,.,.,.,.,.,.,.,.,.,. ,.,.,.,.,.,.,., F1, f2 de Données.,.,.,., 5,5,5,5,5,8,.,.,.,.,. ,.,., F3, f3,.,.,.,.,.,.,.,.,.,., F1, f2,. DATA.,., $,., F4,.,.,. , L, 5,5,5,.,.,.,.,.,.,.,.,.,.,.,., #,.,.,.,.,.,.,. DATA. ,.,.,.,.,.,.,., L,.,.,.,.,., F1,.,., F2,.,., F3,.,.,.,.,. ,.,.,.,.,.,. DATA.,.,.,., F2,.,.,.,.,.,.,.,., E,., E, e,., E, e,., E, e, 5,5 , 5,5,5,5,5,5,5 DATA.,.,.,.,.,.,.,., 2,.,.,. , E,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,. DATA.,.,.,., 8,.,.,., 8,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,. ,.,.,.,.,. ,.,. DONNEES 7,7,7,7,7, a, a, a, 7,7,7,7,7, a, a, a, a, a, a, a, a, a, a, a, a , a, a, a, a, a, a,. DATA.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,. ,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,. Drawlevel SUB (viewX, viewy, Mannois, beaucoup, manpos) elenum = RC (updown (1, 2)) robonum = RC (robot2 (1, 2)) monstre (1) = monstre (1) + 0,5 SI monstre (1)> 10 ALORS monstre (1) = 0 xt = (viewX - RC (viewX)) * 20 = yt (viewy - RC (viewy)) * 20 = 0 obj1 XZB = bullit (1) * 20 - xt - RC (viewX) * 20 = YZB bullit (2) * 20 - yt - RC (viewy) * 20 SI XZB> 0 ET XZB <280 ET YZB> 0 ET YZB <180 ALORS obj1 = 1 obj2 = 0 xz = manx * 20 - xt - RC (viewX) * 20 yz = Nombre * 20 - yt - RC (viewy) * 20> 0 et XZ et YZ 300 <> 0 ET yz xz SI <162 ALORS obj2 = 1 homme (1) = xz homme (2) = yz '--- Lire CHAQUE ligne de Données versez y = 1 À 9 VERSER x = 1 à 15 item $ = grille $ (x + RC (viewX), et RC + (de viewy), 1) xc = x * 20 * yc = 20 xd = xc - xt m = yc - YT SELECT CASE item $ CASE "W4" PUT (xd, yd), bv, PSET CAS PUT "W6" (xd + 10 m), bv, PSET CAS "W8" PUT (xd, yd), bh, PSET CAS "w2" PUT (xd, m + 10), bh, PSET CAS "QE" PUT (xd, yd), g8, PSET CAS "" wa PUT (xd, yd), g2, PSET FIN SI SELECT LEFT $ (item $, 1) = "f" PUIS mettre (xd, yd), fruits (105 * VAL (RIGHT $ (item $, 1))) , PSET SI VAL (item $)> 0 ET VAL (item $) <17 ALORS PUT (xd, yd), objets ((VAL (article $) - 1) * 105), PSET FIN SI SI y = 1 PUIS mettre (xc - 20, 0), boîte, PSET SI y = 9 Ensuite mettez (xc - 20, 180), boîte, PSET SI x = 1 PUIS mettre (0, yc - 20), boîte, PSET SI x = 15 PUIS mettre (300, yc - 20), boîte, PSET x Prochaines si Y + viewy> RC (Nombre) - 1 THEN GOSUB homme si Y + viewy> elenum - 1 THEN GOSUB Ascenseur SI y + viewy> robonum - 1 ALORS robots GOSUB taureau = = 1 ALORS METTEZ (XZB, YZB), taureau, PSET de 0 SI: taureau = 1 SI taureau = 0 ALORS bullit (1) = 0 PROCHAINE y PUT (300, 180), boîte, PSET GOTO fel homme: xz = manx * 20 - xt - RC (viewX) * 20 yz = Nombre * 20 - yt - RC (viewy) * 20 = 1 ALORS METTEZ obj2 SI (xz, yz), Guy (manpos * 200), PSET homme (1 ) = xz homme (2) = yz RETOUR Ascenseur: verser i = 1 A xz = updown 4 (i, 1) * 20 - xt - RC (viewX) * 20 = yz updown (i, 2) * 20 - yt - RC (viewy) * 20 SI xz> 0 ET xz <280 ET yz> 0 ET yz <180 PUIS mettre (xz, yz), Ascenseur, PSET PROCHAINE i Retour robots: POUR i = 1 A 4 xz = robot2 (i, 1) * 20 - xt - RC (viewX) * 20 = yz robot2 (i, 2) * 20 - yt - RC (viewy) * 20> 15 ET xz xz SI <290 ET yz> 0 ET yz <165 ALORS SI robot2 (i, 5) = 0 ALORS METTEZ (xz, yz + 16), un robot non (300), PSET AUTRE SI monstre (1)> 4 PUIS mettre (xz, yz), robot, PSET SI monstre (1) < 5 PUIS mettre (xz, yz), robot (150), PSET FIN SI FIN SI PROCHAINE i retour devant le fait: SI taureau = 1 ALORS bullit (4) = POINT (XZB - 1, YZB) + POINT (XZB + 10, YZB + 6) "POINT IMPRIMER (ZXB - 1, YZB); POINT (XZB + 10, yxb + 6) End Sub readlevel (level, section) RESTORE leveldata '--- Trouver Reportages: Niveau FAIRE LIRE n $ boucle JUSQU'A CE Que VAL (n $) = 15 * 10 + Niveau »- - Trouver Reportages section NE Read n $ boucle JUSQU'A CE Que VAL (n $) = 16 * 10 + section elevator.num = 0 = 0 robot.num VERSER i = 1 A 2 pour ii = 1 à 5 touches de lecture (i, ii) ii suivant suivant i Y = 1 à 21 verser x = 1 A 32 LIRE item $ élément de SI $ = "un" élément ALORS $ = "10" produit SI $ = "b" élément ALORS $ = "11 "SI item $ =" d "élément ALORS $ =" 13 "produit SI $ =" e "élément ALORS $ =" 14 "produit SI $ =" l "article ALORS $ =" 15 "produit SI $ =" g " ALORS item $ = "16" produit SI $ = "$" ALORS elevator.num = elevator.num + 1 updown (elevator.num, 1) = x updown (elevator.num, 2) = y updown (elevator.num, 3) = y updown (Ascenseur. num, 4) = y + 4,8 updown (elevator.num, 5) = 0,04 FIN SI SI item $ = "#" ALORS robot.num = robot.num + 1 robot2 (robot.num, 1) = x robot2 (robot.num, 2) = y + 0,55 robot2 (robot.num, 3) = x robot2 (robot.num, 4) = x + 5 robot2 (robot.num, 5) = 0,05 robot2 (robot.num, 6) = 1 FIN SI SI item $ = "." OU item $ = "$" OU item $ = "#" élément ALORS $ = "12" grille $ (x, y, 1) = item $ Prochain X y PROCHAINE END SUB vsINTERR FONCTION% (± 1%, a2%, a3%,% a4) '------------------------------------------- - -------------------------------- PARTAGÉ mouse1 () As Integer SI mouse1 (0) <> 0 ALORS a5% = VARPTR (mouse1% (0)) DEF SEG = VARSEG (mouse1 (0)) POKE a5% + 26, et H33 APPEL absolue (a1%, a2%, a3%, a4%, a5%) mouseInterr% = ax% AUTRE ECRAN 0 PRINT: PRINT "d'Erreur de la souris, le programme arrêté" SYSTÈME END IF '---------------------------- ------- ----------------------------------------- FIN FONCTION vsmouse SOUS (action $, a1%,% a2, a3%, a4%) '------------------------------- ------- -------------------------------------- sourisX Partagée%, mousey %, mouseb% '- - Vérifiez Que la Fonction de souris was Sélectionné SELECT CASE Mesures $ CASE "get": r% = vsINTERR% (3, mouseb%, sourisX%, mousey%) sourisX% = sourisX% / 2 CAS "show": r% = vsINTERR% (1, bx%, cx%, dx%) CAS "cacher": r% = vsINTERR% (2, bx%, cx%, dx%) CAS "position": r% = vsINTERR% (4, bx%, a1%, a2%) CAS "zone": r% = vsINTERR% (7, 0, a1%, a2%) r% = vsINTERR% (8, bx%, a3%, a4%) CAS "coord": a3 COLOR% LOCATE a1%, a2%: PRINT "X"; MouseX%; "Y"; mousey%; "" Couleur A4% '--- Quitter si la Commande de la souris is incorrect Case Else: ECRAN 0 PRINT: PRINT "Erreur - Une instruction erronée de la souris" SYSTÈME FIN SELECT' ---------- ------ -------------------------------------------- ------ ---------- END SUB Une belle Liste Tapez un au clavier et non enregistrer sur K7, Bonne écriture a tous de vous, PapyKy.
Du Forum "CNC-PapyKyKa" du "BricAuBoisAuFer" pour les amateurs du bricolage.
Forum de PapyKy: http://cnc-papykyka.xooit.be/index.php
Sa Chaîne YouTube: https: //www.youtube .... VxZacgRq1MvHS7g
#60
Posté 09 September 2014 - 07H20
voila de quoi vous rassurer..... malgré leurs belles promesses sur leur sois disant économie, il viennent de creuser le trous de plus de 1 MILLIARD, (décidément.... tous sa n'était que mensonge, et pourtant on paye encore plus qu'avant)
va encore falloir serrer un cran à la ceinture....
Cheminée ethanol en promo Recharge climatisation automobile Climatisation auto faites le vous-même https://www.tiweo.fr/ Outillage automobile http://www.minivanchrysler.fr/
7 utilisateur(s) li(sen)t ce sujet
0 membre(s), 7 invité(s), 0 utilisateur(s) anonyme(s)