Differences

This shows you the differences between two versions of the page.

--- en:documentation:script_reference [2014/10/11 13:53] – [Dialog] pch
+++ en:documentation:script_reference [2017/02/22 11:19] (current) – [Formating and conversion] pch
@@ Line 133: / Line 133: @@
 ^function AsteroidMark(list:TstringList):boolean;^
 |Mark the listed asteroid to the chart|
+===== Coordinates conversion =====
+^Procedure Eq2Hz(var ra,de : double ; var a,h : double);^
+|Convert Equatorial ra,de to Alt/Az a,h for the location and time of the current chart, all angle in radian|
+^Procedure Hz2Eq(var a,h : double; var ra,de : double);^
+|Convert Alt/Az a,h to equatorial ra,de for the location and time of the current chart, all angle in radian|
+^Procedure Eq2Gal(var ra,de : double ; var l,b : double);^
+|Convert Equatorial ra,de to Galactic l,b , all angle in radian|
+^Procedure Gal2Eq(var l,b : double; var ra,de : double);^
+|Convert Galactic l,b to equatorial ra,de , all angle in radian|
+^Procedure Eq2Ecl(var ra,de : double ; var l,b : double);^
+|Convert Equatorial ra,de to Ecliptic l,b with obliquity for the date of the current chart, all angle in radian |
+^Procedure Ecl2Eq(var l,b : double; var ra,de : double);^
+|Convert Ecliptic l,b to Equatorial ra,de with obliquity for the date of the current chart, all angle in radian|
@@ Line 160: / Line 182: @@
 ^Function Format(Const Fmt : String; const Args : Array of const) : String;^
 |The [[http://www.freepascal.org/docs-html/rtl/sysutils/format.html|Format]] Pascal function|
+^Procedure StrtoFloatD(str:string; var defval: Double; var val: Double);^
+|Convert a string to a floating point value. Return defval if the string is a invalid number |
 ^function IsNumber(str: String): boolean;^
 |Return True if the string represent a valid number|
+^function StringReplace(str,s1,s2: String): string;^
+|Replace all occurrence of s1 by s2 in str|
+^procedure JsonToStringlist(jsontxt:string; var SK,SV: TStringList);^
+|Parse a JSON formated string and return two stringlist. SK contain the names and SV the corresponding values|
 ===== Dialog =====
@@ Line 193: / Line 226: @@
 Also see the [[script_example|example]] about how to call a function in an external library.
+===== TCP/IP client socket =====
+For all this functions **socknum** identify the socket to use. This is a number between 1 and 10, thus allowing 10 simultaneous connection to different server.
+^function TcpConnect(socknum:integer; ipaddr,port,timeout:string):boolean;^
+|Connect to the server at ipaddr:port and set the **timeout** for the subsequent operations|
+^function TcpDisconnect(socknum:integer):boolean;^
+|Disconnect from the server|
+^Function TcpConnected(socknum:integer) : boolean;^
+|Return **True** if the socket is connected|
+^Function TcpRead(socknum:integer; var buf : string; termchar:string) : boolean;^
+|Read data from the socket until the character **termchar** is encountered, typically termchar is CRLF|
+^Function TcpReadCount(socknum:integer; var buf : string; var count : integer) : boolean;^
+|Read data from the socket until **count** character are read or **timeout** is reached|
+^Function TcpWrite(socknum:integer; var buf : string; var count : integer) : boolean;^
+|Write data to the socket from **buf** for a length of **count**|
+^Procedure TcpPurgeBuffer(socknum:integer);^
+|Purge all the received data currently queued in the receive buffer|