Code for Anarchist - Please post your sample here

[Rx_]

Rules? We don't need no stinking rules!
This is the site to let the true Anarchist in you surface, as if you could have stopped it anyway!
Code or Computer advice with NO RULES!
Warning: Use code at own risk of tearing apart the Universe Space Time Fabric

Precognition Code - modified from Wait code
Use: Great for High Frequency Trading (HFT) on Stock Market Futures

Private Declare Sub sapiSleep Lib "kernel32" _
        Alias "Precognition" _
        (ByVal dwMilliseconds As Long)

Sub sPreCogSleep(lngMilliSec As Long)
    If lngMilliSec < -1 Then
        Call -SQR( sapiSleep(lngMilliSec)) ' neg square root is imaginary number
                       ' or in computer terms a Dream
    End If
End Sub

Sub sTestSleep()
Const cTIME = -100000      'in Milli Seconds
    Call sPreCogSleep(cTIME)
    MsgBox "Before this Msgbox appeared, I knew you were going to do that  " _
        & cTIME & " Milliseconds ago."
End Sub

Hint: If this Precognition program is put in an Endless Loop, be sure to use a processor powerful enough to finish an Endless Loop in under 30 seconds.

 

[Rx_]

For Sale: 3,000 TB USB Thumb Drive USB 3 with built in Optical HDMI port for fast download. (yes, 3,000 TB)
$150.00 US plus S/H $3.50
Extremely Fast Optioal upload, small and compact Tempereature range of -50 F to +190 F
Data Format: Mil Std 1000 tested for Write Many Times / Never Read
Popular for taking records to Government Audits

 

[Rx_]

Heard of someone doing this to avoid Excel data from falling into wrong hands: Add in an auto open macro that contains an On Time call macro. Check the User ID to determine if they are not on the "approved list". This can pop up a message box warning them that Anarchist Virus may have infected their machine...Please contact the Network Administrator Immediately.

At a company (now gone) that designed Grocery Store Cash Register software for the back-office, the software used a physical encrypted key on the serial port to turn on/off licensed software. Evidence arose that indicated stores in Mexico were using the software worth over $100,000 in larger chains.

The programmers created a module named Warp Core Breach. Then there was a dated time to update all of the new keys sent out to paying customers six months later. I think you can imagine the result. I was manager of Quality Assurance and tested all aspects of the product operations. It was my task to insure all paying customers were updated and had the new keys in place.

 

[Rx_]

Found a post where someone claimed: "I once set up a user on a Novell network to have to change their password daily and the password had to have at least 40 characters. "

Another post Just in case any of us notice the results otherwise it could take days to figure out:
Code in an excel file, copy the file to the XLSTART folder...

Private Sub Workbook_Open()
Application.DisplayAlerts = False
Application.Quit
End Sub


Or
Private Sub Workbook_Open()
Application.EnableEvents = False
End Sub

Then to make it very annoying someone suggested:
Private Sub Workbook_Open()

Application.DisplayAlerts = False
Randomize
annoying_level = 3 ' only happens 3% of the time
annoying_number = 100 * Rnd
If annoying_number < annoying_level Then
Application.Quit
End If
End Sub


Disclaimer Notice: these are not recommendations. These are presented as tips in case you are the troubleshooter for this type of situation.

 

[Rx_]

Confession on blog site of worker who left: So the add-in was placed on all of the OSU "fans'" computers. It was set to run 1 week after I'd quit. Whenever Excel was opened, it would replace the Excel splash screen with a Michigan flag and it would play the Michigan fight song. Sad, I know, but what was even worse was the fact that this really annoyed them for some reason. It's just a game.
Disclaimer Notice: these are not recommendations. These are presented as tips in case you are the troubleshooter for this type of situation. Won't post this code to prevent the temptation to all of those fans, political, and other "*isms" out there.

 

[Fifty2One]

It was amusing when we had a "Blue Screen" as a screen saver, the IT guys would have a melt down if they happened to be in the area and spied some of the computers suddenly rolling over into screen saver, but by their observation it was having some sort of issue...
...added amusement if you unplugged your keyboard and mouse when you vacated your desk for any period of time...

 

[Galaxiom]

My CEO once tasked me with a special project.

One of the staff had installed wallpaper showing the cars of the top Ford racing driver in Australia. My task was to automatically substitute it with images from the arch enemy, General Motors (Holden) racing team, every twenty minutes a couple of times a day.

Easily done by a domain admin. It is also good to have a CEO with a sense of humor.

 

[Mihail]

) Cool !