![]() |
SUBSIM: The Web's #1 resource for all submarine & naval simulations since 1997 |
![]() |
#6 |
Watch Officer
![]() Join Date: Sep 2001
Location: Cambridge, Canada
Posts: 335
Downloads: 39
Uploads: 0
|
![]()
VB6
![]() heres a sample output from when it was a KTB generator. Lots of kinks though, but it works. Kinda. Code:
19390901 1332 WEATHER: Clouds Clear, Precipitations None, Fog None|Wind Speed 4 meters per second, direction 188. 1338 Dive for trim test. 1345 Sound contact, sir! Warship Moving Fast Closing! Bearing 332! Long range! 1405 Surfaced 1406 Ship spotted, sir! Bearing 162! Long range! 1436 Ship spotted, sir! Bearing 003! Long range! 1816 Ship spotted, sir! Bearing 296! Long range! 19390902 0923 Ship spotted, sir! Bearing 293! Long range! 19390903 0311 Crash dive 0315 Surfaced 1257 Radio Message Received: Appendix 0 1400 Radio Message Received: Appendix 1 1403 Radio Message Received: Appendix 2 1551 Radio Message Received: Appendix 3 1753 Radio Message Received: Appendix 4 19390904 1201 Radio Message Received: Appendix 5 1346 Radio Message Received: Appendix 6 19390906 1142 Radio Message Received: Appendix 7 1508 Report sent!: 06/09/1939 15:08|U-3. POSITION GRID AN 81|TORPEDOES LEFT: 5 1543 Radio Message Received: Appendix 8 19390907 1201 Radio Message Received: Appendix 9 1308 Radio Message Received: Appendix 10 19390908 0811 WEATHER: Clouds Overcast, Precipitations None, Fog Medium|Wind Speed 15 meters per second, direction 52. 1139 Radio Message Received: Appendix 11 19390909 1503 Radio Report Received! Enemy Task Force, Grid AM 36, Course ESE, Speed 21 KTS! 19390910 0337 Ship spotted, sir! Bearing 124! Long range! 0342 Nearest visual contact at bearing 346, range 2700 meters! 0347 Firing tube 1, sir! Firing tube 2, sir! 0348 Torpedo Impact! 0349 Firing tube 3, sir! 0401 Firing tube 1, sir! Ship Sunk. 0402 Report sent!: 10/09/1939 04:02|U-3. POSITION GRID AN 81|TORPEDOES LEFT: 1|CARGO SHIPS SUNK: 1|TOTAL TONNAGE: 6274 0416 Radio Message Received: Appendix 12 1316 Radio Message Received: Appendix 13 19390912 0945 Radio Report Received! Enemy Warship, Grid AN 22, Course NNE, Speed 21 KTS! 19390914 1216 Ship spotted, sir! Bearing 046! Long range! 19390916 0131 Radio Message Received: Appendix 14 19390917 1831 Ship spotted, sir! Bearing 339! Long range! 2056 Ship spotted, sir! Bearing 037! Long range! 2104 Ship spotted, sir! Bearing 001! Long range! We'll see. I'll probably discover what made me stopped as I go through the code. ![]()
__________________
"Is the glass half-empty? Or half-full? Either way, when you're thirsty, there's water to be had in that glass." - Neal Stevens |
![]() |
![]() |
|
|