What were you coding 10 years ago?

NovaCoder

NovaCoder

Nova
Joined
Apr 24, 2008
Posts
588
Country
Australia
Region
Victoria
For all the old hands, what hobby projects/platforms were you working on 10 years ago and what are you doing these days?

I was mucking around trying to port a win32 3D Portal engine to the GBA -> PolyNova GBA, I think I must have been very bored at the time :LOL:

These days I'm just porting old PC games to Amiga AGA :blink:

In the future I'll go on to something else, God only knows what. Maybe I'll get into Android next, that sound's interesting.
 
"Hello World"?

Now, seriously. I only did some coding in my ZX80/ZX81 times. Hint: one can calculate my age by realizing when I did this. :p
 
Wow. Ten years ago my brother and I were making games in MegaZeux (a spiritual successor to ZZT using EGA's redefinable font capability to improve the text-mode graphics and incorporating better scripting and MOD music.) We only ever released a couple of games, none of which were very good, but at least we had fun :)
 
10 year ago nothing, but 18 year ago I learned cobol on a training course which was never used again when said course finished. Bit of a waste of time really and I can't remember any of it these days lol
 
Something along the lines of a fully automated guild site for Archmage, if anyone played that :)

Today I'm not doing any hobby stuff. Doing other things with my time.
 
30 yrs ago asm on C64 removing protection from games to swap at school with custom tape loader, music and loading screens :) I know I was naughty :)


10 yrs ago not programming but I found a way to macro my priest in a game called "Knights Online", no one else thought of this and I was the only character on the server able to macro :)

Answer,,
I ran the game inside VMware on a WindowsXP client. I then ran my memory tools outside VMware and plotted the screen locations and performed the macro I wrote on the Real pc controlling VMware screen.


Code: 
SetActiveWindow Knight OnLine Client
ObjVar 15
CommandDelay 500
KeyRate 120
Constants
  Healpot = 5                   // set your HP pot and key here
  Manapot = 8                  // set your mana pot and key here
  HealSkill = 1                 // The healing shortcut
  HPBuffKey = 6                 // The HP buff shortcut
  ACBuffKey = 3                 // The AC buff shortcut
 
  PM1 = 1                    // Is Party Member Alive and Present
  PM2 = 1
  PM3 = 1
  PM4 = 1
  PM5 = 1
  PM6 = 1
  PM7 = 1
  PM8 = 1
 
  DoBuff = 1                   // Buffs the party
 
End
 
 
// ---------------------------- Self Heal
Procedure Health
  IsBlack 260, 10
  keys $Healpot
  Else
  End
End
 
// ---------------------------- mana pot
Procedure Mana
  IsBlack 175, 28
   keys $Manapot
  Else
  End
End
 
// ---------------------------- Check Party Members
 
Procedure CheckIfPartyMemberAlive
 IsBlue 904, 81
  SetConst PM1 = 1
  IsBlack 904, 72
   SetConst PM1 = 0
  End
 Else
  SetConst PM1 = 0
 End
 IsBlue 904, 126
  SetConst PM2 = 1
  IsBlack 904, 117
   SetConst PM2 = 0
  End
 Else
  SetConst PM2 = 0
 End
 
 IsBlue 904, 171
  SetConst PM3 = 1
  IsBlack 904, 162
   SetConst PM3 = 0
  End
 Else
  SetConst PM3 = 0
 End
 
 IsBlue 904, 217
  SetConst PM4 = 1
  IsBlack 904, 208
   SetConst PM4 = 0
  End
 Else
  SetConst PM4 = 0
 End
 
 IsBlue 904, 263
  SetConst PM5 = 1
  IsBlack 904, 254
   SetConst PM5 = 0
  End
 Else
  SetConst PM5 = 0
 End
 
 IsBlue 904, 307
  SetConst PM6 = 1
  IsBlack 904, 299
   SetConst PM6 = 0
  End
 Else
  SetConst PM6 = 0
 End
 
 IsBlue 919, 353
  SetConst PM7 = 1
  IsBlack 904, 344
   SetConst PM7 = 0
  End
 Else
  SetConst PM7 = 0
 End
 
 IsBlue 919, 397
  SetConst PM8 = 1
  IsBlack 904, 389
   SetConst PM8 = 0
  End
 Else
  SetConst PM8 = 0
 End
End 
// ---------------------------------------- Buff Party
Procedure Buff every 608 sec
  If $DoBuff = 0
    Exit
  End
 Delay 200
 KeyDown $HPBuffKey 250
 Delay 1700
 If $PM1 = 1
  MousePos 969, 72
  Delay 250
   leftmousedown 250
   Delay 250
   LeftMouseup 250
   KeyDown $ACBuffKey 250
   Delay 1700
 Else
 End
 
 If $PM2 = 1
  MousePos 969, 117
   leftmousedown 250
   Delay 250
   LeftMouseup 250
   KeyDown $ACBuffKey 250
   Delay 1700
 Else
 End
 
 If $PM3 = 1
  MousePos 969, 162
   leftmousedown 250
   Delay 250
   LeftMouseup 250
   KeyDown $ACBuffKey 250
   Delay 1700
 Else
 End
 
 If $PM4 = 1
  MousePos 969, 208
   leftmousedown 250
   Delay 250
   LeftMouseup 250
   KeyDown $ACBuffKey 250
   Delay 1700
 Else
 End
 
 Call Health
 
 If $PM5 = 1
  MousePos 969, 254
   leftmousedown 250
   Delay 250
   LeftMouseup 250
   KeyDown $ACBuffKey 250
   Delay 1700
 Else
 End
 
 If $PM6 = 1
  MousePos 969, 299
   leftmousedown 250
   Delay 250
   LeftMouseup 250
  KeyDown $ACBuffKey 250
   Delay 1700
 Else
 End
 
 If $PM7 = 1
  MousePos 969, 344
   leftmousedown 250
   Delay 250
   LeftMouseup 250
   KeyDown $ACBuffKey 250
   Delay 1700
 Else
 End
 
 If $PM8 = 1
  MousePos 969, 389
   leftmousedown 250
   Delay 250
   LeftMouseup 250
   KeyDown $ACBuffKey 250
   Delay 1700
 Else
 End
 
 Keydown c 250
