Sign in to follow this  
Followers 0
z0mgItsJohn

_Write_Marquee ()..

5 posts in this topic

#1 ·  Posted (edited)

A Marquee Is That Sliding Text Thing On Web-Pages.. Its Kinda Hard To Example :)

Source : _Marquee.Au3 | Size : 1.05 KB

Func _Write_Marquee ($BG_Color, $Font_Face, $Color, $Size, $Marquee_BG_Color, $Text)
Local $String, $Return
$String = ('<P><Span Style = "BackGround-Color: ' & $BG_Color & '"><Font Face = "' & $Font_Face & '" Color = "' & $Color & '" Size = "' & $Size & '">')
$String = $String & ('<Marquee BGColor = "' & $Marquee_BG_Color & '" Align = "Middle">' & $Text & '</Marquee></Font></Span></P>')

DirCreate (@TempDir & '\Marquee(s)')

$Return = _FileWrite_Array (@TempDir & '\Marquee(s)\Marquee','.HTML', $String, '100')

Return $Return
EndFunc

Func _FileWrite_Array ($File, $File_Type, $Data, $Max)
Local $Return
For $File_Array = '1' To $Max
If FileExists ($File & '(' & $Max & ')' & $File_Type) Then
ExitLoop
EndIf
If Not FileExists ($File & '(' & $File_Array & ')' & $File_Type) Then
FileWrite ($File & '(' & $File_Array & ')' & $File_Type, $Data)
$Return = ($File & '(' & $File_Array & ')' & $File_Type)
Return $Return
ExitLoop
EndIf
Next
EndFunc

Func OnAutoItExit ()
FileDelete (@TempDir & '\Marquee(s)')
DirRemove (@TempDir & '\Marquee(s)')
EndFunc

Screen Shot :

Posted Image

Feel Free.. To Leave Comments, Bugs.., Etc.. Etc.. >_<

- John

File Contents : _Marquee.Zip

[1] - _Marquee.Au3 | 427 KB

[2] - _Marquee Example.Au3 | 605 KB

[3] - Song.Mp3 | 2,197,409 KB

Download Link : http://www.4shared.com/file/63422290/3f6327b5/_Marquee.html

Edited by John2006

Latest Projects :- New & Improved TCP Chat

Share this post


Link to post
Share on other sites



#2 ·  Posted (edited)

Wasn't this already created? The zip is empty.

Edited by Alienware

Share this post


Link to post
Share on other sites

#3 ·  Posted (edited)

Lemme Fix The Link :)

Ohh.. Sorry I Did Not No This Was Already.. Created D:

Edited by John2006

Latest Projects :- New & Improved TCP Chat

Share this post


Link to post
Share on other sites

This and the other one that Alienware is going on about would be cool to make a web interface with a form to control it..

They are both nice...

Share this post


Link to post
Share on other sites

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 account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0