Skip to content

Commit d6709f4

Browse files
author
anshbansal
committed
v0.3 of Cpmag
1 parent 327c2eb commit d6709f4

File tree

8 files changed

+456
-136
lines changed

8 files changed

+456
-136
lines changed

‎Code generator v0.1/Code generator v0.1/ApplicationEvents.vb‎

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1 @@
1+


‎Code generator v0.1/Code generator v0.1/Code generator v0.1.vbproj‎

Lines changed: 8 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -28,8 +28,8 @@
2828
<MapFileExtensions>true</MapFileExtensions>
2929
<PublisherName>Aseem Bansal</PublisherName>
3030
<OpenBrowserOnPublish>false</OpenBrowserOnPublish>
31-
<ApplicationRevision>1</ApplicationRevision>
32-
<ApplicationVersion>0.2.0.%2a</ApplicationVersion>
31+
<ApplicationRevision>7</ApplicationRevision>
32+
<ApplicationVersion>0.3.0.%2a</ApplicationVersion>
3333
<UseApplicationTrust>false</UseApplicationTrust>
3434
<PublishWizardCompleted>true</PublishWizardCompleted>
3535
<BootstrapperEnabled>true</BootstrapperEnabled>
@@ -68,7 +68,7 @@
6868
<OptionInfer>On</OptionInfer>
6969
</PropertyGroup>
7070
<PropertyGroup>
71-
<SignManifests>true</SignManifests>
71+
<SignManifests>false</SignManifests>
7272
</PropertyGroup>
7373
<PropertyGroup>
7474
<ManifestCertificateThumbprint>4A4982384BFC92AF8FE154719EDC723B5656B4C7</ManifestCertificateThumbprint>
@@ -79,6 +79,9 @@
7979
<PropertyGroup>
8080
<GenerateManifests>true</GenerateManifests>
8181
</PropertyGroup>
82+
<PropertyGroup>
83+
<ApplicationManifest>My Project\app.manifest</ApplicationManifest>
84+
</PropertyGroup>
8285
<ItemGroup>
8386
<Reference Include="System" />
8487
<Reference Include="System.Data" />
@@ -103,6 +106,7 @@
103106
<Import Include="System.Xml.Linq" />
104107
</ItemGroup>
105108
<ItemGroup>
109+
<Compile Include="ApplicationEvents.vb" />
106110
<Compile Include="Form1.vb">
107111
<SubType>Form</SubType>
108112
</Compile>
@@ -140,6 +144,7 @@
140144
<ItemGroup>
141145
<None Include="App.config" />
142146
<None Include="Code generator v0.1_TemporaryKey.pfx" />
147+
<None Include="My Project\app.manifest" />
143148
<None Include="My Project\Application.myapp">
144149
<Generator>MyApplicationCodeGenerator</Generator>
145150
<LastGenOutput>Application.Designer.vb</LastGenOutput>

‎Code generator v0.1/Code generator v0.1/Form1.Designer.vb‎

Lines changed: 131 additions & 81 deletions
Some generated files are not rendered by default. Learn more about customizing how changed files appear on GitHub.

‎Code generator v0.1/Code generator v0.1/Form1.vb‎

Lines changed: 255 additions & 42 deletions
Original file line numberDiff line numberDiff line change
@@ -1,73 +1,286 @@
11
Public Class Form1
22

3-
Private Sub AboutToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AboutToolStripMenuItem.Click
4-
Display.Text = "How can this app help YOU??" &
5-
Chr(13) & Chr(13) &
6-
" It can teach you C language without Books" &
7-
Chr(13) & Chr(13) &
8-
" In 15 MINUTES AT A TIME" &
9-
Chr(13) & Chr(13) &
10-
"Developer => Aseem Bansal" &
11-
Chr(13) & Chr(13) &
12-
"Project Started on => 24th August 2012" &
13-
Chr(13) & Chr(13) &
14-
"Current Version => 0.2"
3+
Const String_Version As String =
4+
"v 0.3"
5+
Const String_Project_Start As String =
6+
"24th August 2012"
7+
Const String_Version_Release As String =
8+
"28th August 2012"
159

