Skychart

User Tools

Site Tools

Trace: • script_reference
en:documentation:script_reference

Differences

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

Link to this comparison view

Both sides previous revisionPrevious revision
Next revision		Previous revision
en:documentation:script_reference [2014/10/11 13:59] – [Formating and conversion] pchen:documentation:script_reference [2017/02/22 11:19] (current) – [Formating and conversion] pch
Line 133: Line 133:
 ^function AsteroidMark(list:TstringList):boolean;^ ^function AsteroidMark(list:TstringList):boolean;^
 |Mark the listed asteroid to the chart| |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;^ ^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| |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;^ ^function IsNumber(str: String): boolean;^
Line 201: Line 226:
  
 Also see the [[script_example|example]] about how to call a function in an external library. 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|
 +
 +
 +
 +
  
en/documentation/script_reference.1413028783.txt.gz · Last modified: 2015/11/06 20:34 (external edit)