[REQ] User script for regular sonar checks

[Abd_von_Mumit]

<EDIT>
The script is ready and works well, check the thread further.
</EDIT>



I can't script. I just can't. I would love to have this script though:

1. Every [period] if not submerged, dive to 20 m depth.
2. When at 18m depth, switch engines off.
3. Wait 2 minutes.
3a OPTIONAL, if possible: if sonar guy detects anything, do something (like 'play a sound', 'go to TC1')
4. Surface.
5. When on surface, switch engines on for speed of X.

What you think? Anybody capable and willing to make it?

Just look at the automation feature in TheDarkWraith's UI mod. I think this will do just what you want.

[Abd_von_Mumit]

Originally Posted by KarlKoch

Just look at the automation feature in TheDarkWraith's UI mod. I think this will do just what you want.

Well, just looked. Now I'll repost what I said in my first post: "I can't script. I just can't." I see bunch of defs and other thingies and I don't know what do do with them. This is why I started this thread.

[Trevally.]

[AS]
No hassle Hydrophone check
[CATEGORY]
Search on patrol
[COMMANDS]
Set_Time_Compression,2,0,0,0,0,0,0
Ahead_standard,0,0,0,0,0,0,0
Activate_NavMap_Station,0,0,0,0,0,0,0
Set_new_depth,30,0,0,0,0,0,40
All_stop,0,0,0,0,0,0,5
Hydrophone_normal_sweep,0,0,0,0,0,0,20
Report_nearest_sound_contact,0,0,0,0,0,0,20
Ahead_standard,0,0,0,0,0,0,1
Surface,0,0,0,0,0,0,5
Set_Time_Compression,128,0,0,0,0,0,7200
Loop,12,0,0,0,0,0,0
Set_Time_Compression,0,0,0,0,0,0,5
[COMMANDS_END]

Copy and paste this into sh5\data\automation\?????.sha

remember to save


Or install this http://www.filefront.com/17252061/So...eck Script.rar Check Script.rar

[Abd_von_Mumit]

Thank you VERY much.

Will try it as it is, but I already see I have some doubts, If you don't mind I'd like to understand it before I demand my men understand it as well.

Set_Time_Compression,2,0,0,0,0,0,0
Why set time compression? Couldn't it just run in any time compression user started it?

Ahead_standard,0,0,0,0,0,0,0
Could it be speed given in knots instead of steps? I travel at most fuel efficient speed of 7.5 and I want it to stay this way. How to specify it?

Activate_NavMap_Station,0,0,0,0,0,0,0
Why activate? Couldn't the script just run in any station I'm currently in? I hate when scripts move me.

Set_new_depth,30,0,0,0,0,0,40
Which values do I change to set it to 20 metres?

All_stop,0,0,0,0,0,0,5
Seems clear, but what is the 5 in the end?

Hydrophone_normal_sweep,0,0,0,0,0,0,20
Report_nearest_sound_contact,0,0,0,0,0,0,20
20?

Ahead_standard,0,0,0,0,0,0,1
1?

Surface,0,0,0,0,0,0,5
5?

Set_Time_Compression,128,0,0,0,0,0,7200
Seems I understand the 128 value. But what is 7200? Looks like 2 hours expressed in seconds.

Loop,12,0,0,0,0,0,0
12?

Set_Time_Compression,0,0,0,0,0,0,5

Also - can it be made to drop TC to 1 and/or play a sound when anything is heard in hydrophone?

I'd love to understand more of this, but I don't even know where to look for info.


EDIT: I chose the easy way and installed your mod. Thanks again. Will probably corrupt it by trying to edit, hehe.

[Abd_von_Mumit]

Testing happily. Still don't understand it all. As for now I shortened it to this:

Set_new_depth,30,0,0,0,0,0,50
All_stop,0,0,0,0,0,0,5
Hydrophone_normal_sweep,0,0,0,0,0,0,20
Report_nearest_sound_contact,0,0,0,0,0,0,20
Surface,0,0,0,0,0,0,50
Ahead_standard,0,0,0,0,0,0,1
Loop,12,0,0,0,0,0,0
Set_Time_Compression,1,0,0,0,0,0,5

EDIT: And it simply doesn't work at all. I must have messed it up too much.

[TheDarkWraith]

look in the file \data\Automation\TDW_Automation.SHA (you can open it with Notepad). It will explain every command, the syntax of the commands, and tell you how to make your own scripts.

[Abd_von_Mumit]

Originally Posted by TheDarkWraith

look in the file \data\Automation\TDW_Automation.SHA (you can open it with Notepad). It will explain every command, the syntax of the commands, and tell you how to make your own scripts.

Kha! I was checking wrong file before to find tips on scripting. Thanks.

[Abd_von_Mumit]

As for now I got this:

[AS]
Quick hydrophone check
[CATEGORY]
Search on patrol
[COMMANDS]
Activate_NavMap_Station,0,0,0,0,0,0,1
Set_Time_Compression,128,0,0,0,0,0,1
Set_new_speed,7.5,0,0,0,0,0,1
Set_new_depth,20,0,0,0,0,0,60
All_stop,0,0,0,0,0,0,5
Hydrophone_normal_sweep,0,0,0,0,0,0,120
Report_nearest_sound_contact,0,0,0,0,0,0,1
Surface,0,0,0,0,0,0,60
Set_new_speed,7.5,0,0,0,0,0,1
Loop,-1,0,0,0,0,0,0
Wait,0,0,0,0,0,0,3240
Set_Time_Compression,128,0,0,0,0,0,1
[COMMANDS_END]

