Library to control serial LCDs from 4D systems based on their Goldelox processor. Ported from Adruino library but not fully tested.

Dependents:   mbed_rifletool

This library facilitates serial communication with LCDs from 4D Systems based on their Goldelox processor. It was ported form an Arduino library published by 4D systems.

Documentation on the API can be found at: http://www.4dsystems.com.au/product/1/4/4D_Intelligent_Display_Modules/uLCD_144_G2/

Committer:
Sailing_Nut
Date:
Sat Oct 05 02:40:39 2013 +0000
Revision:
0:6987c004e123
Initial version of 4D Systems Goldelox LCD library

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Sailing_Nut 0:6987c004e123 1 /*
Sailing_Nut 0:6987c004e123 2 Goldelox_Serial_4DLib.cpp - Library for 4D Systems Serial Environment.
Sailing_Nut 0:6987c004e123 3 */
Sailing_Nut 0:6987c004e123 4
Sailing_Nut 0:6987c004e123 5 #include "mbed.h"
Sailing_Nut 0:6987c004e123 6 #include "Goldelox_Serial_4DLib.h"
Sailing_Nut 0:6987c004e123 7
Sailing_Nut 0:6987c004e123 8
Sailing_Nut 0:6987c004e123 9 Goldelox_Serial_4DLib::Goldelox_Serial_4DLib(Serial * virtualPort) {
Sailing_Nut 0:6987c004e123 10 _virtualPort = virtualPort;
Sailing_Nut 0:6987c004e123 11 TimeLimit4D = 2000; // Give a default value to the timeout
Sailing_Nut 0:6987c004e123 12 while(_virtualPort->readable())
Sailing_Nut 0:6987c004e123 13 {
Sailing_Nut 0:6987c004e123 14 _virtualPort->getc() ;
Sailing_Nut 0:6987c004e123 15 }
Sailing_Nut 0:6987c004e123 16
Sailing_Nut 0:6987c004e123 17 }
Sailing_Nut 0:6987c004e123 18
Sailing_Nut 0:6987c004e123 19 //*********************************************************************************************//
Sailing_Nut 0:6987c004e123 20 //**********************************Intrinsic 4D Routines**************************************//
Sailing_Nut 0:6987c004e123 21 //*********************************************************************************************//
Sailing_Nut 0:6987c004e123 22
Sailing_Nut 0:6987c004e123 23 void Goldelox_Serial_4DLib::WriteChars(char * charsout)
Sailing_Nut 0:6987c004e123 24 {
Sailing_Nut 0:6987c004e123 25 _virtualPort->printf(charsout) ;
Sailing_Nut 0:6987c004e123 26 _virtualPort->putc(0);
Sailing_Nut 0:6987c004e123 27 }
Sailing_Nut 0:6987c004e123 28
Sailing_Nut 0:6987c004e123 29 void Goldelox_Serial_4DLib::WriteBytes(char * Source, int Size)
Sailing_Nut 0:6987c004e123 30 {
Sailing_Nut 0:6987c004e123 31 unsigned char wk ;
Sailing_Nut 0:6987c004e123 32 int i ;
Sailing_Nut 0:6987c004e123 33 for (i = 0; i < Size; i++)
Sailing_Nut 0:6987c004e123 34 {
Sailing_Nut 0:6987c004e123 35 wk = *Source++ ;
Sailing_Nut 0:6987c004e123 36 _virtualPort->putc(wk) ;
Sailing_Nut 0:6987c004e123 37 }
Sailing_Nut 0:6987c004e123 38 }
Sailing_Nut 0:6987c004e123 39
Sailing_Nut 0:6987c004e123 40 void Goldelox_Serial_4DLib::WriteWords(short * Source, short Size)
Sailing_Nut 0:6987c004e123 41 {
Sailing_Nut 0:6987c004e123 42 short wk ;
Sailing_Nut 0:6987c004e123 43 short i ;
Sailing_Nut 0:6987c004e123 44 for (i = 0; i < Size; i++)
Sailing_Nut 0:6987c004e123 45 {
Sailing_Nut 0:6987c004e123 46 wk = *Source++ ;
Sailing_Nut 0:6987c004e123 47 _virtualPort->putc(wk >> 8) ;
Sailing_Nut 0:6987c004e123 48 _virtualPort->putc(wk) ;
Sailing_Nut 0:6987c004e123 49 }
Sailing_Nut 0:6987c004e123 50 }
Sailing_Nut 0:6987c004e123 51
Sailing_Nut 0:6987c004e123 52 void Goldelox_Serial_4DLib::getbytes(char * data, int size)
Sailing_Nut 0:6987c004e123 53 {
Sailing_Nut 0:6987c004e123 54 int readc ;
Sailing_Nut 0:6987c004e123 55 readc = 0 ;
Sailing_Nut 0:6987c004e123 56 Timer t;
Sailing_Nut 0:6987c004e123 57 t.start();
Sailing_Nut 0:6987c004e123 58 while ((readc != size) && (t.read_ms() < TimeLimit4D))
Sailing_Nut 0:6987c004e123 59 {
Sailing_Nut 0:6987c004e123 60 if(_virtualPort->readable())
Sailing_Nut 0:6987c004e123 61 {
Sailing_Nut 0:6987c004e123 62 data[readc++] = _virtualPort->getc() ;
Sailing_Nut 0:6987c004e123 63 }
Sailing_Nut 0:6987c004e123 64 }
Sailing_Nut 0:6987c004e123 65 if (readc != size)
Sailing_Nut 0:6987c004e123 66 {
Sailing_Nut 0:6987c004e123 67 Error4D = Err4D_Timeout ;
Sailing_Nut 0:6987c004e123 68 if (Callback4D != NULL)
Sailing_Nut 0:6987c004e123 69 Callback4D(Error4D, Error4D_Inv) ;
Sailing_Nut 0:6987c004e123 70 }
Sailing_Nut 0:6987c004e123 71 }
Sailing_Nut 0:6987c004e123 72
Sailing_Nut 0:6987c004e123 73 void Goldelox_Serial_4DLib::GetAck(void)
Sailing_Nut 0:6987c004e123 74 {
Sailing_Nut 0:6987c004e123 75 int read ;
Sailing_Nut 0:6987c004e123 76 unsigned char readx = ' ' ;
Sailing_Nut 0:6987c004e123 77 Error4D = Err4D_OK ;
Sailing_Nut 0:6987c004e123 78 Timer t;
Sailing_Nut 0:6987c004e123 79 t.start();
Sailing_Nut 0:6987c004e123 80 read = 0 ;
Sailing_Nut 0:6987c004e123 81 int ms = 0;
Sailing_Nut 0:6987c004e123 82 while ((read != 1) && (t.read_ms() < TimeLimit4D))
Sailing_Nut 0:6987c004e123 83 {
Sailing_Nut 0:6987c004e123 84 ms = t.read_ms();
Sailing_Nut 0:6987c004e123 85 if(_virtualPort->readable() != 0)
Sailing_Nut 0:6987c004e123 86 {
Sailing_Nut 0:6987c004e123 87 readx = _virtualPort->getc() ;
Sailing_Nut 0:6987c004e123 88 read = 1 ;
Sailing_Nut 0:6987c004e123 89 }
Sailing_Nut 0:6987c004e123 90 }
Sailing_Nut 0:6987c004e123 91 if (read == 0)
Sailing_Nut 0:6987c004e123 92 {
Sailing_Nut 0:6987c004e123 93 Error4D = Err4D_Timeout ;
Sailing_Nut 0:6987c004e123 94 if (Callback4D != NULL)
Sailing_Nut 0:6987c004e123 95 Callback4D(ms, 'T') ;
Sailing_Nut 0:6987c004e123 96 }
Sailing_Nut 0:6987c004e123 97 else if (readx != 6)
Sailing_Nut 0:6987c004e123 98 {
Sailing_Nut 0:6987c004e123 99 Error4D = Err4D_NAK ;
Sailing_Nut 0:6987c004e123 100 Error4D_Inv = readx ;
Sailing_Nut 0:6987c004e123 101 if (Callback4D != NULL)
Sailing_Nut 0:6987c004e123 102 Callback4D(Error4D, Error4D_Inv) ;
Sailing_Nut 0:6987c004e123 103 }
Sailing_Nut 0:6987c004e123 104 }
Sailing_Nut 0:6987c004e123 105
Sailing_Nut 0:6987c004e123 106 short Goldelox_Serial_4DLib::GetWord(void)
Sailing_Nut 0:6987c004e123 107 {
Sailing_Nut 0:6987c004e123 108 unsigned char readx[2] ;
Sailing_Nut 0:6987c004e123 109 int readc ;
Sailing_Nut 0:6987c004e123 110
Sailing_Nut 0:6987c004e123 111 if (Error4D != Err4D_OK)
Sailing_Nut 0:6987c004e123 112 return 0 ;
Sailing_Nut 0:6987c004e123 113 Timer t;
Sailing_Nut 0:6987c004e123 114 t.start();
Sailing_Nut 0:6987c004e123 115 readc = 0 ;
Sailing_Nut 0:6987c004e123 116 while ((readc != 2) && (t.read_ms() < TimeLimit4D))
Sailing_Nut 0:6987c004e123 117 {
Sailing_Nut 0:6987c004e123 118 if(_virtualPort->readable())
Sailing_Nut 0:6987c004e123 119 {
Sailing_Nut 0:6987c004e123 120 readx[readc++] = _virtualPort->getc() ;
Sailing_Nut 0:6987c004e123 121 }
Sailing_Nut 0:6987c004e123 122 }
Sailing_Nut 0:6987c004e123 123
Sailing_Nut 0:6987c004e123 124 if (readc != 2)
Sailing_Nut 0:6987c004e123 125 {
Sailing_Nut 0:6987c004e123 126 Error4D = Err4D_Timeout ;
Sailing_Nut 0:6987c004e123 127 if (Callback4D != NULL)
Sailing_Nut 0:6987c004e123 128 Callback4D(Error4D, Error4D_Inv) ;
Sailing_Nut 0:6987c004e123 129 return 0 ;
Sailing_Nut 0:6987c004e123 130 }
Sailing_Nut 0:6987c004e123 131 else
Sailing_Nut 0:6987c004e123 132 return readx[0] << 8 | readx[1] ;
Sailing_Nut 0:6987c004e123 133 }
Sailing_Nut 0:6987c004e123 134
Sailing_Nut 0:6987c004e123 135 void Goldelox_Serial_4DLib::getString(char * outStr, int strLen)
Sailing_Nut 0:6987c004e123 136 {
Sailing_Nut 0:6987c004e123 137 int readc ;
Sailing_Nut 0:6987c004e123 138
Sailing_Nut 0:6987c004e123 139 if (Error4D != Err4D_OK)
Sailing_Nut 0:6987c004e123 140 {
Sailing_Nut 0:6987c004e123 141 outStr[0] = 0 ;
Sailing_Nut 0:6987c004e123 142 return ;
Sailing_Nut 0:6987c004e123 143 }
Sailing_Nut 0:6987c004e123 144 Timer t;
Sailing_Nut 0:6987c004e123 145 t.start();
Sailing_Nut 0:6987c004e123 146 readc = 0 ;
Sailing_Nut 0:6987c004e123 147 while ((readc != strLen) && (t.read_ms() < TimeLimit4D))
Sailing_Nut 0:6987c004e123 148 {
Sailing_Nut 0:6987c004e123 149 if(_virtualPort->readable())
Sailing_Nut 0:6987c004e123 150 {
Sailing_Nut 0:6987c004e123 151 outStr[readc++] = _virtualPort->getc() ;
Sailing_Nut 0:6987c004e123 152 }
Sailing_Nut 0:6987c004e123 153 }
Sailing_Nut 0:6987c004e123 154
Sailing_Nut 0:6987c004e123 155 if (readc != strLen)
Sailing_Nut 0:6987c004e123 156 {
Sailing_Nut 0:6987c004e123 157 Error4D = Err4D_Timeout ;
Sailing_Nut 0:6987c004e123 158 if (Callback4D != NULL)
Sailing_Nut 0:6987c004e123 159 Callback4D(Error4D, Error4D_Inv) ;
Sailing_Nut 0:6987c004e123 160 }
Sailing_Nut 0:6987c004e123 161 outStr[readc] = 0 ;
Sailing_Nut 0:6987c004e123 162 }
Sailing_Nut 0:6987c004e123 163
Sailing_Nut 0:6987c004e123 164 short Goldelox_Serial_4DLib::GetAckResp(void)
Sailing_Nut 0:6987c004e123 165 {
Sailing_Nut 0:6987c004e123 166 GetAck() ;
Sailing_Nut 0:6987c004e123 167 return GetWord() ;
Sailing_Nut 0:6987c004e123 168 }
Sailing_Nut 0:6987c004e123 169
Sailing_Nut 0:6987c004e123 170 short Goldelox_Serial_4DLib::GetAckRes2Words(short * word1, short * word2)
Sailing_Nut 0:6987c004e123 171 {
Sailing_Nut 0:6987c004e123 172 int Result ;
Sailing_Nut 0:6987c004e123 173 GetAck() ;
Sailing_Nut 0:6987c004e123 174 Result = GetWord() ;
Sailing_Nut 0:6987c004e123 175 *word1 = GetWord() ;
Sailing_Nut 0:6987c004e123 176 *word2 = GetWord() ;
Sailing_Nut 0:6987c004e123 177 return Result ;
Sailing_Nut 0:6987c004e123 178 }
Sailing_Nut 0:6987c004e123 179
Sailing_Nut 0:6987c004e123 180 void Goldelox_Serial_4DLib::GetAck2Words(short * word1, short * word2)
Sailing_Nut 0:6987c004e123 181 {
Sailing_Nut 0:6987c004e123 182 GetAck() ;
Sailing_Nut 0:6987c004e123 183 *word1 = GetWord() ;
Sailing_Nut 0:6987c004e123 184 *word2 = GetWord() ;
Sailing_Nut 0:6987c004e123 185 }
Sailing_Nut 0:6987c004e123 186
Sailing_Nut 0:6987c004e123 187 short Goldelox_Serial_4DLib::GetAckResStr(char * OutStr)
Sailing_Nut 0:6987c004e123 188 {
Sailing_Nut 0:6987c004e123 189 int Result ;
Sailing_Nut 0:6987c004e123 190 GetAck() ;
Sailing_Nut 0:6987c004e123 191 Result = GetWord() ;
Sailing_Nut 0:6987c004e123 192 getString(OutStr, Result) ;
Sailing_Nut 0:6987c004e123 193 return Result ;
Sailing_Nut 0:6987c004e123 194 }
Sailing_Nut 0:6987c004e123 195 /*
Sailing_Nut 0:6987c004e123 196 short Goldelox_Serial_4DLib::GetAckResData(t4DByteArray OutData, short size)
Sailing_Nut 0:6987c004e123 197 {
Sailing_Nut 0:6987c004e123 198 int Result ;
Sailing_Nut 0:6987c004e123 199 GetAck() ;
Sailing_Nut 0:6987c004e123 200 Result = GetWord() ;
Sailing_Nut 0:6987c004e123 201 getbytes(OutData, size) ;
Sailing_Nut 0:6987c004e123 202 return Result ;
Sailing_Nut 0:6987c004e123 203 }
Sailing_Nut 0:6987c004e123 204 */
Sailing_Nut 0:6987c004e123 205 void Goldelox_Serial_4DLib::SetThisBaudrate(int Newrate)
Sailing_Nut 0:6987c004e123 206 {
Sailing_Nut 0:6987c004e123 207 int br = 0;
Sailing_Nut 0:6987c004e123 208 while(_virtualPort->readable())
Sailing_Nut 0:6987c004e123 209 {
Sailing_Nut 0:6987c004e123 210 _virtualPort->getc() ;
Sailing_Nut 0:6987c004e123 211 }
Sailing_Nut 0:6987c004e123 212 switch(Newrate)
Sailing_Nut 0:6987c004e123 213 {
Sailing_Nut 0:6987c004e123 214 case BAUD_110 : br = 110 ;
Sailing_Nut 0:6987c004e123 215 break ;
Sailing_Nut 0:6987c004e123 216 case BAUD_300 : br = 300 ;
Sailing_Nut 0:6987c004e123 217 break ;
Sailing_Nut 0:6987c004e123 218 case BAUD_600 : br = 600 ;
Sailing_Nut 0:6987c004e123 219 break ;
Sailing_Nut 0:6987c004e123 220 case BAUD_1200 : br = 1200 ;
Sailing_Nut 0:6987c004e123 221 break ;
Sailing_Nut 0:6987c004e123 222 case BAUD_2400 : br = 2400 ;
Sailing_Nut 0:6987c004e123 223 break ;
Sailing_Nut 0:6987c004e123 224 case BAUD_4800 : br = 4800 ;
Sailing_Nut 0:6987c004e123 225 break ;
Sailing_Nut 0:6987c004e123 226 case BAUD_9600 : br = 9600 ;
Sailing_Nut 0:6987c004e123 227 break ;
Sailing_Nut 0:6987c004e123 228 case BAUD_14400 : br = 14400 ;
Sailing_Nut 0:6987c004e123 229 break ;
Sailing_Nut 0:6987c004e123 230 case BAUD_19200 : br = 19200 ;
Sailing_Nut 0:6987c004e123 231 break ;
Sailing_Nut 0:6987c004e123 232 /* case BAUD_31250 : br = 31250 ;
Sailing_Nut 0:6987c004e123 233 break ;*/
Sailing_Nut 0:6987c004e123 234 case BAUD_38400 : br = 38400 ;
Sailing_Nut 0:6987c004e123 235 break ;
Sailing_Nut 0:6987c004e123 236 case BAUD_56000 : br = 56000 ;
Sailing_Nut 0:6987c004e123 237 break ;
Sailing_Nut 0:6987c004e123 238 case BAUD_57600 : br = 57600 ;
Sailing_Nut 0:6987c004e123 239 break ;
Sailing_Nut 0:6987c004e123 240 case BAUD_115200 : br = 115200 ;
Sailing_Nut 0:6987c004e123 241 break ;
Sailing_Nut 0:6987c004e123 242 /* case BAUD_128000 : br = 133928 ; // actual rate is not 128000 ;
Sailing_Nut 0:6987c004e123 243 break ;
Sailing_Nut 0:6987c004e123 244 case BAUD_256000 : br = 281250 ; // actual rate is not 256000 ;
Sailing_Nut 0:6987c004e123 245 break ;
Sailing_Nut 0:6987c004e123 246 case BAUD_300000 : br = 312500 ; // actual rate is not 300000 ;
Sailing_Nut 0:6987c004e123 247 break ;
Sailing_Nut 0:6987c004e123 248 case BAUD_375000 : br = 401785 ; // actual rate is not 375000 ;
Sailing_Nut 0:6987c004e123 249 break ;
Sailing_Nut 0:6987c004e123 250 case BAUD_500000 : br = 562500 ; // actual rate is not 500000 ;
Sailing_Nut 0:6987c004e123 251 break ;
Sailing_Nut 0:6987c004e123 252 case BAUD_600000 : br = 703125 ; // actual rate is not 600000 ;
Sailing_Nut 0:6987c004e123 253 break ;*/
Sailing_Nut 0:6987c004e123 254 }
Sailing_Nut 0:6987c004e123 255 _virtualPort->baud(br) ;
Sailing_Nut 0:6987c004e123 256 wait_ms(50); // Display sleeps for 100
Sailing_Nut 0:6987c004e123 257 while(_virtualPort->readable())
Sailing_Nut 0:6987c004e123 258 {
Sailing_Nut 0:6987c004e123 259 _virtualPort->getc() ;
Sailing_Nut 0:6987c004e123 260 }
Sailing_Nut 0:6987c004e123 261 }
Sailing_Nut 0:6987c004e123 262
Sailing_Nut 0:6987c004e123 263 //*********************************************************************************************//
Sailing_Nut 0:6987c004e123 264 //**********************************Compound 4D Routines***************************************//
Sailing_Nut 0:6987c004e123 265 //*********************************************************************************************//
Sailing_Nut 0:6987c004e123 266
Sailing_Nut 0:6987c004e123 267 short Goldelox_Serial_4DLib::charheight(char TestChar)
Sailing_Nut 0:6987c004e123 268 {
Sailing_Nut 0:6987c004e123 269 _virtualPort->putc((char)(F_charheight >> 8)) ;
Sailing_Nut 0:6987c004e123 270 _virtualPort->putc((char)(F_charheight)) ;
Sailing_Nut 0:6987c004e123 271 _virtualPort->putc((char)(TestChar)) ;
Sailing_Nut 0:6987c004e123 272 return GetAckResp() ;
Sailing_Nut 0:6987c004e123 273 }
Sailing_Nut 0:6987c004e123 274
Sailing_Nut 0:6987c004e123 275 short Goldelox_Serial_4DLib::charwidth(char TestChar)
Sailing_Nut 0:6987c004e123 276 {
Sailing_Nut 0:6987c004e123 277 _virtualPort->putc((char)(F_charwidth >> 8)) ;
Sailing_Nut 0:6987c004e123 278 _virtualPort->putc((char)(F_charwidth)) ;
Sailing_Nut 0:6987c004e123 279 _virtualPort->putc((char)(TestChar)) ;
Sailing_Nut 0:6987c004e123 280 return GetAckResp() ;
Sailing_Nut 0:6987c004e123 281 }
Sailing_Nut 0:6987c004e123 282
Sailing_Nut 0:6987c004e123 283 void Goldelox_Serial_4DLib::gfx_BGcolour(short Color)
Sailing_Nut 0:6987c004e123 284 {
Sailing_Nut 0:6987c004e123 285 _virtualPort->putc((char)(F_gfx_BGcolour >> 8)) ;
Sailing_Nut 0:6987c004e123 286 _virtualPort->putc((char)(F_gfx_BGcolour)) ;
Sailing_Nut 0:6987c004e123 287 _virtualPort->putc((char)(Color >> 8)) ;
Sailing_Nut 0:6987c004e123 288 _virtualPort->putc((char)(Color)) ;
Sailing_Nut 0:6987c004e123 289 GetAck() ;
Sailing_Nut 0:6987c004e123 290 }
Sailing_Nut 0:6987c004e123 291
Sailing_Nut 0:6987c004e123 292 void Goldelox_Serial_4DLib::gfx_ChangeColour(short OldColor, short NewColor)
Sailing_Nut 0:6987c004e123 293 {
Sailing_Nut 0:6987c004e123 294 _virtualPort->putc((char)(F_gfx_ChangeColour >> 8)) ;
Sailing_Nut 0:6987c004e123 295 _virtualPort->putc((char)(F_gfx_ChangeColour)) ;
Sailing_Nut 0:6987c004e123 296 _virtualPort->putc((char)(OldColor >> 8)) ;
Sailing_Nut 0:6987c004e123 297 _virtualPort->putc((char)(OldColor)) ;
Sailing_Nut 0:6987c004e123 298 _virtualPort->putc((char)(NewColor >> 8)) ;
Sailing_Nut 0:6987c004e123 299 _virtualPort->putc((char)(NewColor)) ;
Sailing_Nut 0:6987c004e123 300 GetAck() ;
Sailing_Nut 0:6987c004e123 301 }
Sailing_Nut 0:6987c004e123 302
Sailing_Nut 0:6987c004e123 303 void Goldelox_Serial_4DLib::gfx_Circle(short X, short Y, short Radius, short Color)
Sailing_Nut 0:6987c004e123 304 {
Sailing_Nut 0:6987c004e123 305 _virtualPort->putc((char)(F_gfx_Circle >> 8)) ;
Sailing_Nut 0:6987c004e123 306 _virtualPort->putc((char)(F_gfx_Circle)) ;
Sailing_Nut 0:6987c004e123 307 _virtualPort->putc((char)(X >> 8)) ;
Sailing_Nut 0:6987c004e123 308 _virtualPort->putc((char)(X)) ;
Sailing_Nut 0:6987c004e123 309 _virtualPort->putc((char)(Y >> 8)) ;
Sailing_Nut 0:6987c004e123 310 _virtualPort->putc((char)(Y)) ;
Sailing_Nut 0:6987c004e123 311 _virtualPort->putc((char)(Radius >> 8)) ;
Sailing_Nut 0:6987c004e123 312 _virtualPort->putc((char)(Radius)) ;
Sailing_Nut 0:6987c004e123 313 _virtualPort->putc((char)(Color >> 8)) ;
Sailing_Nut 0:6987c004e123 314 _virtualPort->putc((char)(Color)) ;
Sailing_Nut 0:6987c004e123 315 GetAck() ;
Sailing_Nut 0:6987c004e123 316 }
Sailing_Nut 0:6987c004e123 317
Sailing_Nut 0:6987c004e123 318 void Goldelox_Serial_4DLib::gfx_CircleFilled(short X, short Y, short Radius, short Color)
Sailing_Nut 0:6987c004e123 319 {
Sailing_Nut 0:6987c004e123 320 _virtualPort->putc((char)(F_gfx_CircleFilled >> 8)) ;
Sailing_Nut 0:6987c004e123 321 _virtualPort->putc((char)(F_gfx_CircleFilled)) ;
Sailing_Nut 0:6987c004e123 322 _virtualPort->putc((char)(X >> 8)) ;
Sailing_Nut 0:6987c004e123 323 _virtualPort->putc((char)(X)) ;
Sailing_Nut 0:6987c004e123 324 _virtualPort->putc((char)(Y >> 8)) ;
Sailing_Nut 0:6987c004e123 325 _virtualPort->putc((char)(Y)) ;
Sailing_Nut 0:6987c004e123 326 _virtualPort->putc((char)(Radius >> 8)) ;
Sailing_Nut 0:6987c004e123 327 _virtualPort->putc((char)(Radius)) ;
Sailing_Nut 0:6987c004e123 328 _virtualPort->putc((char)(Color >> 8)) ;
Sailing_Nut 0:6987c004e123 329 _virtualPort->putc((char)(Color)) ;
Sailing_Nut 0:6987c004e123 330 GetAck() ;
Sailing_Nut 0:6987c004e123 331 }
Sailing_Nut 0:6987c004e123 332
Sailing_Nut 0:6987c004e123 333 void Goldelox_Serial_4DLib::gfx_Clipping(short OnOff)
Sailing_Nut 0:6987c004e123 334 {
Sailing_Nut 0:6987c004e123 335 _virtualPort->putc((char)(F_gfx_Clipping >> 8)) ;
Sailing_Nut 0:6987c004e123 336 _virtualPort->putc((char)(F_gfx_Clipping)) ;
Sailing_Nut 0:6987c004e123 337 _virtualPort->putc((char)(OnOff >> 8)) ;
Sailing_Nut 0:6987c004e123 338 _virtualPort->putc((char)(OnOff)) ;
Sailing_Nut 0:6987c004e123 339 GetAck() ;
Sailing_Nut 0:6987c004e123 340 }
Sailing_Nut 0:6987c004e123 341
Sailing_Nut 0:6987c004e123 342 void Goldelox_Serial_4DLib::gfx_ClipWindow(short X1, short Y1, short X2, short Y2)
Sailing_Nut 0:6987c004e123 343 {
Sailing_Nut 0:6987c004e123 344 _virtualPort->putc((char)(F_gfx_ClipWindow >> 8)) ;
Sailing_Nut 0:6987c004e123 345 _virtualPort->putc((char)(F_gfx_ClipWindow)) ;
Sailing_Nut 0:6987c004e123 346 _virtualPort->putc((char)(X1 >> 8)) ;
Sailing_Nut 0:6987c004e123 347 _virtualPort->putc((char)(X1)) ;
Sailing_Nut 0:6987c004e123 348 _virtualPort->putc((char)(Y1 >> 8)) ;
Sailing_Nut 0:6987c004e123 349 _virtualPort->putc((char)(Y1)) ;
Sailing_Nut 0:6987c004e123 350 _virtualPort->putc((char)(X2 >> 8)) ;
Sailing_Nut 0:6987c004e123 351 _virtualPort->putc((char)(X2)) ;
Sailing_Nut 0:6987c004e123 352 _virtualPort->putc((char)(Y2 >> 8)) ;
Sailing_Nut 0:6987c004e123 353 _virtualPort->putc((char)(Y2)) ;
Sailing_Nut 0:6987c004e123 354 GetAck() ;
Sailing_Nut 0:6987c004e123 355 }
Sailing_Nut 0:6987c004e123 356
Sailing_Nut 0:6987c004e123 357 void Goldelox_Serial_4DLib::gfx_Cls()
Sailing_Nut 0:6987c004e123 358 {
Sailing_Nut 0:6987c004e123 359 _virtualPort->putc((char)(F_gfx_Cls >> 8)) ;
Sailing_Nut 0:6987c004e123 360 _virtualPort->putc((char)(F_gfx_Cls)) ;
Sailing_Nut 0:6987c004e123 361 GetAck() ;
Sailing_Nut 0:6987c004e123 362 }
Sailing_Nut 0:6987c004e123 363
Sailing_Nut 0:6987c004e123 364 void Goldelox_Serial_4DLib::gfx_Contrast(short Contrast)
Sailing_Nut 0:6987c004e123 365 {
Sailing_Nut 0:6987c004e123 366 _virtualPort->putc((char)(F_gfx_Contrast >> 8)) ;
Sailing_Nut 0:6987c004e123 367 _virtualPort->putc((char)(F_gfx_Contrast)) ;
Sailing_Nut 0:6987c004e123 368 _virtualPort->putc((char)(Contrast >> 8)) ;
Sailing_Nut 0:6987c004e123 369 _virtualPort->putc((char)(Contrast)) ;
Sailing_Nut 0:6987c004e123 370 GetAck() ;
Sailing_Nut 0:6987c004e123 371 }
Sailing_Nut 0:6987c004e123 372
Sailing_Nut 0:6987c004e123 373 void Goldelox_Serial_4DLib::gfx_FrameDelay(short Msec)
Sailing_Nut 0:6987c004e123 374 {
Sailing_Nut 0:6987c004e123 375 _virtualPort->putc((char)(F_gfx_FrameDelay >> 8)) ;
Sailing_Nut 0:6987c004e123 376 _virtualPort->putc((char)(F_gfx_FrameDelay)) ;
Sailing_Nut 0:6987c004e123 377 _virtualPort->putc((char)(Msec >> 8)) ;
Sailing_Nut 0:6987c004e123 378 _virtualPort->putc((char)(Msec)) ;
Sailing_Nut 0:6987c004e123 379 GetAck() ;
Sailing_Nut 0:6987c004e123 380 }
Sailing_Nut 0:6987c004e123 381
Sailing_Nut 0:6987c004e123 382 short Goldelox_Serial_4DLib::gfx_GetPixel(short X, short Y)
Sailing_Nut 0:6987c004e123 383 {
Sailing_Nut 0:6987c004e123 384 _virtualPort->putc((char)(F_gfx_GetPixel >> 8 )) ;
Sailing_Nut 0:6987c004e123 385 _virtualPort->putc((char)(F_gfx_GetPixel )) ;
Sailing_Nut 0:6987c004e123 386 _virtualPort->putc((char)(X >> 8 )) ;
Sailing_Nut 0:6987c004e123 387 _virtualPort->putc((char)(X )) ;
Sailing_Nut 0:6987c004e123 388 _virtualPort->putc((char)(Y >> 8 )) ;
Sailing_Nut 0:6987c004e123 389 _virtualPort->putc((char)(Y )) ;
Sailing_Nut 0:6987c004e123 390 return GetAckResp() ;
Sailing_Nut 0:6987c004e123 391 }
Sailing_Nut 0:6987c004e123 392
Sailing_Nut 0:6987c004e123 393 void Goldelox_Serial_4DLib::gfx_Line(short X1, short Y1, short X2, short Y2, short Color)
Sailing_Nut 0:6987c004e123 394 {
Sailing_Nut 0:6987c004e123 395 _virtualPort->putc((char)(F_gfx_Line >> 8 )) ;
Sailing_Nut 0:6987c004e123 396 _virtualPort->putc((char)(F_gfx_Line )) ;
Sailing_Nut 0:6987c004e123 397 _virtualPort->putc((char)(X1 >> 8 )) ;
Sailing_Nut 0:6987c004e123 398 _virtualPort->putc((char)(X1 )) ;
Sailing_Nut 0:6987c004e123 399 _virtualPort->putc((char)(Y1 >> 8 )) ;
Sailing_Nut 0:6987c004e123 400 _virtualPort->putc((char)(Y1 )) ;
Sailing_Nut 0:6987c004e123 401 _virtualPort->putc((char)(X2 >> 8 )) ;
Sailing_Nut 0:6987c004e123 402 _virtualPort->putc((char)(X2 )) ;
Sailing_Nut 0:6987c004e123 403 _virtualPort->putc((char)(Y2 >> 8 )) ;
Sailing_Nut 0:6987c004e123 404 _virtualPort->putc((char)(Y2 )) ;
Sailing_Nut 0:6987c004e123 405 _virtualPort->putc((char)(Color >> 8 )) ;
Sailing_Nut 0:6987c004e123 406 _virtualPort->putc((char)(Color )) ;
Sailing_Nut 0:6987c004e123 407 GetAck() ;
Sailing_Nut 0:6987c004e123 408 }
Sailing_Nut 0:6987c004e123 409
Sailing_Nut 0:6987c004e123 410 void Goldelox_Serial_4DLib::gfx_LinePattern(short Pattern)
Sailing_Nut 0:6987c004e123 411 {
Sailing_Nut 0:6987c004e123 412 _virtualPort->putc((char)(F_gfx_LinePattern >> 8 )) ;
Sailing_Nut 0:6987c004e123 413 _virtualPort->putc((char)(F_gfx_LinePattern )) ;
Sailing_Nut 0:6987c004e123 414 _virtualPort->putc((char)(Pattern >> 8 )) ;
Sailing_Nut 0:6987c004e123 415 _virtualPort->putc((char)(Pattern )) ;
Sailing_Nut 0:6987c004e123 416 GetAck() ;
Sailing_Nut 0:6987c004e123 417 }
Sailing_Nut 0:6987c004e123 418
Sailing_Nut 0:6987c004e123 419 void Goldelox_Serial_4DLib::gfx_LineTo(short X, short Y)
Sailing_Nut 0:6987c004e123 420 {
Sailing_Nut 0:6987c004e123 421 _virtualPort->putc((char)(F_gfx_LineTo >> 8 )) ;
Sailing_Nut 0:6987c004e123 422 _virtualPort->putc((char)(F_gfx_LineTo )) ;
Sailing_Nut 0:6987c004e123 423 _virtualPort->putc((char)(X >> 8 )) ;
Sailing_Nut 0:6987c004e123 424 _virtualPort->putc((char)(X )) ;
Sailing_Nut 0:6987c004e123 425 _virtualPort->putc((char)(Y >> 8 )) ;
Sailing_Nut 0:6987c004e123 426 _virtualPort->putc((char)(Y )) ;
Sailing_Nut 0:6987c004e123 427 GetAck() ;
Sailing_Nut 0:6987c004e123 428 }
Sailing_Nut 0:6987c004e123 429
Sailing_Nut 0:6987c004e123 430 void Goldelox_Serial_4DLib::gfx_MoveTo(short X, short Y)
Sailing_Nut 0:6987c004e123 431 {
Sailing_Nut 0:6987c004e123 432 _virtualPort->putc((char)(F_gfx_MoveTo >> 8 )) ;
Sailing_Nut 0:6987c004e123 433 _virtualPort->putc((char)(F_gfx_MoveTo )) ;
Sailing_Nut 0:6987c004e123 434 _virtualPort->putc((char)(X >> 8 )) ;
Sailing_Nut 0:6987c004e123 435 _virtualPort->putc((char)(X )) ;
Sailing_Nut 0:6987c004e123 436 _virtualPort->putc((char)(Y >> 8 )) ;
Sailing_Nut 0:6987c004e123 437 _virtualPort->putc((char)(Y )) ;
Sailing_Nut 0:6987c004e123 438 GetAck() ;
Sailing_Nut 0:6987c004e123 439 }
Sailing_Nut 0:6987c004e123 440
Sailing_Nut 0:6987c004e123 441 short Goldelox_Serial_4DLib::gfx_Orbit(short Angle, short Distance, short * Xdest, short * Ydest)
Sailing_Nut 0:6987c004e123 442 {
Sailing_Nut 0:6987c004e123 443 _virtualPort->putc((char)(F_gfx_Orbit >> 8 )) ;
Sailing_Nut 0:6987c004e123 444 _virtualPort->putc((char)(F_gfx_Orbit )) ;
Sailing_Nut 0:6987c004e123 445 _virtualPort->putc((char)(Angle >> 8 )) ;
Sailing_Nut 0:6987c004e123 446 _virtualPort->putc((char)(Angle )) ;
Sailing_Nut 0:6987c004e123 447 _virtualPort->putc((char)(Distance >> 8 )) ;
Sailing_Nut 0:6987c004e123 448 _virtualPort->putc((char)(Distance )) ;
Sailing_Nut 0:6987c004e123 449 GetAck2Words(Xdest,Ydest) ;
Sailing_Nut 0:6987c004e123 450 return 0 ;
Sailing_Nut 0:6987c004e123 451 }
Sailing_Nut 0:6987c004e123 452
Sailing_Nut 0:6987c004e123 453 void Goldelox_Serial_4DLib::gfx_OutlineColour(short Color)
Sailing_Nut 0:6987c004e123 454 {
Sailing_Nut 0:6987c004e123 455 _virtualPort->putc((char)(F_gfx_OutlineColour >> 8 )) ;
Sailing_Nut 0:6987c004e123 456 _virtualPort->putc((char)(F_gfx_OutlineColour )) ;
Sailing_Nut 0:6987c004e123 457 _virtualPort->putc((char)(Color >> 8 )) ;
Sailing_Nut 0:6987c004e123 458 _virtualPort->putc((char)(Color )) ;
Sailing_Nut 0:6987c004e123 459 GetAck() ;
Sailing_Nut 0:6987c004e123 460 }
Sailing_Nut 0:6987c004e123 461
Sailing_Nut 0:6987c004e123 462 void Goldelox_Serial_4DLib::gfx_Polygon(short n, t4DWordArray Xvalues, t4DWordArray Yvalues, short Color)
Sailing_Nut 0:6987c004e123 463 {
Sailing_Nut 0:6987c004e123 464 _virtualPort->putc((char)(F_gfx_Polygon >> 8 )) ;
Sailing_Nut 0:6987c004e123 465 _virtualPort->putc((char)(F_gfx_Polygon )) ;
Sailing_Nut 0:6987c004e123 466 _virtualPort->putc((char)(n >> 8 )) ;
Sailing_Nut 0:6987c004e123 467 _virtualPort->putc((char)(n )) ;
Sailing_Nut 0:6987c004e123 468 WriteWords(Xvalues, (int)n) ;
Sailing_Nut 0:6987c004e123 469 WriteWords(Yvalues, (int)n) ;
Sailing_Nut 0:6987c004e123 470 _virtualPort->putc((char)(Color >> 8 )) ;
Sailing_Nut 0:6987c004e123 471 _virtualPort->putc((char)(Color )) ;
Sailing_Nut 0:6987c004e123 472 GetAck() ;
Sailing_Nut 0:6987c004e123 473 }
Sailing_Nut 0:6987c004e123 474
Sailing_Nut 0:6987c004e123 475 void Goldelox_Serial_4DLib::gfx_Polyline(short n, t4DWordArray Xvalues, t4DWordArray Yvalues, short Color)
Sailing_Nut 0:6987c004e123 476 {
Sailing_Nut 0:6987c004e123 477 _virtualPort->putc((char)(F_gfx_Polyline >> 8 )) ;
Sailing_Nut 0:6987c004e123 478 _virtualPort->putc((char)(F_gfx_Polyline )) ;
Sailing_Nut 0:6987c004e123 479 _virtualPort->putc((char)(n >> 8 )) ;
Sailing_Nut 0:6987c004e123 480 _virtualPort->putc((char)(n )) ;
Sailing_Nut 0:6987c004e123 481 WriteWords(Xvalues, n) ;
Sailing_Nut 0:6987c004e123 482 WriteWords(Yvalues, n) ;
Sailing_Nut 0:6987c004e123 483 _virtualPort->putc((char)(Color >> 8 )) ;
Sailing_Nut 0:6987c004e123 484 _virtualPort->putc((char)(Color )) ;
Sailing_Nut 0:6987c004e123 485 GetAck() ;
Sailing_Nut 0:6987c004e123 486 }
Sailing_Nut 0:6987c004e123 487
Sailing_Nut 0:6987c004e123 488 void Goldelox_Serial_4DLib::gfx_PutPixel(short X, short Y, short Color)
Sailing_Nut 0:6987c004e123 489 {
Sailing_Nut 0:6987c004e123 490 _virtualPort->putc((char)(F_gfx_PutPixel >> 8 )) ;
Sailing_Nut 0:6987c004e123 491 _virtualPort->putc((char)(F_gfx_PutPixel )) ;
Sailing_Nut 0:6987c004e123 492 _virtualPort->putc((char)(X >> 8 )) ;
Sailing_Nut 0:6987c004e123 493 _virtualPort->putc((char)(X )) ;
Sailing_Nut 0:6987c004e123 494 _virtualPort->putc((char)(Y >> 8 )) ;
Sailing_Nut 0:6987c004e123 495 _virtualPort->putc((char)(Y )) ;
Sailing_Nut 0:6987c004e123 496 _virtualPort->putc((char)(Color >> 8 )) ;
Sailing_Nut 0:6987c004e123 497 _virtualPort->putc((char)(Color )) ;
Sailing_Nut 0:6987c004e123 498 GetAck() ;
Sailing_Nut 0:6987c004e123 499 }
Sailing_Nut 0:6987c004e123 500
Sailing_Nut 0:6987c004e123 501 void Goldelox_Serial_4DLib::gfx_Rectangle(short X1, short Y1, short X2, short Y2, short Color)
Sailing_Nut 0:6987c004e123 502 {
Sailing_Nut 0:6987c004e123 503 _virtualPort->putc((char)(F_gfx_Rectangle >> 8 )) ;
Sailing_Nut 0:6987c004e123 504 _virtualPort->putc((char)(F_gfx_Rectangle )) ;
Sailing_Nut 0:6987c004e123 505 _virtualPort->putc((char)(X1 >> 8 )) ;
Sailing_Nut 0:6987c004e123 506 _virtualPort->putc((char)(X1 )) ;
Sailing_Nut 0:6987c004e123 507 _virtualPort->putc((char)(Y1 >> 8 )) ;
Sailing_Nut 0:6987c004e123 508 _virtualPort->putc((char)(Y1 )) ;
Sailing_Nut 0:6987c004e123 509 _virtualPort->putc((char)(X2 >> 8 )) ;
Sailing_Nut 0:6987c004e123 510 _virtualPort->putc((char)(X2 )) ;
Sailing_Nut 0:6987c004e123 511 _virtualPort->putc((char)(Y2 >> 8 )) ;
Sailing_Nut 0:6987c004e123 512 _virtualPort->putc((char)(Y2 )) ;
Sailing_Nut 0:6987c004e123 513 _virtualPort->putc((char)(Color >> 8 )) ;
Sailing_Nut 0:6987c004e123 514 _virtualPort->putc((char)(Color )) ;
Sailing_Nut 0:6987c004e123 515 GetAck() ;
Sailing_Nut 0:6987c004e123 516 }
Sailing_Nut 0:6987c004e123 517
Sailing_Nut 0:6987c004e123 518 void Goldelox_Serial_4DLib::gfx_RectangleFilled(short X1, short Y1, short X2, short Y2, short Color)
Sailing_Nut 0:6987c004e123 519 {
Sailing_Nut 0:6987c004e123 520 _virtualPort->putc((char)(F_gfx_RectangleFilled >> 8 )) ;
Sailing_Nut 0:6987c004e123 521 _virtualPort->putc((char)(F_gfx_RectangleFilled )) ;
Sailing_Nut 0:6987c004e123 522 _virtualPort->putc((char)(X1 >> 8 )) ;
Sailing_Nut 0:6987c004e123 523 _virtualPort->putc((char)(X1 )) ;
Sailing_Nut 0:6987c004e123 524 _virtualPort->putc((char)(Y1 >> 8 )) ;
Sailing_Nut 0:6987c004e123 525 _virtualPort->putc((char)(Y1 )) ;
Sailing_Nut 0:6987c004e123 526 _virtualPort->putc((char)(X2 >> 8 )) ;
Sailing_Nut 0:6987c004e123 527 _virtualPort->putc((char)(X2 )) ;
Sailing_Nut 0:6987c004e123 528 _virtualPort->putc((char)(Y2 >> 8 )) ;
Sailing_Nut 0:6987c004e123 529 _virtualPort->putc((char)(Y2 )) ;
Sailing_Nut 0:6987c004e123 530 _virtualPort->putc((char)(Color >> 8 )) ;
Sailing_Nut 0:6987c004e123 531 _virtualPort->putc((char)(Color )) ;
Sailing_Nut 0:6987c004e123 532 GetAck() ;
Sailing_Nut 0:6987c004e123 533 }
Sailing_Nut 0:6987c004e123 534
Sailing_Nut 0:6987c004e123 535 void Goldelox_Serial_4DLib::gfx_ScreenMode(short ScreenMode)
Sailing_Nut 0:6987c004e123 536 {
Sailing_Nut 0:6987c004e123 537 _virtualPort->putc((char)(F_gfx_ScreenMode >> 8 )) ;
Sailing_Nut 0:6987c004e123 538 _virtualPort->putc((char)(F_gfx_ScreenMode )) ;
Sailing_Nut 0:6987c004e123 539 _virtualPort->putc((char)(ScreenMode >> 8 )) ;
Sailing_Nut 0:6987c004e123 540 _virtualPort->putc((char)(ScreenMode )) ;
Sailing_Nut 0:6987c004e123 541 GetAck() ;
Sailing_Nut 0:6987c004e123 542 }
Sailing_Nut 0:6987c004e123 543
Sailing_Nut 0:6987c004e123 544 void Goldelox_Serial_4DLib::gfx_Set(short Func, short Value)
Sailing_Nut 0:6987c004e123 545 {
Sailing_Nut 0:6987c004e123 546 _virtualPort->putc((char)(F_gfx_Set >> 8 )) ;
Sailing_Nut 0:6987c004e123 547 _virtualPort->putc((char)(F_gfx_Set )) ;
Sailing_Nut 0:6987c004e123 548 _virtualPort->putc((char)(Func >> 8 )) ;
Sailing_Nut 0:6987c004e123 549 _virtualPort->putc((char)(Func )) ;
Sailing_Nut 0:6987c004e123 550 _virtualPort->putc((char)(Value >> 8 )) ;
Sailing_Nut 0:6987c004e123 551 _virtualPort->putc((char)(Value )) ;
Sailing_Nut 0:6987c004e123 552 GetAck() ;
Sailing_Nut 0:6987c004e123 553 }
Sailing_Nut 0:6987c004e123 554
Sailing_Nut 0:6987c004e123 555 void Goldelox_Serial_4DLib::gfx_SetClipRegion()
Sailing_Nut 0:6987c004e123 556 {
Sailing_Nut 0:6987c004e123 557 _virtualPort->putc((char)(F_gfx_SetClipRegion >> 8)) ;
Sailing_Nut 0:6987c004e123 558 _virtualPort->putc((char)(F_gfx_SetClipRegion)) ;
Sailing_Nut 0:6987c004e123 559 GetAck() ;
Sailing_Nut 0:6987c004e123 560 }
Sailing_Nut 0:6987c004e123 561
Sailing_Nut 0:6987c004e123 562 void Goldelox_Serial_4DLib::gfx_Transparency(short OnOff)
Sailing_Nut 0:6987c004e123 563 {
Sailing_Nut 0:6987c004e123 564 _virtualPort->putc((char)(F_gfx_Transparency >> 8)) ;
Sailing_Nut 0:6987c004e123 565 _virtualPort->putc((char)(F_gfx_Transparency)) ;
Sailing_Nut 0:6987c004e123 566 _virtualPort->putc((char)(OnOff >> 8)) ;
Sailing_Nut 0:6987c004e123 567 _virtualPort->putc((char)(OnOff)) ;
Sailing_Nut 0:6987c004e123 568 GetAck() ;
Sailing_Nut 0:6987c004e123 569 }
Sailing_Nut 0:6987c004e123 570
Sailing_Nut 0:6987c004e123 571 void Goldelox_Serial_4DLib::gfx_TransparentColour(short Color)
Sailing_Nut 0:6987c004e123 572 {
Sailing_Nut 0:6987c004e123 573 _virtualPort->putc((char)(F_gfx_TransparentColour >> 8)) ;
Sailing_Nut 0:6987c004e123 574 _virtualPort->putc((char)(F_gfx_TransparentColour)) ;
Sailing_Nut 0:6987c004e123 575 _virtualPort->putc((char)(Color >> 8)) ;
Sailing_Nut 0:6987c004e123 576 _virtualPort->putc((char)(Color)) ;
Sailing_Nut 0:6987c004e123 577 GetAck() ;
Sailing_Nut 0:6987c004e123 578 }
Sailing_Nut 0:6987c004e123 579
Sailing_Nut 0:6987c004e123 580 void Goldelox_Serial_4DLib::gfx_Triangle(short X1, short Y1, short X2, short Y2, short X3, short Y3, short Color)
Sailing_Nut 0:6987c004e123 581 {
Sailing_Nut 0:6987c004e123 582 _virtualPort->putc((char)(F_gfx_Triangle >> 8)) ;
Sailing_Nut 0:6987c004e123 583 _virtualPort->putc((char)(F_gfx_Triangle)) ;
Sailing_Nut 0:6987c004e123 584 _virtualPort->putc((char)(X1 >> 8)) ;
Sailing_Nut 0:6987c004e123 585 _virtualPort->putc((char)(X1)) ;
Sailing_Nut 0:6987c004e123 586 _virtualPort->putc((char)(Y1 >> 8)) ;
Sailing_Nut 0:6987c004e123 587 _virtualPort->putc((char)(Y1)) ;
Sailing_Nut 0:6987c004e123 588 _virtualPort->putc((char)(X2 >> 8)) ;
Sailing_Nut 0:6987c004e123 589 _virtualPort->putc((char)(X2)) ;
Sailing_Nut 0:6987c004e123 590 _virtualPort->putc((char)(Y2 >> 8)) ;
Sailing_Nut 0:6987c004e123 591 _virtualPort->putc((char)(Y2)) ;
Sailing_Nut 0:6987c004e123 592 _virtualPort->putc((char)(X3 >> 8)) ;
Sailing_Nut 0:6987c004e123 593 _virtualPort->putc((char)(X3)) ;
Sailing_Nut 0:6987c004e123 594 _virtualPort->putc((char)(Y3 >> 8)) ;
Sailing_Nut 0:6987c004e123 595 _virtualPort->putc((char)(Y3)) ;
Sailing_Nut 0:6987c004e123 596 _virtualPort->putc((char)(Color >> 8)) ;
Sailing_Nut 0:6987c004e123 597 _virtualPort->putc((char)(Color)) ;
Sailing_Nut 0:6987c004e123 598 GetAck() ;
Sailing_Nut 0:6987c004e123 599 }
Sailing_Nut 0:6987c004e123 600
Sailing_Nut 0:6987c004e123 601 short Goldelox_Serial_4DLib::media_Flush()
Sailing_Nut 0:6987c004e123 602 {
Sailing_Nut 0:6987c004e123 603 _virtualPort->putc((char)(F_media_Flush >> 8)) ;
Sailing_Nut 0:6987c004e123 604 _virtualPort->putc((char)(F_media_Flush)) ;
Sailing_Nut 0:6987c004e123 605 return GetAckResp() ;
Sailing_Nut 0:6987c004e123 606 }
Sailing_Nut 0:6987c004e123 607
Sailing_Nut 0:6987c004e123 608 void Goldelox_Serial_4DLib::media_Image(short X, short Y)
Sailing_Nut 0:6987c004e123 609 {
Sailing_Nut 0:6987c004e123 610 _virtualPort->putc((char)(F_media_Image >> 8)) ;
Sailing_Nut 0:6987c004e123 611 _virtualPort->putc((char)(F_media_Image)) ;
Sailing_Nut 0:6987c004e123 612 _virtualPort->putc((char)(X >> 8)) ;
Sailing_Nut 0:6987c004e123 613 _virtualPort->putc((char)(X)) ;
Sailing_Nut 0:6987c004e123 614 _virtualPort->putc((char)(Y >> 8)) ;
Sailing_Nut 0:6987c004e123 615 _virtualPort->putc((char)(Y)) ;
Sailing_Nut 0:6987c004e123 616 GetAck() ;
Sailing_Nut 0:6987c004e123 617 }
Sailing_Nut 0:6987c004e123 618
Sailing_Nut 0:6987c004e123 619 short Goldelox_Serial_4DLib::media_Init()
Sailing_Nut 0:6987c004e123 620 {
Sailing_Nut 0:6987c004e123 621 _virtualPort->putc((char)(F_media_Init >> 8)) ;
Sailing_Nut 0:6987c004e123 622 _virtualPort->putc((char)(F_media_Init)) ;
Sailing_Nut 0:6987c004e123 623 return GetAckResp() ;
Sailing_Nut 0:6987c004e123 624 }
Sailing_Nut 0:6987c004e123 625
Sailing_Nut 0:6987c004e123 626 short Goldelox_Serial_4DLib::media_ReadByte()
Sailing_Nut 0:6987c004e123 627 {
Sailing_Nut 0:6987c004e123 628 _virtualPort->putc((char)(F_media_ReadByte >> 8)) ;
Sailing_Nut 0:6987c004e123 629 _virtualPort->putc((char)(F_media_ReadByte)) ;
Sailing_Nut 0:6987c004e123 630 return GetAckResp() ;
Sailing_Nut 0:6987c004e123 631 }
Sailing_Nut 0:6987c004e123 632
Sailing_Nut 0:6987c004e123 633 short Goldelox_Serial_4DLib::media_ReadWord()
Sailing_Nut 0:6987c004e123 634 {
Sailing_Nut 0:6987c004e123 635 _virtualPort->putc((char)(F_media_ReadWord >> 8)) ;
Sailing_Nut 0:6987c004e123 636 _virtualPort->putc((char)(F_media_ReadWord)) ;
Sailing_Nut 0:6987c004e123 637 return GetAckResp() ;
Sailing_Nut 0:6987c004e123 638 }
Sailing_Nut 0:6987c004e123 639
Sailing_Nut 0:6987c004e123 640 void Goldelox_Serial_4DLib::media_SetAdd(short HiWord, short LoWord)
Sailing_Nut 0:6987c004e123 641 {
Sailing_Nut 0:6987c004e123 642 _virtualPort->putc((char)(F_media_SetAdd >> 8)) ;
Sailing_Nut 0:6987c004e123 643 _virtualPort->putc((char)(F_media_SetAdd)) ;
Sailing_Nut 0:6987c004e123 644 _virtualPort->putc((char)(HiWord >> 8)) ;
Sailing_Nut 0:6987c004e123 645 _virtualPort->putc((char)(HiWord)) ;
Sailing_Nut 0:6987c004e123 646 _virtualPort->putc((char)(LoWord >> 8)) ;
Sailing_Nut 0:6987c004e123 647 _virtualPort->putc((char)(LoWord)) ;
Sailing_Nut 0:6987c004e123 648 GetAck() ;
Sailing_Nut 0:6987c004e123 649 }
Sailing_Nut 0:6987c004e123 650
Sailing_Nut 0:6987c004e123 651 void Goldelox_Serial_4DLib::media_SetSector(short HiWord, short LoWord)
Sailing_Nut 0:6987c004e123 652 {
Sailing_Nut 0:6987c004e123 653 _virtualPort->putc((char)(F_media_SetSector >> 8)) ;
Sailing_Nut 0:6987c004e123 654 _virtualPort->putc((char)(F_media_SetSector)) ;
Sailing_Nut 0:6987c004e123 655 _virtualPort->putc((char)(HiWord >> 8)) ;
Sailing_Nut 0:6987c004e123 656 _virtualPort->putc((char)(HiWord)) ;
Sailing_Nut 0:6987c004e123 657 _virtualPort->putc((char)(LoWord >> 8)) ;
Sailing_Nut 0:6987c004e123 658 _virtualPort->putc((char)(LoWord)) ;
Sailing_Nut 0:6987c004e123 659 GetAck() ;
Sailing_Nut 0:6987c004e123 660 }
Sailing_Nut 0:6987c004e123 661
Sailing_Nut 0:6987c004e123 662 void Goldelox_Serial_4DLib::media_Video(short X, short Y)
Sailing_Nut 0:6987c004e123 663 {
Sailing_Nut 0:6987c004e123 664 _virtualPort->putc((char)(F_media_Video >> 8)) ;
Sailing_Nut 0:6987c004e123 665 _virtualPort->putc((char)(F_media_Video)) ;
Sailing_Nut 0:6987c004e123 666 _virtualPort->putc((char)(X >> 8)) ;
Sailing_Nut 0:6987c004e123 667 _virtualPort->putc((char)(X)) ;
Sailing_Nut 0:6987c004e123 668 _virtualPort->putc((char)(Y >> 8)) ;
Sailing_Nut 0:6987c004e123 669 _virtualPort->putc((char)(Y)) ;
Sailing_Nut 0:6987c004e123 670 GetAck() ;
Sailing_Nut 0:6987c004e123 671 }
Sailing_Nut 0:6987c004e123 672
Sailing_Nut 0:6987c004e123 673 void Goldelox_Serial_4DLib::media_VideoFrame(short X, short Y, short Framenumber)
Sailing_Nut 0:6987c004e123 674 {
Sailing_Nut 0:6987c004e123 675 _virtualPort->putc((char)(F_media_VideoFrame >> 8)) ;
Sailing_Nut 0:6987c004e123 676 _virtualPort->putc((char)(F_media_VideoFrame)) ;
Sailing_Nut 0:6987c004e123 677 _virtualPort->putc((char)(X >> 8)) ;
Sailing_Nut 0:6987c004e123 678 _virtualPort->putc((char)(X)) ;
Sailing_Nut 0:6987c004e123 679 _virtualPort->putc((char)(Y >> 8)) ;
Sailing_Nut 0:6987c004e123 680 _virtualPort->putc((char)(Y)) ;
Sailing_Nut 0:6987c004e123 681 _virtualPort->putc((char)(Framenumber >> 8)) ;
Sailing_Nut 0:6987c004e123 682 _virtualPort->putc((char)(Framenumber)) ;
Sailing_Nut 0:6987c004e123 683 GetAck() ;
Sailing_Nut 0:6987c004e123 684 }
Sailing_Nut 0:6987c004e123 685
Sailing_Nut 0:6987c004e123 686 short Goldelox_Serial_4DLib::media_WriteByte(short Byte)
Sailing_Nut 0:6987c004e123 687 {
Sailing_Nut 0:6987c004e123 688 _virtualPort->putc((char)(F_media_WriteByte >> 8)) ;
Sailing_Nut 0:6987c004e123 689 _virtualPort->putc((char)(F_media_WriteByte)) ;
Sailing_Nut 0:6987c004e123 690 _virtualPort->putc((char)(Byte >> 8)) ;
Sailing_Nut 0:6987c004e123 691 _virtualPort->putc((char)(Byte)) ;
Sailing_Nut 0:6987c004e123 692 return GetAckResp() ;
Sailing_Nut 0:6987c004e123 693 }
Sailing_Nut 0:6987c004e123 694
Sailing_Nut 0:6987c004e123 695 short Goldelox_Serial_4DLib::media_WriteWord(short Word)
Sailing_Nut 0:6987c004e123 696 {
Sailing_Nut 0:6987c004e123 697 _virtualPort->putc((char)(F_media_WriteWord >> 8)) ;
Sailing_Nut 0:6987c004e123 698 _virtualPort->putc((char)(F_media_WriteWord)) ;
Sailing_Nut 0:6987c004e123 699 _virtualPort->putc((char)(Word >> 8)) ;
Sailing_Nut 0:6987c004e123 700 _virtualPort->putc((char)(Word)) ;
Sailing_Nut 0:6987c004e123 701 return GetAckResp() ;
Sailing_Nut 0:6987c004e123 702 }
Sailing_Nut 0:6987c004e123 703
Sailing_Nut 0:6987c004e123 704 void Goldelox_Serial_4DLib::putCH(short WordChar)
Sailing_Nut 0:6987c004e123 705 {
Sailing_Nut 0:6987c004e123 706 _virtualPort->putc((char)(F_putCH >> 8)) ;
Sailing_Nut 0:6987c004e123 707 _virtualPort->putc((char)(F_putCH)) ;
Sailing_Nut 0:6987c004e123 708 _virtualPort->putc((char)(WordChar >> 8)) ;
Sailing_Nut 0:6987c004e123 709 _virtualPort->putc((char)(WordChar)) ;
Sailing_Nut 0:6987c004e123 710 GetAck() ;
Sailing_Nut 0:6987c004e123 711 }
Sailing_Nut 0:6987c004e123 712
Sailing_Nut 0:6987c004e123 713 void Goldelox_Serial_4DLib::putstr(char * InString)
Sailing_Nut 0:6987c004e123 714 {
Sailing_Nut 0:6987c004e123 715 _virtualPort->putc((char)(F_putstr >> 8)) ;
Sailing_Nut 0:6987c004e123 716 _virtualPort->putc((char)(F_putstr)) ;
Sailing_Nut 0:6987c004e123 717 WriteChars(InString) ;
Sailing_Nut 0:6987c004e123 718 GetAck() ;
Sailing_Nut 0:6987c004e123 719 }
Sailing_Nut 0:6987c004e123 720
Sailing_Nut 0:6987c004e123 721 void Goldelox_Serial_4DLib::txt_Attributes(short Attribs)
Sailing_Nut 0:6987c004e123 722 {
Sailing_Nut 0:6987c004e123 723 _virtualPort->putc((char)(F_txt_Attributes >> 8)) ;
Sailing_Nut 0:6987c004e123 724 _virtualPort->putc((char)(F_txt_Attributes)) ;
Sailing_Nut 0:6987c004e123 725 _virtualPort->putc((char)(Attribs >> 8)) ;
Sailing_Nut 0:6987c004e123 726 _virtualPort->putc((char)(Attribs)) ;
Sailing_Nut 0:6987c004e123 727 GetAck() ;
Sailing_Nut 0:6987c004e123 728 }
Sailing_Nut 0:6987c004e123 729
Sailing_Nut 0:6987c004e123 730 void Goldelox_Serial_4DLib::txt_BGcolour(short Color)
Sailing_Nut 0:6987c004e123 731 {
Sailing_Nut 0:6987c004e123 732 _virtualPort->putc((char)(F_txt_BGcolour >> 8)) ;
Sailing_Nut 0:6987c004e123 733 _virtualPort->putc((char)(F_txt_BGcolour)) ;
Sailing_Nut 0:6987c004e123 734 _virtualPort->putc((char)(Color >> 8)) ;
Sailing_Nut 0:6987c004e123 735 _virtualPort->putc((char)(Color)) ;
Sailing_Nut 0:6987c004e123 736 GetAck() ;
Sailing_Nut 0:6987c004e123 737 }
Sailing_Nut 0:6987c004e123 738
Sailing_Nut 0:6987c004e123 739 void Goldelox_Serial_4DLib::txt_Bold(short Bold)
Sailing_Nut 0:6987c004e123 740 {
Sailing_Nut 0:6987c004e123 741 _virtualPort->putc((char)(F_txt_Bold >> 8)) ;
Sailing_Nut 0:6987c004e123 742 _virtualPort->putc((char)(F_txt_Bold)) ;
Sailing_Nut 0:6987c004e123 743 _virtualPort->putc((char)(Bold >> 8)) ;
Sailing_Nut 0:6987c004e123 744 _virtualPort->putc((char)(Bold)) ;
Sailing_Nut 0:6987c004e123 745 GetAck() ;
Sailing_Nut 0:6987c004e123 746 }
Sailing_Nut 0:6987c004e123 747
Sailing_Nut 0:6987c004e123 748 void Goldelox_Serial_4DLib::txt_FGcolour(short Color)
Sailing_Nut 0:6987c004e123 749 {
Sailing_Nut 0:6987c004e123 750 _virtualPort->putc((char)(F_txt_FGcolour >> 8)) ;
Sailing_Nut 0:6987c004e123 751 _virtualPort->putc((char)(F_txt_FGcolour)) ;
Sailing_Nut 0:6987c004e123 752 _virtualPort->putc((char)(Color >> 8)) ;
Sailing_Nut 0:6987c004e123 753 _virtualPort->putc((char)(Color)) ;
Sailing_Nut 0:6987c004e123 754 GetAck() ;
Sailing_Nut 0:6987c004e123 755 }
Sailing_Nut 0:6987c004e123 756
Sailing_Nut 0:6987c004e123 757 void Goldelox_Serial_4DLib::txt_FontID(short FontNumber)
Sailing_Nut 0:6987c004e123 758 {
Sailing_Nut 0:6987c004e123 759 _virtualPort->putc((char)(F_txt_FontID >> 8)) ;
Sailing_Nut 0:6987c004e123 760 _virtualPort->putc((char)(F_txt_FontID)) ;
Sailing_Nut 0:6987c004e123 761 _virtualPort->putc((char)(FontNumber >> 8)) ;
Sailing_Nut 0:6987c004e123 762 _virtualPort->putc((char)(FontNumber)) ;
Sailing_Nut 0:6987c004e123 763 GetAck() ;
Sailing_Nut 0:6987c004e123 764 }
Sailing_Nut 0:6987c004e123 765
Sailing_Nut 0:6987c004e123 766 void Goldelox_Serial_4DLib::txt_Height(short Multiplier)
Sailing_Nut 0:6987c004e123 767 {
Sailing_Nut 0:6987c004e123 768 _virtualPort->putc((char)(F_txt_Height >> 8)) ;
Sailing_Nut 0:6987c004e123 769 _virtualPort->putc((char)(F_txt_Height)) ;
Sailing_Nut 0:6987c004e123 770 _virtualPort->putc((char)(Multiplier >> 8)) ;
Sailing_Nut 0:6987c004e123 771 _virtualPort->putc((char)(Multiplier)) ;
Sailing_Nut 0:6987c004e123 772 GetAck() ;
Sailing_Nut 0:6987c004e123 773 }
Sailing_Nut 0:6987c004e123 774
Sailing_Nut 0:6987c004e123 775 void Goldelox_Serial_4DLib::txt_Inverse(short Inverse)
Sailing_Nut 0:6987c004e123 776 {
Sailing_Nut 0:6987c004e123 777 _virtualPort->putc((char)(F_txt_Inverse >> 8)) ;
Sailing_Nut 0:6987c004e123 778 _virtualPort->putc((char)(F_txt_Inverse)) ;
Sailing_Nut 0:6987c004e123 779 _virtualPort->putc((char)(Inverse >> 8)) ;
Sailing_Nut 0:6987c004e123 780 _virtualPort->putc((char)(Inverse)) ;
Sailing_Nut 0:6987c004e123 781 GetAck() ;
Sailing_Nut 0:6987c004e123 782 }
Sailing_Nut 0:6987c004e123 783
Sailing_Nut 0:6987c004e123 784 void Goldelox_Serial_4DLib::txt_Italic(short Italic)
Sailing_Nut 0:6987c004e123 785 {
Sailing_Nut 0:6987c004e123 786 _virtualPort->putc((char)(F_txt_Italic >> 8)) ;
Sailing_Nut 0:6987c004e123 787 _virtualPort->putc((char)(F_txt_Italic)) ;
Sailing_Nut 0:6987c004e123 788 _virtualPort->putc((char)(Italic >> 8)) ;
Sailing_Nut 0:6987c004e123 789 _virtualPort->putc((char)(Italic)) ;
Sailing_Nut 0:6987c004e123 790 GetAck() ;
Sailing_Nut 0:6987c004e123 791 }
Sailing_Nut 0:6987c004e123 792
Sailing_Nut 0:6987c004e123 793 void Goldelox_Serial_4DLib::txt_MoveCursor(short Line, short Column)
Sailing_Nut 0:6987c004e123 794 {
Sailing_Nut 0:6987c004e123 795 _virtualPort->putc((char)(F_txt_MoveCursor >> 8)) ;
Sailing_Nut 0:6987c004e123 796 _virtualPort->putc((char)(F_txt_MoveCursor)) ;
Sailing_Nut 0:6987c004e123 797 _virtualPort->putc((char)(Line >> 8)) ;
Sailing_Nut 0:6987c004e123 798 _virtualPort->putc((char)(Line)) ;
Sailing_Nut 0:6987c004e123 799 _virtualPort->putc((char)(Column >> 8)) ;
Sailing_Nut 0:6987c004e123 800 _virtualPort->putc((char)(Column)) ;
Sailing_Nut 0:6987c004e123 801 GetAck() ;
Sailing_Nut 0:6987c004e123 802 }
Sailing_Nut 0:6987c004e123 803
Sailing_Nut 0:6987c004e123 804 void Goldelox_Serial_4DLib::txt_Opacity(short TransparentOpaque)
Sailing_Nut 0:6987c004e123 805 {
Sailing_Nut 0:6987c004e123 806 _virtualPort->putc((char)(F_txt_Opacity >> 8)) ;
Sailing_Nut 0:6987c004e123 807 _virtualPort->putc((char)(F_txt_Opacity)) ;
Sailing_Nut 0:6987c004e123 808 _virtualPort->putc((char)(TransparentOpaque >> 8)) ;
Sailing_Nut 0:6987c004e123 809 _virtualPort->putc((char)(TransparentOpaque)) ;
Sailing_Nut 0:6987c004e123 810 GetAck() ;
Sailing_Nut 0:6987c004e123 811 }
Sailing_Nut 0:6987c004e123 812
Sailing_Nut 0:6987c004e123 813 void Goldelox_Serial_4DLib::txt_Set(short Func, short Value)
Sailing_Nut 0:6987c004e123 814 {
Sailing_Nut 0:6987c004e123 815 _virtualPort->putc((char)(F_txt_Set >> 8)) ;
Sailing_Nut 0:6987c004e123 816 _virtualPort->putc((char)(F_txt_Set)) ;
Sailing_Nut 0:6987c004e123 817 _virtualPort->putc((char)(Func >> 8)) ;
Sailing_Nut 0:6987c004e123 818 _virtualPort->putc((char)(Func)) ;
Sailing_Nut 0:6987c004e123 819 _virtualPort->putc((char)(Value >> 8)) ;
Sailing_Nut 0:6987c004e123 820 _virtualPort->putc((char)(Value)) ;
Sailing_Nut 0:6987c004e123 821 GetAck() ;
Sailing_Nut 0:6987c004e123 822 }
Sailing_Nut 0:6987c004e123 823
Sailing_Nut 0:6987c004e123 824 void Goldelox_Serial_4DLib::txt_Underline(short Underline)
Sailing_Nut 0:6987c004e123 825 {
Sailing_Nut 0:6987c004e123 826 _virtualPort->putc((char)(F_txt_Underline >> 8)) ;
Sailing_Nut 0:6987c004e123 827 _virtualPort->putc((char)(F_txt_Underline)) ;
Sailing_Nut 0:6987c004e123 828 _virtualPort->putc((char)(Underline >> 8)) ;
Sailing_Nut 0:6987c004e123 829 _virtualPort->putc((char)(Underline)) ;
Sailing_Nut 0:6987c004e123 830 GetAck() ;
Sailing_Nut 0:6987c004e123 831 }
Sailing_Nut 0:6987c004e123 832
Sailing_Nut 0:6987c004e123 833 void Goldelox_Serial_4DLib::txt_Width(short Multiplier)
Sailing_Nut 0:6987c004e123 834 {
Sailing_Nut 0:6987c004e123 835 _virtualPort->putc((char)(F_txt_Width >> 8)) ;
Sailing_Nut 0:6987c004e123 836 _virtualPort->putc((char)(F_txt_Width)) ;
Sailing_Nut 0:6987c004e123 837 _virtualPort->putc((char)(Multiplier >> 8)) ;
Sailing_Nut 0:6987c004e123 838 _virtualPort->putc((char)(Multiplier)) ;
Sailing_Nut 0:6987c004e123 839 GetAck() ;
Sailing_Nut 0:6987c004e123 840 }
Sailing_Nut 0:6987c004e123 841
Sailing_Nut 0:6987c004e123 842 void Goldelox_Serial_4DLib::txt_Xgap(short Pixels)
Sailing_Nut 0:6987c004e123 843 {
Sailing_Nut 0:6987c004e123 844 _virtualPort->putc((char)(F_txt_Xgap >> 8)) ;
Sailing_Nut 0:6987c004e123 845 _virtualPort->putc((char)(F_txt_Xgap)) ;
Sailing_Nut 0:6987c004e123 846 _virtualPort->putc((char)(Pixels >> 8)) ;
Sailing_Nut 0:6987c004e123 847 _virtualPort->putc((char)(Pixels)) ;
Sailing_Nut 0:6987c004e123 848 GetAck() ;
Sailing_Nut 0:6987c004e123 849 }
Sailing_Nut 0:6987c004e123 850
Sailing_Nut 0:6987c004e123 851 void Goldelox_Serial_4DLib::txt_Ygap(short Pixels)
Sailing_Nut 0:6987c004e123 852 {
Sailing_Nut 0:6987c004e123 853 _virtualPort->putc((char)(F_txt_Ygap >> 8)) ;
Sailing_Nut 0:6987c004e123 854 _virtualPort->putc((char)(F_txt_Ygap)) ;
Sailing_Nut 0:6987c004e123 855 _virtualPort->putc((char)(Pixels >> 8)) ;
Sailing_Nut 0:6987c004e123 856 _virtualPort->putc((char)(Pixels)) ;
Sailing_Nut 0:6987c004e123 857 GetAck() ;
Sailing_Nut 0:6987c004e123 858 }
Sailing_Nut 0:6987c004e123 859
Sailing_Nut 0:6987c004e123 860 void Goldelox_Serial_4DLib::BeeP(short Note, short Duration)
Sailing_Nut 0:6987c004e123 861 {
Sailing_Nut 0:6987c004e123 862 _virtualPort->putc((char)(F_BeeP >> 8)) ;
Sailing_Nut 0:6987c004e123 863 _virtualPort->putc((char)(F_BeeP)) ;
Sailing_Nut 0:6987c004e123 864 _virtualPort->putc((char)(Note >> 8)) ;
Sailing_Nut 0:6987c004e123 865 _virtualPort->putc((char)(Note)) ;
Sailing_Nut 0:6987c004e123 866 _virtualPort->putc((char)(Duration >> 8)) ;
Sailing_Nut 0:6987c004e123 867 _virtualPort->putc((char)(Duration)) ;
Sailing_Nut 0:6987c004e123 868 GetAck() ;
Sailing_Nut 0:6987c004e123 869 }
Sailing_Nut 0:6987c004e123 870
Sailing_Nut 0:6987c004e123 871 short Goldelox_Serial_4DLib::sys_GetModel(char * ModelStr)
Sailing_Nut 0:6987c004e123 872 {
Sailing_Nut 0:6987c004e123 873 _virtualPort->putc((char)(F_sys_GetModel >> 8)) ;
Sailing_Nut 0:6987c004e123 874 _virtualPort->putc((char)(F_sys_GetModel)) ;
Sailing_Nut 0:6987c004e123 875 return GetAckResStr(ModelStr) ;
Sailing_Nut 0:6987c004e123 876 }
Sailing_Nut 0:6987c004e123 877
Sailing_Nut 0:6987c004e123 878 short Goldelox_Serial_4DLib::sys_GetVersion()
Sailing_Nut 0:6987c004e123 879 {
Sailing_Nut 0:6987c004e123 880 _virtualPort->putc((char)(F_sys_GetVersion >> 8)) ;
Sailing_Nut 0:6987c004e123 881 _virtualPort->putc((char)(F_sys_GetVersion)) ;
Sailing_Nut 0:6987c004e123 882 return GetAckResp() ;
Sailing_Nut 0:6987c004e123 883 }
Sailing_Nut 0:6987c004e123 884
Sailing_Nut 0:6987c004e123 885 short Goldelox_Serial_4DLib::sys_GetPmmC()
Sailing_Nut 0:6987c004e123 886 {
Sailing_Nut 0:6987c004e123 887 _virtualPort->putc((char)(F_sys_GetPmmC >> 8)) ;
Sailing_Nut 0:6987c004e123 888 _virtualPort->putc((char)(F_sys_GetPmmC)) ;
Sailing_Nut 0:6987c004e123 889 return GetAckResp() ;
Sailing_Nut 0:6987c004e123 890 }
Sailing_Nut 0:6987c004e123 891
Sailing_Nut 0:6987c004e123 892 void Goldelox_Serial_4DLib::blitComtoDisplay(short X, short Y, short Width, short Height, t4DByteArray Pixels)
Sailing_Nut 0:6987c004e123 893 {
Sailing_Nut 0:6987c004e123 894 _virtualPort->putc((char)(F_blitComtoDisplay >> 8)) ;
Sailing_Nut 0:6987c004e123 895 _virtualPort->putc((char)(F_blitComtoDisplay)) ;
Sailing_Nut 0:6987c004e123 896 _virtualPort->putc((char)(X >> 8)) ;
Sailing_Nut 0:6987c004e123 897 _virtualPort->putc((char)(X)) ;
Sailing_Nut 0:6987c004e123 898 _virtualPort->putc((char)(Y >> 8)) ;
Sailing_Nut 0:6987c004e123 899 _virtualPort->putc((char)(Y)) ;
Sailing_Nut 0:6987c004e123 900 _virtualPort->putc((char)(Width >> 8)) ;
Sailing_Nut 0:6987c004e123 901 _virtualPort->putc((char)(Width)) ;
Sailing_Nut 0:6987c004e123 902 _virtualPort->putc((char)(Height >> 8)) ;
Sailing_Nut 0:6987c004e123 903 _virtualPort->putc((char)(Height)) ;
Sailing_Nut 0:6987c004e123 904 WriteBytes(Pixels, Width*Height*2) ;
Sailing_Nut 0:6987c004e123 905 GetAck() ;
Sailing_Nut 0:6987c004e123 906 }
Sailing_Nut 0:6987c004e123 907
Sailing_Nut 0:6987c004e123 908 void Goldelox_Serial_4DLib::setbaudWait(short Newrate)
Sailing_Nut 0:6987c004e123 909 {
Sailing_Nut 0:6987c004e123 910 _virtualPort->putc((char)(F_setbaudWait >> 8)) ;
Sailing_Nut 0:6987c004e123 911 _virtualPort->putc((char)(F_setbaudWait)) ;
Sailing_Nut 0:6987c004e123 912 _virtualPort->putc((char)(Newrate >> 8)) ;
Sailing_Nut 0:6987c004e123 913 _virtualPort->putc((char)(Newrate)) ;
Sailing_Nut 0:6987c004e123 914 SetThisBaudrate(Newrate) ; // change this systems baud rate to match new display rate, ACK is 100ms away
Sailing_Nut 0:6987c004e123 915 GetAck() ;
Sailing_Nut 0:6987c004e123 916 }
Sailing_Nut 0:6987c004e123 917
Sailing_Nut 0:6987c004e123 918 short Goldelox_Serial_4DLib::peekW(short Address)
Sailing_Nut 0:6987c004e123 919 {
Sailing_Nut 0:6987c004e123 920 _virtualPort->putc((char)(F_peekW >> 8)) ;
Sailing_Nut 0:6987c004e123 921 _virtualPort->putc((char)(F_peekW)) ;
Sailing_Nut 0:6987c004e123 922 _virtualPort->putc((char)(Address >> 8)) ;
Sailing_Nut 0:6987c004e123 923 _virtualPort->putc((char)(Address)) ;
Sailing_Nut 0:6987c004e123 924 return GetAckResp() ;
Sailing_Nut 0:6987c004e123 925 }
Sailing_Nut 0:6987c004e123 926
Sailing_Nut 0:6987c004e123 927 void Goldelox_Serial_4DLib::pokeW(short Address, short WordValue)
Sailing_Nut 0:6987c004e123 928 {
Sailing_Nut 0:6987c004e123 929 _virtualPort->putc((char)(F_pokeW >> 8)) ;
Sailing_Nut 0:6987c004e123 930 _virtualPort->putc((char)(F_pokeW)) ;
Sailing_Nut 0:6987c004e123 931 _virtualPort->putc((char)(Address >> 8)) ;
Sailing_Nut 0:6987c004e123 932 _virtualPort->putc((char)(Address)) ;
Sailing_Nut 0:6987c004e123 933 _virtualPort->putc((char)(WordValue >> 8)) ;
Sailing_Nut 0:6987c004e123 934 _virtualPort->putc((char)(WordValue)) ;
Sailing_Nut 0:6987c004e123 935 GetAck() ;
Sailing_Nut 0:6987c004e123 936 }
Sailing_Nut 0:6987c004e123 937
Sailing_Nut 0:6987c004e123 938 short Goldelox_Serial_4DLib::peekB(short Address)
Sailing_Nut 0:6987c004e123 939 {
Sailing_Nut 0:6987c004e123 940 _virtualPort->putc((char)(F_peekB >> 8)) ;
Sailing_Nut 0:6987c004e123 941 _virtualPort->putc((char)(F_peekB)) ;
Sailing_Nut 0:6987c004e123 942 _virtualPort->putc((char)(Address >> 8)) ;
Sailing_Nut 0:6987c004e123 943 _virtualPort->putc((char)(Address)) ;
Sailing_Nut 0:6987c004e123 944 return GetAckResp() ;
Sailing_Nut 0:6987c004e123 945 }
Sailing_Nut 0:6987c004e123 946
Sailing_Nut 0:6987c004e123 947 void Goldelox_Serial_4DLib::pokeB(short Address, short ByteValue)
Sailing_Nut 0:6987c004e123 948 {
Sailing_Nut 0:6987c004e123 949 _virtualPort->putc((char)(F_pokeB >> 8)) ;
Sailing_Nut 0:6987c004e123 950 _virtualPort->putc((char)(F_pokeB)) ;
Sailing_Nut 0:6987c004e123 951 _virtualPort->putc((char)(Address >> 8)) ;
Sailing_Nut 0:6987c004e123 952 _virtualPort->putc((char)(Address)) ;
Sailing_Nut 0:6987c004e123 953 _virtualPort->putc((char)(ByteValue >> 8)) ;
Sailing_Nut 0:6987c004e123 954 _virtualPort->putc((char)(ByteValue)) ;
Sailing_Nut 0:6987c004e123 955 GetAck() ;
Sailing_Nut 0:6987c004e123 956 }
Sailing_Nut 0:6987c004e123 957
Sailing_Nut 0:6987c004e123 958 short Goldelox_Serial_4DLib::joystick()
Sailing_Nut 0:6987c004e123 959 {
Sailing_Nut 0:6987c004e123 960 _virtualPort->putc((char)(F_joystick >> 8)) ;
Sailing_Nut 0:6987c004e123 961 _virtualPort->putc((char)(F_joystick)) ;
Sailing_Nut 0:6987c004e123 962 return GetAckResp() ;
Sailing_Nut 0:6987c004e123 963 }
Sailing_Nut 0:6987c004e123 964
Sailing_Nut 0:6987c004e123 965 void Goldelox_Serial_4DLib::SSTimeout(short Seconds)
Sailing_Nut 0:6987c004e123 966 {
Sailing_Nut 0:6987c004e123 967 _virtualPort->putc((char)(F_SSTimeout >> 8)) ;
Sailing_Nut 0:6987c004e123 968 _virtualPort->putc((char)(F_SSTimeout)) ;
Sailing_Nut 0:6987c004e123 969 _virtualPort->putc((char)(Seconds >> 8)) ;
Sailing_Nut 0:6987c004e123 970 _virtualPort->putc((char)(Seconds)) ;
Sailing_Nut 0:6987c004e123 971 GetAck() ;
Sailing_Nut 0:6987c004e123 972 }
Sailing_Nut 0:6987c004e123 973
Sailing_Nut 0:6987c004e123 974 void Goldelox_Serial_4DLib::SSSpeed(short Speed)
Sailing_Nut 0:6987c004e123 975 {
Sailing_Nut 0:6987c004e123 976 _virtualPort->putc((char)(F_SSSpeed >> 8)) ;
Sailing_Nut 0:6987c004e123 977 _virtualPort->putc((char)(F_SSSpeed)) ;
Sailing_Nut 0:6987c004e123 978 _virtualPort->putc((char)(Speed >> 8)) ;
Sailing_Nut 0:6987c004e123 979 _virtualPort->putc((char)(Speed)) ;
Sailing_Nut 0:6987c004e123 980 GetAck() ;
Sailing_Nut 0:6987c004e123 981 }
Sailing_Nut 0:6987c004e123 982
Sailing_Nut 0:6987c004e123 983 void Goldelox_Serial_4DLib::SSMode(short Parm)
Sailing_Nut 0:6987c004e123 984 {
Sailing_Nut 0:6987c004e123 985 _virtualPort->putc((char)(F_SSMode >> 8)) ;
Sailing_Nut 0:6987c004e123 986 _virtualPort->putc((char)(F_SSMode)) ;
Sailing_Nut 0:6987c004e123 987 _virtualPort->putc((char)(Parm >> 8)) ;
Sailing_Nut 0:6987c004e123 988 _virtualPort->putc((char)(Parm)) ;
Sailing_Nut 0:6987c004e123 989 GetAck() ;
Sailing_Nut 0:6987c004e123 990 }