[Source] Basic Scripting Program

[Darthatron]

Ok, so. I got bored and made a partial scripting program, it's nowhere near completion, but someone might have use for it.

I also commented it, but not too much.

EDIT: Added Variables, and If Statements. >_>

EDIT2: I totally added Editing Variables, a GoTo command and a small, incomplete Command Database.

 

[Swan]

Ok, so. I got bored and made a partial scripting program, it's nowhere near completion, but someone might have use for it.

I also commented it, but not too much.

Did you use third-party libraries for the script or do you parse it yourself? I'm on Linux, so I don't know.

 

[Darthatron]

I parsed it myself, using Split and Select Case. It's pretty basic, but... you know... I don't care. It' just an example.

 

[drainingpower]

its pretty good, kinda reminds me of those script macroing programs xD good job

 

[Nullware]

        'If it's a comment then it skips.
        If Mid(strParam(0), 1, 1) = "'" Then GoTo SkipMe

When checking if it's a comment you should strip out whitespaces first OR check if the first NON-whitespace is an apostrophe. Checking only the first character causes it to give errors if you want to indent your comments.

You should probably just strip out whitespaces from the beginning of every line as indenting anything seems to cause errors. I was still impressed, it's quite powerful and not even that big.

 

[Swan]

Hint: Lua.

Google it ^_^

 

[Darthatron]

        'If it's a comment then it skips.
        If Mid(strParam(0), 1, 1) = "'" Then GoTo SkipMe

When checking if it's a comment you should strip out whitespaces first OR check if the first NON-whitespace is an apostrophe. Checking only the first character causes it to give errors if you want to indent your comments.

You should probably just strip out whitespaces from the beginning of every line as indenting anything seems to cause errors. I was still impressed, it's quite powerful and not even that big.

When I wrote it I didn't need to indent anything, due to the lack of IF Statements, and such.

However, it's not difficult to add indenting.

strCommand(i) = Trim(strCommand(i))

Hint: Lua.

Google it ^_^

I think I'll stick with making it from scratch, thanks though.

_____________

Ok, so I've added IF Statements, and now I'm trying to add Variables, which I think might be a little more difficult than anything else.

 

[Swan]

When I wrote it I didn't need to indent anything, due to the lack of IF Statements, and such.

However, it's not difficult to add indenting.

strCommand(i) = Trim(strCommand(i))

I think I'll stick with making it from scratch, thanks though.

_____________

Ok, so I've added IF Statements, and now I'm trying to add Variables, which I think might be a little more difficult than anything else.

Lua already has if statements, loops, etc.

It is used in things like World Of Warcraft, Ragnarok and so on as a scripting engine, and is completely free and open source ^_^

 

[Darthatron]

Lua already has if statements, loops, etc.

It is used in things like World Of Warcraft, Ragnarok and so on as a scripting engine, and is completely free and open source ^_^

My point is I want to see If I can do it. >_>

EDIT: I'm updating the first post with If Statements, and Variables. Still not done, you can't change the values of Variables... Yet...

 

[Nullware]

I think I'll stick with making it from scratch, thanks though.

Should we really call VB6 programs "from scratch".:laugh:

It is used in things like World Of Warcraft, Ragnarok and so on as a scripting engine, and is completely free and open source

I read a bit about it and to show you how useful it really is, around 40% of Adobe Lightroom is coded in Lua.

EDIT: I'm updating the first post with If Statements, and Variables. Still not done, you can't change the values of Variables... Yet...

Very nice, I'll probably keep following this as you move along.

 

[Darthatron]

Yes well when I said "from scratch", I was clearly going insane.

All that is really left is Personal Functions and a GoTo command.

 

[Swan]

New version deserves to be noticed.

 

[Darthatron]

I'm going to update soon, with the "GoTo" function, and editing Variables.

Here is an example:

Dim Val 0

Loop:

If Val < 10
    MoveMouse 100 200
    MoveMouse 200 100
    Edit Val + 1
    GoTo Loop
End If

It will loop through the If statement 10 times, then end the script. ^_^

EDIT: ZOMG! UPDATE FIRST POSTZORZ!!!!

 

[Swan]

I'm going to update soon, with the "GoTo" function, and editing Variables.

Here is an example:

Dim Val 0

Loop:

If Val < 10
    MoveMouse 100 200
    MoveMouse 200 100
    Edit Val + 1
    GoTo Loop
End If

It will loop through the If statement 10 times, then end the script. ^_^

EDIT: ZOMG! UPDATE FIRST POSTZORZ!!!!

isn't that like a different version of a while loop?

Add support for for loops (iteration), and do-while ^_^

 

[Darthatron]

Yeah, I'm going to work on that when I get home.

 

[70-RanqeRS]

Pretty good. good job

 

[70-RanqeRS]

can i have that one plz. msn meh

 

[Darthatron]

I never did the while loop, I got lazy. It wouldn't be difficult to make it with the information already in there.