Skip to content

Commit

Permalink
NEW FEATURE - Steve Lard Campaign
Browse files Browse the repository at this point in the history
Are you Fatty?
WEll.... TabooAds may have found the solution 4u!
  • Loading branch information
soafen committed Jul 20, 2022
1 parent 50e63d2 commit 444a5c8
Show file tree
Hide file tree
Showing 17 changed files with 446 additions and 14 deletions.
Binary file modified Wii Fit Reminder.suo
Binary file not shown.
155 changes: 155 additions & 0 deletions Wii Fit Reminder/FatFamiliesPromo.Designer.vb

Some generated files are not rendered by default. Learn more about how customized files appear on GitHub.

146 changes: 146 additions & 0 deletions Wii Fit Reminder/FatFamiliesPromo.resx
Original file line number Diff line number Diff line change
@@ -0,0 +1,146 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="Timer1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAEAQEAAAAAAIAABBAAAFgAAAIlQTkcNChoKAAAADUlIRFIAAABAAAAAQAgGAAAAqmlx3gAAAAFz
UkdCAK7OHOkAAAAEZ0FNQQAAsY8L/GEFAAAACXBIWXMAAA7DAAAOwwHHb6hkAAADlklEQVR4Xu2b/4dU
YRTG++8SEYmIiIhIREREJCIi+ikSkYiIiIhEREREIiIiIhIR/bA9n20Ox3XuzHun3mfX3X342Jk7u3bO
M++Xe855Z8/GDteuAYufO1bTDPgs3v59OBe1G3BT7BXnN5/NRu0G3BAYcHDz2WzUbsA9gQHwjgvzULsB
T0UYcER8EzNQuwEEvE+ECcfFF9FDX8Ub8UTcFdfFRXFGHB1wSpwVV8UD8UlMULsB6IIIAwBDLgne7BT9
Euwor8RDwfrC4npMZJPXBaMaNc0A5v7YGzwsTgpMuibuLLgl+HQIkE+L36v+/n/CaGnUNAMQw6z6p9sJ
tuxGTTcAMWz3i+qfbwd4f41azwD0UTDUehnBVGNKXRFModuCKfVYsDgyEmOaMeWY9+xO/C1rS6PWNyD0
Q7wQvMGY56zOw4BaYLVnu/0gfot1xAILjfp3A6bosqgCD3ptq0vkNYD9ugo84JM3y2vACVEFHky9n/gP
8hoQi9QYrCVmeQ2ogs6wupvlM4Ddogo6c1+Y5TOAFb4KOsOebpbPAEppVdAZkiKzfAa8FFXQGe74zPIZ
wAJXBZ3Zgnqjz4BcUhuDGyWzfAZQF4hASXTOLcj1BapMZvkMYH5HoO+5sBCP4zpJlFk+A6KcRtlrKK7x
GqPBLJ8B5OsEeUDkdJXHXItRYJbPgFwjYD2g8gt5bQBzSuwzgI5SDnSM2RpQBVthTok9BjDUq2ArXguj
PAZQQK2CrTCnxB4DGNY5SLpJz8UzMSyTUfU1ymMAgUaAw4SH6u9pEa+bU2KPAY9EBFgVPhkN8TrbolEe
A/hUI8Cqe5tTZXNK7DEgTpcAWeFQOU9gfTDKYwDtrQiQVhq9u++CMwd0lOI1MKfEHgNWNUQytNaM8hhA
k7MKtsKcEnsMmNIsNZ9C8xgwdqpkDKP6G/BTVEHSJxxrldFEMam/AVVDJN8MVUdujClxfwM4WJWDG57g
YoQMT5nkmmFn9TeA4yo5OHaELO4HhmuEsSbQ34CqIUJyRC2QOkG+SwzIDUzqbwAd32GAkAuhQ4w1gf4G
DG91W6jyhU7qb0BOdFox1gT6G8BZwirIZXDuz6T+BkxJhAJjTaC/AdH2mgJNU5P6G3BIVEEuw1gT6G9A
FeAqjClxXwOo+FQBrmI2BiBudckHuPvj6y+s8MzxVTUCk/obsEz0BOKrM5TOKYlTFDWWxbbWgG2gXQMW
P3eoNjb+AMzt6jKbTlyBAAAAAElFTkSuQmCC
</value>
</data>
</root>
40 changes: 40 additions & 0 deletions Wii Fit Reminder/FatFamiliesPromo.vb
Original file line number Diff line number Diff line change
@@ -0,0 +1,40 @@
Public Class FatFamiliesPromo
Dim closable As Boolean = False
Private Sub FatFamiliesPromo_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
If closable = False Then
PictureBox1.Image = My.Resources.PISSEDSteveLard
Me.BackColor = Color.Maroon
Label1.Text = "NO MANNERS!"
Label2.Text = "You didn't even have a single second to just let the Advertisment talk! That kind of hurriedness is not healthy."
Label3.Text = "Pro Life Advice: When you're given a solid offer, you listen to it, or you move on with your day. You don't just try and suppress it rudely!!!"
Application.DoEvents()
My.Computer.Audio.Play(My.Resources.PissedMiller, AudioPlayMode.WaitToComplete)
My.Computer.Audio.Play(My.Resources.PissedMiller, AudioPlayMode.WaitToComplete)
My.Computer.Audio.Play(My.Resources.PissedMiller, AudioPlayMode.WaitToComplete)
My.Computer.Audio.Play(My.Resources.PissedMiller, AudioPlayMode.WaitToComplete)
My.Computer.Audio.Play(My.Resources.Bull, AudioPlayMode.WaitToComplete)
My.Computer.Audio.Play(My.Resources.Bull, AudioPlayMode.WaitToComplete)
My.Computer.Audio.Play(My.Resources.Bull, AudioPlayMode.WaitToComplete)
My.Computer.Audio.Play(My.Resources.Bull, AudioPlayMode.WaitToComplete)
Timer1.Stop()
closable = True
Me.Close()
End If
Timer1.Stop()
End Sub

Private Sub FatFamiliesPromo_Shown(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Shown
My.Computer.Audio.Play(My.Resources.Miller, AudioPlayMode.Background)
Me.BackColor = Color.MidnightBlue
Label1.Text = "HEY, FATTY!"
Label2.Text = "I'm here to stamp out the obesity epidemic that is sweeping the UK, one massive family at a time!"
Label3.Text = "If you or ANYONE you know is getting a bit hefty, please give me a call at 08456 50 50 50!"
PictureBox1.Image = My.Resources.SteveLardPointsAtU
Timer1.Start()
closable = False
End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
closable = True
End Sub
End Class
8 changes: 7 additions & 1 deletion Wii Fit Reminder/Main.Designer.vb

Some generated files are not rendered by default. Learn more about how customized files appear on GitHub.

3 changes: 3 additions & 0 deletions Wii Fit Reminder/Main.resx
Original file line number Diff line number Diff line change
Expand Up @@ -1824,6 +1824,9 @@
<metadata name="Timer1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>302, 17</value>
</metadata>
<metadata name="FatPersonTimer.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>497, 17</value>
</metadata>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAYAAAAAAAEAIACjBgAAZgAAAICAAAABACAAKAgBAAkHAABAQAAAAQAgAChCAAAxDwEAMDAAAAEA
Expand Down
Loading

0 comments on commit 444a5c8

Please sign in to comment.