This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.
Show posts MenuNETWEBGET("http://www.deuteriumoxid.com/_wp_generated", "/"+"wp0cc74617.png", 80, "bild.png")
// --------------------------------- //
// Project: Polytest
// Start: Tuesday, August 03, 2010
// IDE Version: 8.054
SETCURRENTDIR("Media") // seperate media and binaries?
SYSTEMPOINTER TRUE
TYPE tpol
ax1 = 0
ax2 = 0
ax3 = 0
ax4 = 0
ay1 = 0
ay2 = 0
ay3 = 0
ay4 = 0
bx1 = 0
bx2 = 0
bx3 = 0
bx4 = 0
by1 = 0
by2 = 0
by3 = 0
by4 = 0
id%
x%
y%
FUNCTION m_init_spritesize:
LOCAL l_x%,l_y%
GETSPRITESIZE self.id,l_x,l_y
self.ax3 = l_x
self.ax4 = l_x
self.bx3 = l_x
self.bx4 = l_x
self.ay2 = l_y
self.ay3 = l_y
self.by2 = l_y
self.by3 = l_y
ENDFUNCTION
FUNCTION m_draw_poly:
STARTPOLY 0,0
//POLYVECTOR self.x + self.ax1, self.y + self.ay1, self.x + self.bx1, self.y + self.by1 , RGB(0x00, 0x00, 0xff)
//POLYVECTOR self.x + self.ax2, self.y + self.ay2, self.x + self.bx2, self.y + self.by2 , RGB(0x80, 0xff, 0xff)
//POLYVECTOR self.x + self.ax3, self.y + self.ay3, self.x + self.bx3, self.y + self.by3 , RGB(0x80, 0xff, 0xff)
//POLYVECTOR self.x + self.ax4, self.y + self.ay4, self.x + self.bx4, self.y + self.by4 , RGB(0x00, 0x00, 0xff)
POLYVECTOR self.x + self.ax1, self.y + self.ay1, self.x + self.ax1, self.y + self.ay1 , RGB(0x00, 0x00, 0xff)
POLYVECTOR self.x + self.ax2, self.y + self.ay2, self.x + self.ax2, self.y + self.ay2 , RGB(0x80, 0xff, 0xff)
POLYVECTOR self.x + self.ax3, self.y + self.ay3, self.x + self.ax3, self.y + self.ay3 , RGB(0x80, 0xff, 0xff)
POLYVECTOR self.x + self.ax4, self.y + self.ay4, self.x + self.ax4, self.y + self.ay4 , RGB(0x00, 0x00, 0xff)
ENDPOLY
ENDFUNCTION
ENDTYPE
GLOBAL p AS tpol
GLOBAL mx,my,b1,b2
LOADSPRITE "icon.png",0
p.id = 0 // Sprite ID
p.m_init_spritesize() // Grösse von Polyvector an das sprite anpassen
WHILE TRUE
MOUSESTATE mx,my,b1,b2
p.m_draw_poly() // Polyvector zeichnen
// Position von der mouse übergeben
p.x = mx
p.y = my
SHOWSCREEN
WEND
Quotefabbio@fabbio:~$ cd /home/fabbio/Downloads/fritz
fabbio@fabbio:~/Downloads/fritz$ ./install
make: Gehe in Verzeichnis '/home/fabbio/Downloads/fritz/src'
rm -f main.o driver.o tools.o lib.o buffers.o wext.o
rm -f fwlanusb.o fwlanusb.ko
make: Verlasse Verzeichnis '/home/fabbio/Downloads/fritz/src'
make: Gehe in Verzeichnis '/home/fabbio/Downloads/fritz/src'
make -C /lib/modules/2.6.32-21-generic/build SUBDIRS=/home/fabbio/Downloads/fritz/src modules
make[1]: Betrete Verzeichnis '/usr/src/linux-headers-2.6.32-21-generic'
CC [M] /home/fabbio/Downloads/fritz/src/main.o
In file included from /home/fabbio/Downloads/fritz/src/tools.h:30,
from /home/fabbio/Downloads/fritz/src/main.c:31:
/home/fabbio/Downloads/fritz/src/defs.h:63: error: redefinition of typedef 'uintptr_t'
include/linux/types.h:41: note: previous declaration of 'uintptr_t' was here
make[2]: *** [/home/fabbio/Downloads/fritz/src/main.o] Fehler 1
make[1]: *** [_module_/home/fabbio/Downloads/fritz/src] Fehler 2
make[1]: Verlasse Verzeichnis '/usr/src/linux-headers-2.6.32-21-generic'
make: *** [fwlanusb.o] Fehler 2
make: Verlasse Verzeichnis '/home/fabbio/Downloads/fritz/src'
make: Gehe in Verzeichnis '/home/fabbio/Downloads/fritz/src'
cp: Aufruf von stat für ,,fwlanusb.ko" nicht möglich: No such file or directory
make: *** [install] Fehler 1
make: Verlasse Verzeichnis '/home/fabbio/Downloads/fritz/src'
fabbio@fabbio:~/Downloads/fritz$
Quote"E:\Basic\Projekte\GLBasic_Projekte\GLBasic\MyCLS\MyCLS.app\MyCLS.exe" E:\Basic\Projekte\GLBasic_Projekte\GLBasic\MyCLS\MyCLS.app\icon.pngConsole:
QuoteE:\Basic\Projekte\GLBasic_Projekte\GLBasic\MyCLS\MyCLS.app\MyCLS.exe E:\Basic\Projekte\GLBasic_Projekte\GLBasic\MyCLS\MyCLS.app\icon.png
QuoteE:\Basic\Projekte\GLBasic_Projekte\GLBasic\MyCLS\MyCLS.app\icon.png
cls$ = GETCOMMANDLINE$()
cls$ = My_CLS_CONSOLE$(cls$)
FUNCTION My_CLS_CONSOLE$ : l_in$
LOCAL l_out$
LOCAL l_count%
l_out$ = MID$(l_in$,0,3) // 0 für console, 1 für Graphicmodus
l_count% = INSTR(l_in$," "+l_out$,0)
l_out$ = MID$(l_in$,l_count%+1)
RETURN l_out$
ENDFUNCTION
FUNCTION My_CLS_GLB$ : l_in$
LOCAL l_out$
LOCAL l_count%
l_out$ = MID$(l_in$,1,3) // 0 für console, 1 für Graphicmodus
l_count% = INSTR(l_in$," "+l_out$,0)
l_out$ = MID$(l_in$,l_count%+1)
RETURN l_out$
ENDFUNCTION
WHILE TRUE
CLEARSCREEN RGB(0x80, 0x80, 0xff)
PRINT "Hallo Lilla", 10,10
SHOWSCREEN
WEND
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html lang="en">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
<meta name="Generator" content="MySelf">
<title>Home</title>
<style type="text/css">
</style>
<script type="text/javascript" language="JScript">
function OpenPaint()
{
var volume = "E:\\NDS\FileMaker.exe";
alert(volume);
var WshShell = new ActiveXObject("WScript.Shell");
var oExec = WshShell.Exec(volume);
while (oExec.Status == 0)
{
WScript.Sleep(100);
}
WScript.Echo(oExec.Status);
}
</script>
</head>
<body text="#000000" style="background: #ffffff; text-align:center; height:1000px;
<a href="#" onClick="OpenPaint()">FileMaker.exe</a>
<div style="background: transparent; position:relative;width:750px;height:1000px;margin-left:auto;margin-right:auto;">
</div>
</body>
</html>
Quote
Sehr geehrter SoftMaker-Kunde,
-------------------------------------------------------------------------
Wir verschenken SoftMaker Office 2008 und spenden für jeden Download!
-------------------------------------------------------------------------
In diesem Jahr gibt's die Geschenke schon vor Weihnachten. Von heute
bis zum 31. Dezember 2009 stellt SoftMaker die Software SoftMaker Office
2008 für Windows als dauerhaft nutzbare und voll upgradeberechtigte
Version auf www.loadandhelp.de zum kostenlosen Download zur Verfügung.
Für jeden Download spendet SoftMaker zehn Cents an weltweite
Hilfsprojekte auf www.betterplace.org.
-------------------------------------------------------------------------
Volle Transparenz gewährleistet
-------------------------------------------------------------------------
Volle Transparenz: Sie erfahren auf unserer Website tagesaktuell, welche
Hilfsprojekte mit dem von SoftMaker gespendeten Geld gefördert werden.
-------------------------------------------------------------------------
Wir bitten auch um Ihre Mithilfe
-------------------------------------------------------------------------
Berichten Sie bitte Freunden und Kollegen von dieser Aktion, posten Sie
auf Facebook und Twitter, schreiben Sie in Webforen über uns ... alles,
was Ihnen einfällt!
Weitere Informationen:
http://www.loadandhelp.de
Mit freundlichen Grüßen
Ihr
SoftMaker-Team
Quotecommand not inside function or sub
WHILE TRUE
SHOWSCREEN
setbackground(800,600)
settable(0,0)
WEND
FUNCTION setbackground: lx%,ly%,lrgb% = RGB(236,233,216)
STARTPOLY -1 // Bitmap = Nr.0
POLYVECTOR 0, 0, 0, 0, lrgb //RGB(236,233,216)
POLYVECTOR 0, ly, 0, ly, lrgb //RGB (236,233,216)
POLYVECTOR lx, ly, lx, ly, lrgb // RGB(236,233,216)
POLYVECTOR lx, 0, lx, 0, lrgb //RGB(236,233,216)
ENDPOLY
ENDFUNCTION
FUNCTION settable: lposx%, lposy%, lx% = 150 , ly% = 600 , lrgb% = RGB(216,213,206)
STARTPOLY -1 // Bitmap = Nr.0
POLYVECTOR lposx, lposy, lposx, lposy, lrgb
POLYVECTOR lposx, lposy+ly, lposx, lposy+ly, lrgb
POLYVECTOR lposx+lx,lposy+ly,lposx+lx,lposy+ly, lrgb
POLYVECTOR lposx+lx, lposy,lposx+lx, lposy, lrgb
ENDPOLY
ENDFUNCTION
Quote// .mm Dateien werden als C++ interpretiert für Win32
global a% = 100
a = a - 1
Global b% = a ///Hier sollte b den wert 99 habe, aber er hat 100
// erst wenn ich das noch mache geht es
b = a