cppman Posted March 28, 2006 Share Posted March 28, 2006 (edited) I Finnally finished a project(lol).I Wrote a UDF for creating shapes like, Cube, Sphere, and Cylinder.(They're not all that great but i tried).That is a little picture of what it draws....Right now, im really focusing on creating Particle Effects Such as:Rain, Fireworks, Fire, and Space.also, it contains functions for games like:SetLives($Object)SetHealth($Object)SetScore($Object)GetLives()GetHealth()GetScore()and so forth...another useful thing i did was:Global Const $c_maroon = 0X800000 Global Const $c_yellow = 0XFFFF00 Global Const $key_Enter = '0D' Global Const $key_LeftMouse = '01' Global Const $key_RightMouse = '02' Global Const $key_Backspace = '08' Global Const $key_Shift = '10' Global Const $key_2 = '32' Global Const $key_8 = '38' Global Const $key_9 = '39'so u don't have to remember the color's hex or decimal value...and$key_# = '#' so u don't have to memorize a key's code... just use something like: $key_9, that would be keycode '39'.also, there are highscore functions, that are not completely finished yet. I am still working on it but, i kinda wanted to get people's opinion on the way im going...Later im going to try to create alot of the functions that 'Game Maker' contains. http://www.gamemaker.nlbut here is what i have finished so far... Edited March 28, 2006 by CHRIS95219 Miva OS Project Link to comment Share on other sites More sharing options...
RazerM Posted March 28, 2006 Share Posted March 28, 2006 (edited) i was looking forward to this but i get these errors C:\Documents and Settings\FrazerMcLean\Desktop\a2d\A2D.au3(58,10) : ERROR: syntax error $Hex = 0x ~~~~~~~~^ C:\Documents and Settings\FrazerMcLean\Desktop\a2d\A2D.au3(190,37) : WARNING: $SurfaceColor: possibly used before declaration. GUICtrlSetBkColor(-1, $SurfaceColor) ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^ C:\Documents and Settings\FrazerMcLean\Desktop\a2d\A2D.au3(74,41) : WARNING: $SurfaceColor: declared global in function only. Prefer top of file. Global $SurfaceColor = $BackgroundColor ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^ C:\Documents and Settings\FrazerMcLean\Desktop\a2d\A2D.au3(507,35) : ERROR: _IsPressed(): undefined function. If _IsPressed ($Key, "user32.dll") ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^ C:\Documents and Settings\FrazerMcLean\Desktop\a2d\Example.au3 - 2 error(s), 2 warning(s) Ive fixed it the example needs to have Misc.au3 for _IsPressed ;Example Script for A2D #include "A2D.au3" #Include <Misc.au3> $Surface = Surface_Create(0x000000) Draw_Text($surface, 155, 25, $c_white, 25, "Comic Sans MS", "A2D Graphics Library!") Draw_Cube($Surface, 25, 25, 15, 95, 95, $c_red) Draw_Sphere($Surface, 600, 25, 50, $c_green) Draw_Spectrum($Surface, 0, 150, 700) GUISetState() While 1 WEnd Here is the A2d.au3 fixed (one variable didnt match up in a function and you had Global in a function, I also had to add quotes to "0x & $reg & $green & $blue" CODE;;;;;; ;Color Functions ;;;;;; #include <array.au3> #include <guiconstants.au3> Global Const $c_aqua = 0X00FFFF Global Const $c_black = 0X000000 Global Const $c_blue = 0X0000FF Global Const $c_dkgray = 0X808080 Global Const $c_fuchsia = 0XFF00FF Global Const $c_gray = 0X808080 Global Const $c_green = 0X00FF00 Global Const $c_lime = 0X00FF00 Global Const $c_ltgray = 0XC0C0C0 Global Const $c_maroon = 0X800000 Global Const $c_navy = 0X000080 Global Const $c_olive = 0X808000 Global Const $c_purple = 0X800080 Global Const $c_red = 0XFF0000 Global Const $c_silver = 0XC0C0C0 Global Const $c_teal = 0X008080 Global Const $c_white = 0XFFFFFF Global Const $c_yellow = 0XFFFF00 Global Const $key_Enter = '0D' Global Const $key_LeftMouse = '01' Global Const $key_RightMouse = '02' Global Const $key_Backspace = '08' Global Const $key_Shift = '10' Global Const $key_Ctrl = '11' Global Const $key_Alt = '12' Global Const $key_Pause = '13' Global Const $key_Caps = '14' Global Const $key_Esc = '1B' Global Const $key_Spacebar = '20' Global Const $key_LeftArrow = '25' Global Const $key_UpArrow = '26' Global Const $key_RightArrow = '27' Global Const $key_DownArrow = '28' Global Const $key_0 = '30' Global Const $key_1 = '31' Global Const $key_2 = '32' Global Const $key_3 = '33' Global Const $key_4 = '34' Global Const $key_5 = '35' Global Const $key_6 = '36' Global Const $key_7 = '37' Global Const $key_8 = '38' Global Const $key_9 = '39' ; ------------------------------------------------------------------------------ ; ; AutoIt Version: 3.1.1 (beta) ; Language: English ; Author(s): chris95219 ; Description: Combines the Ged green blue values to create 1 solid color. ; ; ------------------------------------------------------------------------------ Func RGBCombine ($Red, $Blue, $Green) $Hex = "0x & $Red & $Blue & $Green" Return Int($Hex) EndFunc ;==>RGBCombine ;;;;; ;Shape Functions ;;;;; ; ------------------------------------------------------------------------------ ; ; AutoIt Version: 3.1.1 (beta) ; Language: English ; Author(s): chris95219 ; Description: Creates a surface to draw and do other functions on. ; ; ------------------------------------------------------------------------------ Func Surface_Create ($BackgroundColor) $SurfaceGUI = GUICreate("SurfaceGUI", 700, 700) $SurfaceColor = $BackgroundColor Dim $Array[2] $Array[0] = GUICtrlCreateGraphic(0, 0, 700, 700) $Array[1] = GUICtrlSetBkColor(-1, $BackgroundColor) Return $Array[0] EndFunc ;==>Surface_Create ; ------------------------------------------------------------------------------ ; ; AutoIt Version: 3.1.1 (beta) ; Language: English ; Author(s): chris95219 ; Description: Creates an object and returns an array with 4 elements: ; [0] = Object ID. ; [1] = Lives ; [2] = Health ; [3] = Score ; ------------------------------------------------------------------------------ Func Object_Create ($Image, $ILives, $IHealth, $IScore, $x, $y, $width, $height) Global $ILives, $IHealth, $IScore Return _ArrayCreate (GUICtrlCreatePic($Image, $x, $y, $width, $height), $ILives, $IHealth, $IScore) EndFunc ;==>Object_Create ; ------------------------------------------------------------------------------ ; ; AutoIt Version: 3.1.1 (beta) ; Language: English ; Author(s): chris95219 ; Description: Deletes the specified Object. ; ; ------------------------------------------------------------------------------ Func Object_Delete ($ObjectID) Return GUICtrlDelete($ObjectID) EndFunc ;==>Object_Delete ; ------------------------------------------------------------------------------ ; ; AutoIt Version: 3.1.1 (beta) ; Language: English ; Author(s): chris95219 ; Description: Check to see if a surface exists. ; ; ------------------------------------------------------------------------------ Func Surface_Exists ($surface) If IsInt($surface) Then Return 1 Else Return -1 EndIf EndFunc ;==>Surface_Exists ; ------------------------------------------------------------------------------ ; ; AutoIt Version: 3.1.1 (beta) ; Language: English ; Author(s): chris95219 ; Description: Draws a pixel(point) at the specified x and y location on the specified surface. ; ; ------------------------------------------------------------------------------ Func Draw_Point ($surface, $x, $y) Return GUICtrlSetGraphic($surface, $GUI_GR_PIXEL, $x, $y) EndFunc ;==>Draw_Point ; ------------------------------------------------------------------------------ ; ; AutoIt Version: 3.1.1 (beta) ; Language: English ; Author(s): chris95219 ; Description: Draws a line from x1, y1 to x2, y2 on the specified surface. ; ; ------------------------------------------------------------------------------ Func Draw_Line ($surface, $x1, $y1, $x2, $y2) GUICtrlSetGraphic($surface, $GUI_GR_MOVE, $x1, $y1) Return GUICtrlSetGraphic($surface, $GUI_GR_LINE, $x2, $y2) EndFunc ;==>Draw_Line ; ------------------------------------------------------------------------------ ; ; AutoIt Version: 3.1.1 (beta) ; Language: English ; Author(s): chris95219 ; Description: Draws a rectangle from x1, y1 to x2, y2 on the specified surface with the specified color. ; ; ------------------------------------------------------------------------------ Func Draw_Rectangle ($surface, $x1, $y1, $x2, $y2, $OutlineColor) GUICtrlSetGraphic($surface, $GUI_GR_COLOR, $OutlineColor, -1) Return GUICtrlSetGraphic($surface, $GUI_GR_RECT, $x1, $y1, $x2, $y2) EndFunc ;==>Draw_Rectangle ; ------------------------------------------------------------------------------ ; ; AutoIt Version: 3.1.1 (beta) ; Language: English ; Author(s): chris95219 ; Description: Draws a simple circle at position x, y with the specified radius and outline color. ; ; ------------------------------------------------------------------------------ Func Draw_Circle ($surface, $x, $y, $r, $OutlineColor) GUICtrlSetGraphic($surface, $GUI_GR_COLOR, $OutlineColor, -1) Return GUICtrlSetGraphic($surface, $GUI_GR_ELLIPSE, $x, $y, $r, $r) EndFunc ;==>Draw_Circle ; ------------------------------------------------------------------------------ ; ; AutoIt Version: 3.1.1 (beta) ; Language: English ; Author(s): chris95219 ; Description: Draws an Ellipse on the specified surface from x1, y1 to x2, y2 with the specified outline color. ; ; ------------------------------------------------------------------------------ Func Draw_Ellipse ($surface, $x1, $y1, $x2, $y2, $OutlineColor) GUICtrlSetGraphic($surface, $GUI_GR_COLOR, $OutlineColor, -1) Return GUICtrlSetGraphic($surface, $GUI_GR_ELLIPSE, $x1, $y1, $x2, $y2) EndFunc ;==>Draw_Ellipse ; ------------------------------------------------------------------------------ ; ; AutoIt Version: 3.1.1 (beta) ; Language: English ; Author(s): chris95219 ; Description: Draws text with the specified font, color and surface at position x, y. ; ; ------------------------------------------------------------------------------ Func Draw_Text ($surface, $x, $y, $color, $size, $font, $text) GUICtrlCreateLabel($text, $x, $y, StringLen($text)^2, $size*2, bitAND($WS_EX_TRANSPARENT, $WS_EX_TRANSPARENT)) GUICtrlSetBkColor(-1, $Surface) GUICtrlSetColor(-1, $color) GUICtrlSetFont(-1, $size, -1, -1, $font) EndFunc ;==>Draw_Text ; ------------------------------------------------------------------------------ ; ; AutoIt Version: 3.1.1 (beta) ; Language: English ; Author(s): chris95219 ; Description: Draws a 3D-Like Cube ; ; ------------------------------------------------------------------------------ Func Draw_Cube ($surface, $x, $y, $offset, $width, $height, $color) GUICtrlSetGraphic($surface, $GUI_GR_COLOR, $color, -1) GUICtrlSetGraphic($surface, $GUI_GR_RECT, $x + 0, $y + 0, $width + 0, $height + 0) GUICtrlSetGraphic($surface, $GUI_GR_RECT, $x + $offset + 0, $y + $offset + 0, $width + 0, $height + 0) GUICtrlSetGraphic($surface, $GUI_GR_MOVE, $x + 0, $y + 0) GUICtrlSetGraphic($surface, $GUI_GR_LINE, $x + $offset + 0, $y + $offset + 0) GUICtrlSetGraphic($surface, $GUI_GR_MOVE, $x + $width, $y + 0) GUICtrlSetGraphic($surface, $GUI_GR_LINE, $x + $offset + $width + 0, $y + $offset + 0) GUICtrlSetGraphic($surface, $GUI_GR_MOVE, $x + 0, $y + $height + 0) GUICtrlSetGraphic($surface, $GUI_GR_LINE, $x + $offset + 0, $y + $offset + $width + 0) GUICtrlSetGraphic($surface, $GUI_GR_MOVE, $x + $width + 0, $y + $height + 0) GUICtrlSetGraphic($surface, $GUI_GR_LINE, $x + $offset + $width + 0, $y + $offset + $width + 0) EndFunc ;==>Draw_Cube Func Draw_Spectrum($Surface, $x, $y, $width) GUICtrlSetGraphic($Surface, $GUI_GR_MOVE, $x, $y) GUICtrlSetGraphic($Surface, $GUI_GR_COLOR, $c_red, -1) GUICtrlSetGraphic($Surface, $GUI_GR_LINE, $x+$width, $y) GUICtrlSetGraphic($Surface, $GUI_GR_MOVE, $x, $y+1) GUICtrlSetGraphic($Surface, $GUI_GR_COLOR, $c_green, -1) GUICtrlSetGraphic($Surface, $GUI_GR_LINE, $x+$width, $y+1) GUICtrlSetGraphic($Surface, $GUI_GR_MOVE, $x, $y+2) GUICtrlSetGraphic($Surface, $GUI_GR_COLOR, $c_blue, -1) GUICtrlSetGraphic($Surface, $GUI_GR_LINE, $x+$width, $y+2) EndFunc ; ------------------------------------------------------------------------------ ; ; AutoIt Version: 3.1.1 (beta) ; Language: English ; Author(s): chris95219 ; Description: Draws a 2D-like sphere. ; ; ------------------------------------------------------------------------------ Func Draw_Sphere ($surface, $x, $y, $r, $color) GUICtrlSetGraphic($surface, $GUI_GR_COLOR, $color, -1) GUICtrlSetGraphic($surface, $GUI_GR_ELLIPSE, $x, $y, $r, $r) GUICtrlSetGraphic($surface, $GUI_GR_COLOR, $color) GUICtrlSetGraphic($surface, $GUI_GR_ELLIPSE, $x, $y + 20, $r - 1, $r / 5) EndFunc ;==>Draw_Sphere ; ------------------------------------------------------------------------------ ; ; AutoIt Version: 3.1.1 (beta) ; Language: English ; Author(s): chris95219 ; Description: Draws a 2D-Like Cylinder ; ; ------------------------------------------------------------------------------ Func Draw_Cylinder ($surface, $x, $y, $r, $height, $color) GUICtrlSetGraphic($surface, $GUI_GR_COLOR, $color, -1) GUICtrlSetGraphic($surface, $GUI_GR_ELLIPSE, $x, $y, $r, $r / 2) GUICtrlSetGraphic($surface, $GUI_GR_ELLIPSE, $x, $y + $height, $r, $r / 2) GUICtrlSetGraphic($surface, $GUI_GR_MOVE, $x, $y + 10) GUICtrlSetGraphic($surface, $GUI_GR_LINE, $x, $y + $height + 10) GUICtrlSetGraphic($surface, $GUI_GR_MOVE, $x + $r, $y + 10) GUICtrlSetGraphic($surface, $GUI_GR_LINE, $x + $r, $y + $height + 10) EndFunc ;==>Draw_Cylinder ; ------------------------------------------------------------------------------ ; ; AutoIt Version: 3.1.1 (beta) ; Language: English ; Author(s): chris95219 ; Description: Sets the background color for the specified surface. ; ; ------------------------------------------------------------------------------ Func Draw_BackgroundColor ($surface, $color) Global $Background = GUICtrlSetBkColor($surface, $color) EndFunc ;==>Draw_BackgroundColor ;;;;; ;Game Functions ;;;;; ; ------------------------------------------------------------------------------ ; ; AutoIt Version: 3.1.1 (beta) ; Language: English ; Author(s): chris95219 ; Description: Add an entry to the Highscore table. ; ; ------------------------------------------------------------------------------ Func CreateHighscoreEntry ($name, $score, $section) $EntryName = $name $EntryScore = $score IniWrite("Table.ini", $section, "EntryName", $EntryName) IniWrite("Table.ini", $section, "EntrySCore", $EntryScore) EndFunc ;==>CreateHighscoreEntry ; ------------------------------------------------------------------------------ ; ; AutoIt Version: 3.1.1 (beta) ; Language: English ; Author(s): chris95219 ; Description: Shows the Highscore Table. ; ; ------------------------------------------------------------------------------ Func ShowHighscore ($BackgroundColor, $Font, $NewColor, $OldColor) #include <GUIConstants.au3> ; == GUI generated with Koda == $Scores = GUICreate("Highscores", 228, 378, 340, 149) GUICtrlCreateLabel(IniRead("Table.ini", "1", "EntryName", "No One Special"), 16, 32, 41, 17) GUICtrlCreateLabel(IniRead("Table.ini", "2", "EntryName", "No One Special"), 16, 64, 41, 17) GUICtrlCreateLabel(IniRead("Table.ini", "3", "EntryName", "No One Special"), 16, 96, 41, 17) GUICtrlCreateLabel(IniRead("Table.ini", "4", "EntryName", "No One Special"), 16, 128, 41, 17) GUICtrlCreateLabel(IniRead("Table.ini", "5", "EntryName", "No One Special"), 16, 160, 41, 17) GUICtrlCreateLabel(IniRead("Table.ini", "6", "EntryName", "No One Special"), 16, 192, 41, 17) GUICtrlCreateLabel(IniRead("Table.ini", "7", "EntryName", "No One Special"), 16, 224, 41, 17) GUICtrlCreateLabel(IniRead("Table.ini", "8", "EntryName", "No One Special"), 16, 256, 41, 17) GUICtrlCreateLabel(IniRead("Table.ini", "9", "EntryName", "No One Special"), 16, 288, 41, 17) GUICtrlCreateLabel(IniRead("Table.ini", "10", "EntryName", "No One Special"), 16, 320, 47, 17) $Button1 = GUICtrlCreateButton("Okay", 48, 352, 129, 25) GUICtrlCreateLabel(IniRead("Table.ini", "1", "EntryScore", "No One Special"), 160, 32, 41, 17) GUICtrlCreateLabel(IniRead("Table.ini", "2", "EntryScore", "No One Special"), 160, 64, 41, 17) GUICtrlCreateLabel(IniRead("Table.ini", "3", "EntryScore", "No One Special"), 160, 96, 41, 17) GUICtrlCreateLabel(IniRead("Table.ini", "4", "EntryScore", "No One Special"), 160, 128, 41, 17) GUICtrlCreateLabel(IniRead("Table.ini", "5", "EntryScore", "No One Special"), 160, 160, 41, 17) GUICtrlCreateLabel(IniRead("Table.ini", "6", "EntryScore", "No One Special"), 160, 192, 41, 17) GUICtrlCreateLabel(IniRead("Table.ini", "7", "EntryScore", "No One Special"), 160, 224, 41, 17) GUICtrlCreateLabel(IniRead("Table.ini", "8", "EntryScore", "No One Special"), 160, 256, 41, 17) GUICtrlCreateLabel(IniRead("Table.ini", "9", "EntryScore", "No One Special"), 160, 288, 41, 17) GUICtrlCreateLabel(IniRead("Table.ini", "10", "EntryScore", "No One Special"), 160, 320, 47, 17) GUICtrlCreateLabel("Highscores", 80, 8, 57, 17) GUISetState(@SW_SHOW) While 1 $msg = GUIGetMsg() Select Case $msg = $GUI_EVENT_CLOSE ExitLoop Case $msg = $Button1 GUIDelete($Scores) EndSelect WEnd GUIDelete($Scores) EndFunc ;==>ShowHighscore ; ------------------------------------------------------------------------------ ; ; AutoIt Version: 3.1.1 (beta) ; Language: English ; Author(s): chris95219 ; Description: Reset the Highscore table.(erases *ALL* highscores). ; ; ------------------------------------------------------------------------------ Func ResetHighscore () For $i = 1 to 10 IniDelete("Table.ini", $i, "EntryName") IniDelete("Table.ini", $i, "EntryScore") Next EndFunc ;==>ResetHighscore ; ------------------------------------------------------------------------------ ; ; AutoIt Version: 3.1.1 (beta) ; Language: English ; Author(s): chris95219 ; Description: Delete a specified highscore entry. ; ; ------------------------------------------------------------------------------ Func DeleteHighscoreEntry ($section) IniDelete("Table.ini", $section, "EntryName") IniDelete("Table.ini", $section, "EntryScore") EndFunc ;==>DeleteHighscoreEntry ; ------------------------------------------------------------------------------ ; ; AutoIt Version: 3.1.1 (beta) ; Language: English ; Author(s): chris95219 ; Description: Sets the number of lives for an object(control). ; ; ------------------------------------------------------------------------------ Func SetLives ($Object, $Lives) $Object[1] = $Lives EndFunc ;==>SetLives ; ------------------------------------------------------------------------------ ; ; AutoIt Version: 3.1.1 (beta) ; Language: English ; Author(s): chris95219 ; Description: Returns the number of lives of an object(control). ; ; ------------------------------------------------------------------------------ Func GetLives ($Object) Return $Object[1] EndFunc ;==>GetLives ; ------------------------------------------------------------------------------ ; ; AutoIt Version: 3.1.1 (beta) ; Language: English ; Author(s): chris95219 ; Description: Adds the specified amount of lives to the already existing amount of lives. ; ; ------------------------------------------------------------------------------ Func AddLives ($Object, $Lives) $Object[1] = $Object[1] + $Lives EndFunc ;==>AddLives ; ------------------------------------------------------------------------------ ; ; AutoIt Version: 3.1.1 (beta) ; Language: English ; Author(s): chris95219 ; Description: Sets the health of the specified object(control) to the specified percentage. ; ; ------------------------------------------------------------------------------ Func SetHealth ($Object, $Health) $Object[2] = $Health EndFunc ;==>SetHealth ; ------------------------------------------------------------------------------ ; ; AutoIt Version: 3.1.1 (beta) ; Language: English ; Author(s): chris95219 ; Description: Returns the health of a certain object(control). ; ; ------------------------------------------------------------------------------ Func GetHealth ($Object) Return $Object[2] EndFunc ;==>GetHealth ; ------------------------------------------------------------------------------ ; ; AutoIt Version: 3.1.1 (beta) ; Language: English ; Author(s): chris95219 ; Description: Adds health to the already existing health of an object. ; ; ------------------------------------------------------------------------------ Func AddHealth ($Object, $Health) $Object[2] = $Object[2] + $Health EndFunc ;==>AddHealth ; ------------------------------------------------------------------------------ ; ; AutoIt Version: 3.1.1 (beta) ; Language: English ; Author(s): chris95219 ; Description: Sets the score for a certain object. ; ; ------------------------------------------------------------------------------ Func SetScore ($Object, $score) $Object[3] = $score EndFunc ;==>SetScore ; ------------------------------------------------------------------------------ ; ; AutoIt Version: 3.1.1 (beta) ; Language: English ; Author(s): chris95219 ; Description: Returns the score of a certain object. ; ; ------------------------------------------------------------------------------ Func GetScore ($Object) Return $Object[3] EndFunc ;==>GetScore ; ------------------------------------------------------------------------------ ; ; AutoIt Version: 3.1.1 (beta) ; Language: English ; Author(s): chris95219 ; Description: Adds the specified score to an object with the already existing score. ; ; ------------------------------------------------------------------------------ Func AddSCore ($Object, $score) $Object[3] = $Object[3] + $score EndFunc ;==>AddSCore ; ------------------------------------------------------------------------------ ; ; AutoIt Version: 3.1.1 (beta) ; Language: English ; Author(s): chris95219 ; Description: Refreshes the specified surface. ; ; ------------------------------------------------------------------------------ Func ScreenRefresh ($surface) return GUICtrlSetGraphic($surface, $GUI_GR_REFRESH) EndFunc ;==>ScreenRefresh ;;;;; ;Particle Functions ;;;;; ; ------------------------------------------------------------------------------ ; ; AutoIt Version: 3.1.1 (beta) ; Language: English ; Author(s): chris95219 ; Description: Creates a particle system of the specified type. ; ; ------------------------------------------------------------------------------ Func ParticleCreate ($Type, $Length, $Speed, $size) EndFunc ;==>ParticleCreate ; ------------------------------------------------------------------------------ ; ; AutoIt Version: 3.1.1 (beta) ; Language: English ; Author(s): chris95219 ; Description: Deletes the particle system. ; ; ------------------------------------------------------------------------------ Func ClearParticle ($Particle) EndFunc ;==>ClearParticle ; ------------------------------------------------------------------------------ ; ; AutoIt Version: 3.1.1 (beta) ; Language: English ; Author(s): chris95219 ; Description: Returns true if the specified key was pressed otherwise it returns FALSE. ; ; ------------------------------------------------------------------------------ Func Keypress ($Key) If _IsPressed ($Key, "user32.dll") Then Return True Else Return False EndIf EndFunc ;==>Keypress Edited March 28, 2006 by RazerM My Programs:AInstall - Create a standalone installer for your programUnit Converter - Converts Length, Area, Volume, Weight, Temperature and Pressure to different unitsBinary Clock - Hours, minutes and seconds have 10 columns each to display timeAutoIt Editor - Code Editor with Syntax Highlighting.Laserix Editor & Player - Create, Edit and Play Laserix LevelsLyric Syncer - Create and use Synchronised Lyrics.Connect 4 - 2 Player Connect 4 Game (Local or Online!, Formatted Chat!!)MD5, SHA-1, SHA-256, Tiger and Whirlpool Hash Finder - Dictionary and Brute Force FindCool Text Client - Create Rendered ImageMy UDF's:GUI Enhance - Enhance your GUIs visually.IDEA File Encryption - Encrypt and decrypt files easily! File Rename - Rename files easilyRC4 Text Encryption - Encrypt text using the RC4 AlgorithmPrime Number - Check if a number is primeString Remove - remove lots of strings at onceProgress Bar - made easySound UDF - Play, Pause, Resume, Seek and Stop. Link to comment Share on other sites More sharing options...
cppman Posted March 29, 2006 Author Share Posted March 29, 2006 hmm... Thanks, did'nt see those. Im Completely redoing the entire thing, its gonna be alot better. Miva OS Project Link to comment Share on other sites More sharing options...
nfwu Posted March 29, 2006 Share Posted March 29, 2006 Interesting... This is what we call "vector" graphics. #) TwitterOut of date stuff:Scripts: Sudoku Solver | Webserver | 3D library (Pure AutoIt) | Wood's GadgetsUDFs: _WoodUniqueID() | _DialogEditIni() | _Console*() | _GetIPConfigData() | _URLEncode/Decode() Link to comment Share on other sites More sharing options...
cppman Posted March 29, 2006 Author Share Posted March 29, 2006 nfwu... > Do u have any links to *GOOD* Computer Graphics Tutorials.. like 2D Graphics(2D Math)? Miva OS Project Link to comment Share on other sites More sharing options...
nfwu Posted March 29, 2006 Share Posted March 29, 2006 (edited) Yar...Basic Shapes:http://www.brackeen.com/home/vga/shapes.htmlA whole list of tutorials: http://dir.yahoo.com/Recreation/Games/Vide...es/Programming/Some things that you can incude: http://www.brackeen.com/home/vga/index.html#)EDIT: Forgot to mention the BEST OF THE BEST resource: http://www.gamedev.net/EDIT2: MATHS AND PHYSICS ARTICLES: http://www.gamedev.net/reference/list.asp?categoryid=28 Edited March 29, 2006 by nfwu TwitterOut of date stuff:Scripts: Sudoku Solver | Webserver | 3D library (Pure AutoIt) | Wood's GadgetsUDFs: _WoodUniqueID() | _DialogEditIni() | _Console*() | _GetIPConfigData() | _URLEncode/Decode() Link to comment Share on other sites More sharing options...
cppman Posted March 30, 2006 Author Share Posted March 30, 2006 Thanks! Miva OS Project Link to comment Share on other sites More sharing options...
Onoitsu2 Posted April 3, 2006 Share Posted April 3, 2006 Can I get a link to the file, as i try and copy from the code box and paste inti scite and it is junk... Thanks, Onoitsu2 Things I have made:[font="Trebuchet Ms"]_CheckTimeBlock UDF(LT)MOH Call Ignore List (MOH = Modem On Hold)[/font] Link to comment Share on other sites More sharing options...
ConsultingJoe Posted April 4, 2006 Share Posted April 4, 2006 nICE UDF, good job [center]AutoIT + Finger Print Reader/Scanner = COOL STUFF -> Check Out Topic![/center][center][font=Arial Black]Check out ConsultingJoe.com[/font][/center][center]My Scripts~~~~~~~~~~~~~~Web Protocol Managing - Simple WiFi Scanner - AutoTunes - Remote PC Control V2 - Audio SpectrascopePie Chart UDF - At&t's TTS - Custom Progress Bar - Windows Media Player Embed[/center] Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now