10+
Const String_Start As String =
11+
" Lesson 00" &
12+
Chr(13) & Chr(13) &
13+
"How to start using this Software?" &
14+
Chr(13) & Chr(13) &
15+
"1. Click on Lesson 01 in the list of Lessons. " &
16+
Chr(13) &
17+
"2. Click on the button =>Lesson Selected<= " &
18+
Chr(13) & Chr(13) &
19+
" Some Steps are displayed in the List of Steps" &
20+
Chr(13) & Chr(13) &
21+
"3. Click on Step 01 in the List of Steps" &
22+
Chr(13) & Chr(13) &
23+
" After following the instruction in 4th point the text displayed on this screen will change" &
24+
Chr(13) &
25+
" Just read the instructions given there and follow them" &
26+
Chr(13) & Chr(13) &
27+
"4. Click on the button =>Step Selected<="
28+
Const String_About As String =
29+
"Developer ==> Aseem Bansal" &
30+
Chr(13) & Chr(13) &
31+
"Project Started on ==> " & String_Project_Start &
32+
Chr(13) & Chr(13) &
33+
String_Version & " released on ==> " & String_Version_Release
34+
Const String_Contact_Me As String =
35+
"This is still a work in progress so if you want more features JUST send an me an" &
36+
"e-mail about what you want and I will add them as soon as I can" &
37+
Chr(13) & Chr(13) &
38+
"CONTACT:-" &
39+
Chr(13) &
40+
"[email protected]" &
41+
Chr(13) & Chr(13) &
42+
"Please write [C Programming Made A Game] in the title of the e-mail"
43+
Const String_Technical As String =
44+
"Tool on which the Codes have been tested" &
45+
Chr(13) &
46+
"1. Code:Blocks (An Open Source C/C++ IDE) http://www.codeblocks.org/"
47+
Const String_Update =
48+
"https://programmingmadeagame.wordpress.com/download-links/" &
49+
Chr(13) & Chr(13) &
50+
"The above link is the one at which the latest version will always be posted"
51+
Const String_Lesson01_Goal As String =
52+
"->Use a software to make a simple software"
53+
Const String_Lesson01_Step01_Goal As String =
54+
"These are the Goals of this Step:-" &
55+
Chr(13) & Chr(13) &
56+
"->Getting a software for making software" &
57+
Chr(13) &
58+
"->Installing the software" &
59+
Chr(13) &
60+
"->Starting the software" &
61+
Chr(13) &
62+
"->Copying something into the software" &
63+
Chr(13) &
64+
"->Making a simple software" &
65+
Chr(13) & Chr(13) &
66+
"What is NOT the goal" &
67+
Chr(13) &
68+
"->To know what is happening when we are doing the instructions given next" &
69+
Chr(13) &
70+
"Just follow the step-by-step instructions. Things will be explained later." &
71+
Chr(13) & Chr(13) &
72+
"The instructions given next may be many in number but they are EASY TO USE step-by-step instructions and easy to use. So now click on instructions button"
73+
Const String_Lesson01_Step01_Instructions As String =
74+
"1. If you have Code:Blocks 10.05 mingw already installed on your computer then you can go to point 5." &
75+
Chr(13) & Chr(13) &
76+
" If you do not understand what is written in the above line go to the next point" &
77+
Chr(13) & Chr(13) &
78+
"2. Open this website http://www.codeblocks.org/downloads/26#windows in your web browser(e.g. Internet Explorer, Google Chrome etc.)" &
79+
Chr(13) & Chr(13) &
80+
"3. Now Click on either of the 2 download links of codeblocks-10.05mingw-setup.exe" &
81+
Chr(13) & Chr(13) &
82+
" -> When the software is downloaded we completed the first goal" &
83+
Chr(13) & Chr(13) &
84+
"4. Now install it. For installing it double click and keep on clicking all the 'yes' and 'next' that come in installation" &
85+
Chr(13) & Chr(13) &
86+
"5. An option appears for starting the software. You need to start the software and end the installation" &
87+
Chr(13) & Chr(13) &
88+
" -> We completed the 2nd goal now" &
89+
Chr(13) & Chr(13) &
90+
"6. When the software starts there is a thing called tooltip. Close it." &
91+
Chr(13) & Chr(13) &
92+
" -> We completed the 3rd goal now" &
93+
Chr(13) & Chr(13) &
94+
"7. Now you will have a white space with 'Start Here' Written near the top left" &
95+
Chr(13) & Chr(13) &
96+
"8. Press Ctrl+Shift+N. That means that you to press all three of these together. If that is tough then go to File Menu => New => Click on Empty File" &
97+
Chr(13) & Chr(13) &
98+
"9. A new tab would appear with the name *Untitled1 near the 'Start Here' at the top of white space" &
99+
Chr(13) & Chr(13) &
100+
"10. Now Copy the words given in 'Code to be Copied' section in the white space" &
101+
Chr(13) & Chr(13) &
102+
" -> We completed the second last goal" &
103+
Chr(13) & Chr(13) &
104+
"11. Press Ctrl+S to Save the file. Name it 1.1 which stands for Lesson01 Step01" &
105+
Chr(13) & Chr(13) &
106+
"12. Now Press F9. Wait a moment and a screen will appear. There is 'I just made a software' written on it and some other things also written in the next lines." &
107+
Chr(13) & Chr(13) & Chr(13) &
108+
"So that is the simple software running. So we completed our last goal also. " &
109+
Chr(13) & Chr(13) &
110+
"That was not difficult. Was it? Remember that you will not have to download the software again. It will be installed in your computer so you just need to copy some words into it, press F9 and your software will be made"
111+
Const String_Lesson01_Step01_Code_To_Be_Copied As String =
112+
"#include<stdio.h>" &
113+
Chr(13) & Chr(13) &
114+
"void main()" &
115+
Chr(13) &
116+
"{" &
117+
Chr(13) &
118+
" printf(""\n\n\nI just made a software\n\n\n\n"");""" &
119+
Chr(13) &
120+
"}"
121+
Const String_Lesson01_Step01_Details_Of_The_Code As String =
122+
""
123+
Const String_Lesson01_Step01_Further_Technical_Details As String =
124+
""
125+
Const String_Lesson02_Goal As String =
126+
""
127+
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
128+
Me.Text = "C Programming Made A Game " & String_Version
129+
Current_Display.Text = "->Use this software"
130+
Display.Text = String_Start
16131
End Sub
17132