End
 
// ---------------------------------------- Heal Party
Procedure CheckPartyHealth
 Call Health
 If $PM1 = 1
 GetRed 980, 73 = 255
   MousePos 978, 72
    leftmousedown 250
    Delay 250
    LeftMouseup 250
    KeyDown $HealSkill 250
    Delay 2100
    Keydown c 250
  Else
  End
 Else
 End
 
 If $PM2 = 1
 GetRed 980, 118 = 255
   MousePos 978, 117
    leftmousedown 250
    Delay 250
    LeftMouseup 250
    KeyDown $HealSkill 250
    Delay 2100
    Keydown c 250
  Else
  End
 Else
 End
 
 If $PM3 = 1
  GetRed 980, 163 = 204
   MousePos 978, 162
    leftmousedown 250
    Delay 250
    LeftMouseup 250
    KeyDown $HealSkill 250
    Delay 2100
    Keydown c 250
  Else
  End
 Else
 End
 
 If $PM4 = 1
  GetRed 980, 207 = 255
   MousePos 978, 208
    leftmousedown 250
    Delay 250
    LeftMouseup 250
    KeyDown $HealSkill 250
    Delay 2100
    Keydown c 250
  Else
  End
 Else
 End
 
 If $PM5 = 1
  GetRed 980, 253 = 187
   MousePos 978, 254
    leftmousedown 250
    Delay 250
    LeftMouseup 250
    KeyDown $HealSkill 250
    Delay 2100
    Keydown c 250
  Else
  End
 Else
 End
 
 If $PM6 = 1
    GetRed 980, 298 = 238
   MousePos 978, 299
    leftmousedown 250
    Delay 250
    LeftMouseup 250
    KeyDown $HealSkill 250
    Delay 2100
    Keydown c 250
  Else
  End
 Else
 End
 
 If $PM7 = 1
  GetRed 980, 343 = 221
   MousePos 978, 344
    leftmousedown 250
    Delay 250
    LeftMouseup 250
    KeyDown $HealSkill 250
    Delay 2100
    Keydown c 250
  Else
  End
 Else
 End
 
 If $PM8 = 1
  GetRed 980, 388 = 221
   MousePos 978, 389
    leftmousedown 250
    Delay 250
    LeftMouseup 250
    KeyDown $HealSkill 250
    Delay 2100
    Keydown c 250
  Else
  End
 Else
 End
End
 
 
While 1=1
  Call CheckIfPartyMemberAlive
  ProcessMessages
  Call CheckPartyHealth
 Call Mana
 Call Health
End
 
Now VR training systems for MOD.
10 years ago I was coding SWP / video systems for a fruit machine company called Vivid (part of Barcrest group). Very dull but easy money.
15 years ago I was working in the PC game industry for Elite/NMS.
 
Then, java:
System.out.println("Hello world!");

Now, java:
Logger.info("Hello world!");

I've come a long way :D
 
What I did...

What I did...

What I did was a working prototype of a pitch detector / vocal harmonizer, for monophonic vocal lines.
 
10 years ago - Coding HTML :)

20 Years ago - Coding GWBASIC :LOL:
 
10 years ago I was just getting into IT professionally. Had just finished an NVQ in Repair and Maintenance :LOL: Lots of batch files, PC builds and Windows installations. No real programming though sadly.
 
Ten years ago? :LOL:
I would have been in Junior high school and since our school was so underfunded, I did not have any computer courses what-so-ever. Sad, I know.
 
Jazzmarazz said:
Ten years ago? :LOL:
I would have been in Junior high school and since our school was so underfunded, I did not have any computer courses what-so-ever. Sad, I know.
Click to expand...

If it makes you feel any better, our school only had BBC Micros until around my last year there, and that was about 1999 /2000 :LOL:
 
Coding a web site for my brother's tool hire shop, using Perl CGI and text files as a database.
 
Wrote an Ethernet driver, UDP/IP protocol stack and some low level code for an actuator card I designed to move the rudder of an Aircraft. First day of testing, found a bug in the design, caused a 1 tonne mass weight to the end stop crash! :roll: I think that's what you call crash and burn testing.

I mainly design hardware but dabble in C, VB and assembler dialects. Oh and play with Arduino sketches now.
 
10 years ago...

That would be coding a Dungeons & Dragons 3rd edition character sheet generator & dice roller using Visual Basic for my regular Sunday games.

My ex-wife was a big Sims fanatic, so I was looking into coding some mods for that, but never got very far. :)

These days I mostly just mess around with PHP/CSS/HTML and that's about it... But I am looking at getting back into Amiga programming. Did a couple of simple AMOS games when I was about 12 on my A500 with 2mb ram.
 
You must log in or register to reply here.
Back
Top Bottom