HobbyCNC fórum
FTP tárhely: http://cnctar.hunbay.com v0.9.1 alpha Régi HobbyCNC oldal: http://archiv.hobbycnc.hu

Új regisztráció / Átregisztráció a régi fórumról
   



teszt




Időrend:
Oldal 1 / 4   Sorok:
1  2  3  4   Következő ►  Utolsó ►|

  Fórum főoldal  |  A lap aljára

MoparMan | 1515    2017-09-14 23:41:18 [178]


MoparMan | 1515    2017-09-14 21:44:51 [177]

http://foo.com/blah_blah
http://foo.com/blah_blah/
(Something like http://foo.com/blah_blah)
http://foo.com/blah_blah_(wikipedia)
(Something like http://foo.com/blah_blah_(wikipedia))
http://foo.com/blah_blah.
http://foo.com/blah_blah/.
<http://foo.com/blah_blah>
<http://foo.com/blah_blah/>
http://foo.com/blah_blah,
http://www.example.com/wpstyle/?p=364.
http://userid:password@example.com:8080
http://userid@example.com
http://userid@example.com:8080
http://userid:password@example.com
http://example.com:8080
http://example.com/anything.html
http://example.com/anything.php
Just a www.example.com link.

http://www.example.com/wpstyle/?p=364

teszt url


MoparMan | 1515    2017-09-13 21:54:42 [176]

[@1194]


MoparMan | 1515    2017-09-13 21:20:42 [175]

Kód:

const int SmartHomeAxisFld = 20602;



bool HomeAxis(int AxisNo)

{

string WorkAxis = "XYZABC".Substring(AxisNo, 1);

bool G28Move = Convert.ToBoolean(exec.Readkey("SmartHome", "G28Move" + WorkAxis, "false"));

double G28Goto = Convert.ToDouble(exec.Readkey("SmartHome", "G28Goto" + WorkAxis, "0.0"));

double CurrentPos = 0.0;

bool SoftLimit = exec.GetLED(67);



if (G28Move)

AS3.Additemtolistbeginning("Homing " + WorkAxis + " with move to " + G28Goto, 2);

else

AS3.Additemtolistbeginning("Homing " + WorkAxis, 2);



while (exec.IsMoving()){}

if(exec.Ismacrostopped())

return false;


MoparMan | 1515    2017-09-13 21:16:55 [174]

Kód:

// ================================================================================================

// SmartHome v1.2

// ================================================================================================



string Axes = "XYZABC";

int Axis = 0;



if (Qvar == null)

{

Axis = Convert.ToInt32(AS3.Getfielddouble(SmartHomeAxisFld));

if (Axis == 6)

{

for (int i = 0; i <= 5; i++)

{

Axis = Axes.IndexOf(AS3.Getcomboboxselection(4 + i));

if (Axis != -1)

exec.Setaxishomestate(Axis, false);

}

for (int i = 0; i <= 5; i++)

{

Axis = Axes.IndexOf(AS3.Getcomboboxselection(4 + i));

if (Axis != -1)

if (!HomeAxis(Axis))

return;

}

}

else

{

exec.Setaxishomestate(Axis, false);

HomeAxis(Axis);

}

return;

}



int Qint = Convert.ToInt32(Qvar);



if ((Qint < 0) || (Qint > 5))

{

AS3.Additemtolistbeginning("* M20928: Invalid Q", 2);

return;

}



HomeAxis(Qint);



// ================================================================================================



#Events



const int SmartHomeAxisFld = 20602;



bool HomeAxis(int AxisNo)

{

string WorkAxis = "XYZABC".Substring(AxisNo, 1);

bool G28Move = Convert.ToBoolean(exec.Readkey("SmartHome", "G28Move" + WorkAxis, "false"));

double G28Goto = Convert.ToDouble(exec.Readkey("SmartHome", "G28Goto" + WorkAxis, "0.0"));

double CurrentPos = 0.0;

bool SoftLimit = exec.GetLED(67);



if (G28Move)

AS3.Additemtolistbeginning("Homing " + WorkAxis + " with move to " + G28Goto, 2);

else

AS3.Additemtolistbeginning("Homing " + WorkAxis, 2);



while (exec.IsMoving()){}

if(exec.Ismacrostopped())

return false;



switch (AxisNo)

{

case 0:

CurrentPos = exec.GetXpos();

break;

case 1:

CurrentPos = exec.GetYpos();

break;

case 2:

CurrentPos = exec.GetZpos();

break;

case 3:

CurrentPos = exec.GetApos();

break;

case 4:

CurrentPos = exec.GetBpos();

break;

case 5:

CurrentPos = exec.GetCpos();

break;

}



exec.Code("G28.1 " + WorkAxis + CurrentPos);

while (exec.IsMoving()){}

if(exec.Ismacrostopped())

return false;



if (G28Move)

{

if (SoftLimit)

{

exec.Callbutton(519);

while (exec.IsMoving()){}

}



exec.Code("G0 G53 " + WorkAxis + G28Goto);

while (exec.IsMoving()){}

if(exec.Ismacrostopped())

{

if (SoftLimit)

{

exec.Callbutton(518);

while (exec.IsMoving()){}

}

return false;

}



if (SoftLimit)

{

exec.Callbutton(518);

while (exec.IsMoving()){}

}

}



return true;

}



// ================================================================================================

MoparMan | 1515    2017-09-12 20:16:10 [173]

Kód:

#include <EEPROM.h>
#include "EEPROMAnything.h"

#include <SoftwareSerial.h>
#include <TinyGPS.h>
#include <Wire.h>
#include <OzOLED.h>
//#include <SD.h>
//#include <Fat16.h>
#include <FileLogger.h>

#include "display_data.h"


MoparMan | 1515    2017-09-12 20:14:27 [172]

#include <EEPROM.h>
#include "EEPROMAnything.h"

#include <SoftwareSerial.h>
#include <TinyGPS.h>
#include <Wire.h>
#include <OzOLED.h>
//#include <SD.h>
//#include <Fat16.h>
#include <FileLogger.h>

#include "display_data.h"


MoparMan | 1515    2017-09-12 19:58:19 [171]

test


MoparMan | 1515    2017-09-12 19:41:39 [170]

Kód:

char reply[100];
int i = 0;
while (BTserial.available()) {
reply[i] = BTserial.read();
i += 1;
}
//end the string
reply[i] = '\0';
Serial.print(reply);
Serial.println("Reply end");
}

void loop() {


MoparMan | 1515    2017-09-08 21:13:49 [169]

[code] és [/code]


MoparMan | 1515    2017-09-08 21:12:55 [168]

&#x5B;code&#x5D; és &#x5B;/code&#x5D;


MoparMan | 1515    2017-09-05 22:38:29 [167]

Kód:

Set objWord = CreateObject("Word.Application")
Wscript.Echo "Version: " & objWord.Version
Wscript.Echo "Build: " & objWord.Build
Wscript.Echo "Product Code: " & _
objWord.ProductCode()
objWord.Quit


MoparMan | 1515    2017-09-05 22:34:06 [166]

Kód:

import unittest
def median(pool):
copy = sorted(pool)
size = len(copy)
if size % 2 == 1:
return copy[(size - 1) / 2]
else:
return (copy[size/2 - 1] + copy[size/2]) / 2
class TestMedian(unittest.TestCase):
def testMedian(self):
self.failUnlessEqual(median([2, 9, 9, 7, 9, 2, 4, 5, 8]), 7)
if __name__ == '__main__':
unittest.main()


MoparMan | 1515    2017-09-05 22:13:32 [165]

Kód:

--- M20103.txt ---
exec.Code(&quot;M20100 Q3&quot;);
while(exec.IsMoving()){}

--- M20100.txt ---
int Qint = 0;

double ax = exec.GetXpos();
double ay = exec.GetYpos();
double az = exec.GetZpos();
double aa = exec.GetApos();
double ab = exec.GetBpos();
double ac = exec.GetCpos();

string ujsor = &quot;&quot;;
string megj = AS3.Getfield(21000).Trim(); // Megjegyzes mezo szama a kepernyon

if (Qvar != null) Qint = Convert.ToInt32(Qvar);

switch (Qint)
{
case 0:
case 3:
if (mode == 1)
{
if (ax != px) ujsor = ujsor + &quot; X&quot; + ax.ToString();
if (ay != py) ujsor = ujsor + &quot; Y&quot; + ay.ToString();
if (az != pz) ujsor = ujsor + &quot; Z&quot; + az.ToString();
if (aa != pa) ujsor = ujsor + &quot; A&quot; + aa.ToString();
if (ab != pb) ujsor = ujsor + &quot; B&quot; + ab.ToString();
if (ac != pc) ujsor = ujsor + &quot; C&quot; + ac.ToString();
if (ujsor != &quot;&quot;) ujsor = &quot;G01&quot; + ujsor;
if ((Qint == 3) &amp;&amp; (megj != &quot;&quot;))
{
megj = megj.Replace(&quot;(&quot;, &quot;[&quot;); // Nem lehet zarojel a megjegyzesben!
megj = megj.Replace(&quot;)&quot;, &quot;]&quot;);
if (ujsor == &quot;&quot;)
ujsor = &quot;(&quot; + megj + &quot;)&quot;;
else
ujsor = ujsor + &quot; (&quot; + megj + &quot;)&quot;;
}
if (ujsor != &quot;&quot;) System.IO.File.AppendAllText(SaveTo, ujsor + &quot;\r\n&quot;);
px = ax;
py = ay;
pz = az;
pa = aa;
pb = ab;
pc = ac;
}
break;
case 1:
SaveTo = AS3.Getfield(2017);
System.IO.File.WriteAllText(SaveTo,
&quot;G00 X&quot; + ax.ToString() + &quot; Y&quot; + ay.ToString() + &quot; Z&quot; + az.ToString() +
&quot; A&quot; + aa.ToString() + &quot; B&quot; + ab.ToString() + &quot; C&quot; + ac.ToString() + &quot;\r\n&quot;);
px = ax;
py = ay;
pz = az;
pa = aa;
pb = ab;
pc = ac;
mode = 1;
break;
case 2:
mode = 0;
break;
}

#Events

static int mode = 0;

static double px = 0.0;
static double py = 0.0;
static double pz = 0.0;
static double pa = 0.0;
static double pb = 0.0;
static double pc = 0.0;

static string SaveTo = &quot;&quot;;


MoparMan | 1515    2017-09-05 22:03:58 [164]

Kód:

O1000
T1 M6
G0 G90 G40 G21 G17 G94 G80
G54 X-75 Y-25 S500 M3
G43 Z100 H1
Z5
G1 Z-20 F100
X-50 M8
Y0
X0 Y50
X50 Y0
X0 Y-50
X-50 Y0
Y25
X-75
G0 Z100
M30

MoparMan | 1515    2017-06-13 17:15:34 [163]

<font color="red">ez?</font>


MoparMan | 1515    2017-06-13 16:24:24 [162]

Gegegdh eheh & urjjd ruud < >


MoparMan | 1515    2017-06-13 16:19:50 [161]

x < 40


MoparMan | 1515    2017-04-09 23:49:40 [160]

http://www.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf[/pdf] ]TEXT LINK


MoparMan | 1515    2017-04-09 23:49:25 [159]

[pdf]http://www.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf[/pdf]


MoparMan | 1515    2017-04-09 23:38:50 [158]

[pdf]http://www.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf www.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf ftp.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf ftps.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf ftp://www.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf ftps://www.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf ftps://ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf[/pdf]


MoparMan | 1515    2017-04-09 23:36:52 [157]

[pdf]http://www.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf

TEXT LINK

http://www.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf

www.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf

TEXT LINK 2

www.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf

ftp.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf

ftps.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf

ftp://www.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf

ftps://www.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf

ftps://ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf

TXT LINK

ftps://www.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf[/pdf]


MoparMan | 1515    2017-04-09 23:36:32 [156]

[pdf]http://www.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf

TEXT LINK

http://www.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf

www.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf

TEXT LINK 2

www.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf

ftp.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf

ftps.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf

ftp://www.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf

ftps://www.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf

ftps://ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf

TXT LINK

ftps://www.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf[/pdf]


MoparMan | 1515    2017-04-09 23:33:59 [155]


MoparMan | 1515    2017-04-09 23:33:00 [154]

[pdf]http://www.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf TEXT LINK http://www.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf www.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf TEXT LINK 2 www.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf ftp.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf ftps.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf ftp://www.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf ftps://www.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf ftps://ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf TXT LINK ftps://www.ware-tech.com/kr/_library/document/servo/samsung/CSD3%20Servo%20User%20Manual_en.pdf[/pdf]

MoparMan | 1515    2017-04-09 23:24:33 [153]

[pdf]$&[/pdf] [/url]


MoparMan | 1515    2017-04-05 21:58:01 [152]

Uraim! köszönöm a tesztet. Sikerrel zártunk.


MoparMan | 1515    2017-04-05 21:49:36 [151]

volt még egy hiba mit el kellett hárítani
ha pl már megvolt a 10 klikk, de pl valakinél még úgy állt az oldal hogy mondjuk 9-et mutatott, akkor ugye ő tudott rá nyomni és akkor 11 lett.
az a nyomorult meg úgy volt megírva, hogy ha a számláló nagyobb-egyenlő tíz, akkor elvett egyet a postjaid számából és hozzáadott egyet a töröltekhez
így ha a fenti bekövetkezett akkor +2 és mínusz kettő, azaz helytelen a post számlálód állása

szóval ez is kijavítva. ha fenti eset fennáll és klikkelnek, azt már nem fogja számolni, mer előtte vizsgálom meg az aktuális állást

[Előzmény:] PSoft, 2017-04-05 21:39:38 [148]


jani300 | 5346    2017-04-05 21:45:07 [150]

De látjuk ! Még Ki a bátor
Egyébként nemrég láttam a gyermekemet veblappal dolgozni , keres egy hibát ...

[Előzmény:] PSoft, 2017-04-05 21:39:38 [148]


Danibá60 | 3780    2017-04-05 21:42:16 [149]

Így nem beszélünk, töröljük.

[Előzmény:] MoparMan, 2017-04-05 21:36:43 [147]


PSoft | 9505    2017-04-05 21:39:38 [148]

Most, megint törölhető vagy!
Nyomjak?

[Előzmény:] MoparMan, 2017-04-05 21:36:43 [147]


MoparMan | 1515    2017-04-05 21:36:43 [147]

jó, akkor csináld úgy mint délelőtt.
egyrészt a kód azon részén semmi sem változott, másrészt kurvára mindegy mert úgy sem lesz mit látni.
faszommá

[Előzmény:] szf, 2017-04-05 21:28:03 [145]


MoparMan | 1515    2017-04-05 21:35:40 [146]

kurva zárójel-erdő
egy ")" hiányzott

[Előzmény:] svager, 2017-04-05 21:27:38 [143]


szf | 1279    2017-04-05 21:28:03 [145]

Délelőtt megmutatta!

[Előzmény:] MoparMan, 2017-04-05 21:27:15 [142]


Sz.József | 2809    2017-04-05 21:27:47 [144]

Igen, a pirosra gondoltam..., Ok...

A 24 órás limit az biztos, hogy elégséges?
Csak arra gondoltam, van aki 2-3 naponta olvassa a fórumot...

[Előzmény:] MoparMan, 2017-04-05 21:24:07 [139]

svager | 987    2017-04-05 21:27:38 [143]

Már megint nem lehet törölni.


MoparMan | 1515    2017-04-05 21:27:15 [142]

mert androidon nem tudsz olyat csinálni hogy "ráhúzod az egérmutatót"

[Előzmény:] szf, 2017-04-05 21:24:44 [140]


szf | 1279    2017-04-05 21:25:27 [141]

Akkor nem érdekes a beíràsom

[Előzmény:] MoparMan, 2017-04-05 21:24:07 [139]


szf | 1279    2017-04-05 21:24:44 [140]

Laptopon kiírja kik törölték,androidon nem.
Ha esetleg van jelentősége.


MoparMan | 1515    2017-04-05 21:24:07 [139]

ha a piros kijelzésre gondolsz, akkor nem, nem lesz látható

[Előzmény:] Sz.József, 2017-04-05 21:21:00 [138]


Sz.József | 2809    2017-04-05 21:21:00 [138]

Rosszul kérdeztem...
A törlések száma (hogy hol tart) meg fog maradni?

[Előzmény:] MoparMan, 2017-04-05 21:19:09 [137]


MoparMan | 1515    2017-04-05 21:19:09 [137]

a sorszámozás fix, a törölt postok hiányoznak a sorból

[Előzmény:] Sz.József, 2017-04-05 21:18:34 [135]


PSoft | 9505    2017-04-05 21:18:50 [136]

Mindent...tesztelni kell!

[Előzmény:] Devecz Miklós, 2017-04-05 21:16:36 [134]


Sz.József | 2809    2017-04-05 21:18:34 [135]

A sorszámozás az meg fog maradni?

[Előzmény:] MoparMan, 2017-04-05 21:12:27 [130]


Devecz Miklós | 1776    2017-04-05 21:16:36 [134]

Kiengedted a szellemet a palackból. (#127)

[Előzmény:] MoparMan, 2017-04-05 21:12:49 [131]

PSoft | 9505    2017-04-05 21:15:02 [133]

Most, nyomjatok erre törlést!
(én már, megtettem)

[Törölt vagy nem létező bejegyzés linkje]


RogerCo | 1033    2017-04-05 21:14:13 [132]

Megvolt a 10

[Előzmény:] MoparMan, 2017-04-05 21:08:10 [126]


MoparMan | 1515    2017-04-05 21:12:49 [131]

de, jelölhetsz

[Előzmény:] Csuhás, 2017-04-05 21:11:10 [128]


MoparMan | 1515    2017-04-05 21:12:27 [130]

mivel nem marad publikus, igy azt nem programoztam le, hogy azonnal változzon, igy csak ujratöltés után látod a változást

[Előzmény:] Csuhás, 2017-04-05 21:11:10 [128]


MoparMan | 1515    2017-04-05 21:11:46 [129]

na, szuper, elmúlt a kedvenced is

[Előzmény:] Csuhás, 2017-04-05 21:05:57 [125]


  Fórum főoldal  |  A lap tetejére

Időrend:
Oldal 1 / 4   Sorok:
1  2  3  4   Következő ►  Utolsó ►|