18-
Private Sub VersionToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles VersionToolStripMenuItem.Click
19-
Display.Text = "This is still a work in progress so" &
20-
Chr(13) &
21-
"If you want more features JUST send an me an e-mail about what you want " &
22-
Chr(13) &
23-
"and I will add them as soon as I can" &
24-
Chr(13) & Chr(13) &
25-
"NOTE:-" &
26-
Chr(13) &
27-
"Please write" &
28-
Chr(13) &
29-
"[C Programming Made A Game]" &
30-
Chr(13) &
31-
"in the title of the e-mail" &
32-
Chr(13) & Chr(13) &
33-
"CONTACT:-" &
34-
Chr(13) &
35-
"[email protected]"
133+
Private Sub StartToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles StartToolStripMenuItem.Click
134+
Current_Display.Text = "->Use this software"
135+
Display.Text = String_Start
36136
End Sub
37137

38-
Private Sub TechnicalToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TechnicalToolStripMenuItem.Click
39-
Display.Text = "Tool on which the Codes have been tested" &
40-
Chr(13) &
41-
"1. Code:Blocks (An Open Source C/C++ IDE) http://www.codeblocks.org/"
138+
Private Sub AboutToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AboutToolStripMenuItem1.Click
139+
Current_Display.Clear()
140+
Display.Text = String_About
141+
End Sub
142+
143+
Private Sub TechnicalToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TechnicalToolStripMenuItem1.Click
144+
Current_Display.Clear()
145+
Display.Text = String_Technical
146+
End Sub
147+
148+
Private Sub ContactMeToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ContactMeToolStripMenuItem.Click
149+
Current_Display.Clear()
150+
Display.Text = String_Contact_Me
151+
End Sub
152+
153+
Private Sub HelToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles HelToolStripMenuItem.Click
154+
Current_Display.Clear()
155+
Display.Text = String_Update
42156
End Sub
43157

44158
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
45159
Select Lessons.SelectedItem
46160
Case "Lesson 01"
161+
Current_Display.Clear()
162+
Current_Display.Text = String_Lesson01_Goal
163+
47164
Me.Steps.Items.Clear()
48165
Me.Steps.Items.Add("Step 01")
166+
Me.Steps.Items.Add("Step 02")
49167
Case "Lesson 02"
168+
Current_Display.Clear()
169+
Current_Display.Text = String_Lesson02_Goal
170+
Display.Clear()
50171
Me.Steps.Items.Clear()
51-
Me.Steps.Items.Add("No Steps Added Here")
52-
Case "Lesson 03"
53-
Me.Steps.Items.Clear()
54-
Me.Steps.Items.Add("No Steps Added Here")
55-
Case "Lesson 04"
56-
Me.Steps.Items.Clear()
57-
Me.Steps.Items.Add("No Steps Added Here")
172+
Me.Steps.Items.Add("Step 01")
173+
Me.Steps.Items.Add("Step 02")
58174
End Select
59175
End Sub
60176