Is there any way to add IFs?

[Trevally.]

Looks good

You need to swap the "loop" with the "wait".

Or you could add your wait time to the end of the second "set_speed" and remove the "wait" and last "set_time"

[TheDarkWraith]

Originally Posted by Abd_von_Mumit

As for now I got this:

[AS]
Quick hydrophone check
[CATEGORY]
Search on patrol
[COMMANDS]
Activate_NavMap_Station,0,0,0,0,0,0,1
Set_Time_Compression,128,0,0,0,0,0,1
Set_new_speed,7.5,0,0,0,0,0,1
Set_new_depth,20,0,0,0,0,0,60
All_stop,0,0,0,0,0,0,5
Hydrophone_normal_sweep,0,0,0,0,0,0,120
Report_nearest_sound_contact,0,0,0,0,0,0,1
Surface,0,0,0,0,0,0,60
Set_new_speed,7.5,0,0,0,0,0,1
Loop,-1,0,0,0,0,0,0
Wait,0,0,0,0,0,0,3240
Set_Time_Compression,128,0,0,0,0,0,1
[COMMANDS_END]

Is there any way to add IFs?

The Loop,-1,.... command will cause everything above it to loop indefinitely - the commands below it will never get executed.

I'm adding the ability to declare globals and some conditional testing but it isn't finished yet

What kind of conditional test were you wanting to perform?

[Abd_von_Mumit]

Thanks guys - just found out that the loop is ill placed.

The condition would be: if [any sound contact detected] then [drop TC to 1] and [report nearest contact] and [generally make a lot of noise so that I hear even when washing dishes] and [terminate the script].

[TheDarkWraith]

Originally Posted by Abd_von_Mumit

Thanks guys - just found out that the loop is ill placed.

The condition would be: if [any sound contact detected] then [drop TC to 1] and [report nearest contact] and [generally make a lot of noise so that I hear even when washing dishes] and [terminate the script].

ah, that functionality of dropping to TCx would best be put into the command....let me see if I have a parameter available or not......ah, param 5 is open.....what I'll do is add another bit to the sweep hydrophone command (bit 12) that will be set TC to 1 on contact detected

[Abd_von_Mumit]

Originally Posted by TheDarkWraith

ah, that functionality of dropping to TCx would best be put into the command....let me see if I have a parameter available or not......ah, param 5 is open.....what I'll do is add another bit to the sweep hydrophone command (bit 12) that will be set TC to 1 on contact detected

Wouldn't it be better and more consistent to set it to TCxOnMessageBoxTextDesiredTCLevel value?


As to the script I came to this so far:
[COMMANDS]
Activate_NavMap_Station,0,0,0,0,0,0,1
Set_Time_Compression,128,0,0,0,0,0,1
Set_new_depth,20,0,0,0,0,0,60
All_stop,0,0,0,0,0,0,5
Report_nearest_sound_contact,0,0,0,0,0,0,10
Surface,0,0,0,0,0,0,60
Set_new_speed,7.5,0,0,0,0,0,3240
Loop,-1,0,0,0,0,0,0
[COMMANDS_END]

If Trevally. doesn't mind I'd publish it after some more testing as a mod.


EDIT: Also if you put it into a command, it won't give user ability to terminate the script on an event. Also it won't let them to terminate the script on other contacts (like a plane). You would also need to modify number of options for some commands only, which would be inconsistent, wouldn't you?


EDIT 2: I found a bug: script doesn't recognize that game TC level changed and its [internal?] clock is still set to x128 when the game is for example in TC1.

[TheDarkWraith]

Originally Posted by Abd_von_Mumit

Wouldn't it be better and more consistent to set it to TCxOnMessageBoxTextDesiredTCLevel value?


As to the script I came to this so far:
[COMMANDS]
Activate_NavMap_Station,0,0,0,0,0,0,1
Set_Time_Compression,128,0,0,0,0,0,1
Set_new_depth,20,0,0,0,0,0,60
All_stop,0,0,0,0,0,0,5
Report_nearest_sound_contact,0,0,0,0,0,0,10
Surface,0,0,0,0,0,0,60
Set_new_speed,7.5,0,0,0,0,0,3240
Loop,-1,0,0,0,0,0,0
[COMMANDS_END]

If Trevally. doesn't mind I'd publish it after some more testing as a mod.


EDIT: Also if you put it into a command, it won't give user ability to terminate the script on an event. Also it won't let them to terminate the script on other contacts (like a plane). You would also need to modify number of options for some commands only, which would be inconsistent, wouldn't you?


EDIT 2: I found a bug: script doesn't recognize that game TC level changed and its [internal?] clock is still set to x128 when the game is for example in TC1.

change these commands:

Activate_NavMap_Station,0,0,0,0,0,0,1
Set_Time_Compression,128,0,0,0,0,0,1

to:

Activate_NavMap_Station,0,0,0,0,0,1,1
Set_Time_Compression,128,0,0,0,0,1,1

what the second to last 1 says is execute this command only once. This is used in loops where there's no need to be executing the command more than once.

Script will terminate just fine if I add bit 12. All it will do it set TC to 1 if bet 12 is set.

Explain your edit 2 more. I'm not following you.

I won't use parameter 5 for the TC level. I like your suggestion of using TCxOnMessageBoxTextDesiredTCLevel value