61177
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
178+
RadioButton6.Select()
179+
RadioButton1.Select()
180+
End Sub
181+
182+
Private Sub RadioButton1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton1.CheckedChanged
183+
Select Case Lessons.SelectedItem
184+
Case "Lesson 01"
185+
Select Case Steps.SelectedItem
186+
Case "Step 01"
187+
Display.Text = String_Lesson01_Step01_Goal
188+
Case "Step 02"
189+
Display.Text = ""
190+
End Select
191+
Case "Lesson 02"
192+
Current_Display.Text = ""
193+
Select Case Steps.SelectedItem
194+
Case "Step 01"
195+
Display.Text = ""
196+
Case "Step 02"
197+
Display.Text = ""
198+
End Select
199+
End Select
200+
End Sub
201+
202+
Private Sub RadioButton2_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton2.CheckedChanged
203+
Select Case Lessons.SelectedItem
204+
Case "Lesson 01"
205+
Select Case Steps.SelectedItem
206+
Case "Step 01"
207+
Display.Text = String_Lesson01_Step01_Instructions
208+
Case "Step 02"
209+
Display.Text = ""
210+
End Select
211+
Case "Lesson 02"
212+
Current_Display.Text = ""
213+
Select Case Steps.SelectedItem
214+
Case "Step 01"
215+
Display.Text = ""
216+
Case "Step 02"
217+
Display.Text = ""
218+
End Select
219+
End Select
220+
End Sub
221+
222+
Private Sub RadioButton3_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton3.CheckedChanged
223+
Select Case Lessons.SelectedItem
224+
Case "Lesson 01"
225+
Select Case Steps.SelectedItem
226+
Case "Step 01"
227+
Display.Text = String_Lesson01_Step01_Code_To_Be_Copied
228+
Case "Step 02"
229+
Display.Text = ""
230+
End Select
231+
Case "Lesson 02"
232+
Current_Display.Text = ""
233+
Select Case Steps.SelectedItem
234+
Case "Step 01"
235+
Display.Text = ""
236+
Case "Step 02"
237+
Display.Text = ""
238+
End Select
239+
End Select
240+
End Sub
241+
242+
Private Sub RadioButton4_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton4.CheckedChanged
62243
Select Case Lessons.SelectedItem
63244
Case "Lesson 01"
64245
Select Case Steps.SelectedItem
65246
Case "Step 01"
247+
Display.Text = String_Lesson01_Step01_Details_Of_The_Code
248+
Case "Step 02"
249+
Display.Text = ""
250+
End Select
251+
Case "Lesson 02"
252+
Current_Display.Text = ""
253+
Select Case Steps.SelectedItem
254+
Case "Step 01"
255+
Display.Text = ""
256+
Case "Step 02"
257+
Display.Text = ""
258+
End Select
259+
End Select
260+
End Sub
66261

67-
Display.Text = "Aseem Bansal"
262+
Private Sub RadioButton5_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton5.CheckedChanged
263+
Select Case Lessons.SelectedItem
264+
Case "Lesson 01"
265+
Select Case Steps.SelectedItem
266+
Case "Step 01"
267+
Display.Text = String_Lesson01_Step01_Further_Technical_Details
268+
Case "Step 02"
269+
Display.Text = ""
68270
End Select
69271
Case "Lesson 02"
272+
Current_Display.Text = ""
273+
Select Case Steps.SelectedItem
274+
Case "Step 01"
275+
Display.Text = ""
276+
Case "Step 02"
277+
Display.Text = ""
278+
End Select
70279
End Select
71280
End Sub
72281

282+
Private Sub RadioButton6_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton6.CheckedChanged
283+
Display.Clear()
284+
End Sub
285+
73286
End Class

‎Code generator v0.1/Code generator v0.1/My Project/Application.Designer.vb‎

Lines changed: 1 addition & 1 deletion
Some generated files are not rendered by default. Learn more about customizing how changed files appear on GitHub.

0 commit comments

Comments
 (0)