Code snippet

in #topshekels997 years ago

program New;

var S: String;

const
warningprice ='0.0190504'; //0.0167957
fuckkkkprice ='0.0130000';

function Get: String;
begin
S := GetPage('https://api.coinmarketcap.com/v1/ticker/siacoin/');
S := Between('price_usd": "', '", ', S);
Result := S;
end;

procedure loop;
begin
WriteLn(Get);
if S > warningprice then
PlaySound('C:\Users\ditch\Downloads\beachresort\beachresort\images\krs.wav')
end;

procedure loop1;
begin
if S < fuckkkkprice then
PlaySound('C:\Users\ditch\Downloads\beachresort\beachresort\images\krs.wav')
end;

begin
repeat
cleardebug;
loop;
loop1;
wait(10000);
until false
end.

Sort:  

Is there anyway for me to get this working for bitcoin?

I need to keep checking the price for bitcoin but need to exclude the chinese and korean prices as they cause major inflation.

I would be willing to pay you in STEEM OR STEEM DOLLAR for such a thing.

If you are interested please drop me a memo with your email and I will respond as soon as I notice it.

Thanks again fellow steemian

Great script you have there for bed time lol


Can you confirm what language this script was in - looks like delphi if im correct?

Kinda not used that for a few years so any help getting started would be appreciated.

Ég hef fylgst með innstreymi allsherjar sem hefur átt sér stað í háu og vaxandi hlutfalli. Undanfarið hef ég tekið eftir því að #hýsingar fara niður, sem ég hef ekki séð áður. Ég er mjög sannur og hollur SIA-manneskja furða: (vinsamlegast athugaðu að ég hef aðeins fylgst með þessu með SiaHub og Siapulse, sem ekki er alltaf samstillt á fjölda husts / geymslu, svo ég get ekki staðfest hvort fjöldi vélar er rétt! ?)

Verður samfélagið ruglað saman við SIA beeing eihter hugbúnaðarveitanda og HW framleiðanda, sem nú kynnir Obelisk?

Vissi einhver að treysta á vegakortinu, þar sem fyrirheitna júníútgáfan hefur ekki enn komið á veginn?

Ætti SIA-netið að vera þroskaðra og er það nægjanlegur stuðningur viðráðanlegur til að virkilega fara veldishraða með þessu? Eftir umræðurnar sem sýna mikið af galla eða misskilningi og erfitt að laga vandamál !?

Hafa stofnendur SIA fljótt þörf fyrir að binda leið fyrir bandalög með 3. paríum til að við getum byrjað að vaxa að fátæka 1% (einn) geymslu nýtingu í raun raunverulega hvetja vélar til að vera og nýtt til að taka þátt? -> ef þú horfir á gestalistann, hafa aðeins um 25 vélar tekist að nýta sér meira en 50%!

Many thanks for this my good friend.

To show my appreciation for this script have a poem.

Roses are red.

Violets are blue.

Coinmarketcap is dead.

And without this script my portfolio would be too.

Hope you liked it here is my tipjar lol

I will give your script a run tonight if I can get a copy of delphi 😊

Alveg persónulegur

Sia skiptist í sundur, dulkóðar og dreifir skrám þínum yfir dreifðan net. Þar sem þú heldur inni takkana eiga þú gögnin þín. Engin utanaðkomandi fyrirtæki geta fengið aðgang að eða stjórnað skrám þínum, ólíkt hefðbundnum skýjageymslumiðlum.
Miklu meira affordable

Dreifing skýja Sia er að meðaltali 10x ódýrari en núverandi skýjageymslutæki. Geymsla 1TB á Sia kostar um $ 2 á mánuði, samanborið við $ 23 á Amazon S3. Reiknaðu sparnaði þínum fyrir neðan!

Does this work?

I have been having a lot of sleepless nights.

The stock market sleeps crypto does not..

If I just replace wav file and install Delphi o assume this just works?

Really hope it does and finding Delphi is turning quite difficult.

Any help finding would be great.

FNn out of here :)

Hey @liqiye I have rated your post below with the following ratings on a scale of 1 to 10:

Hope you are happy with them!

Presentation: 9.4/10 - Great work, I think you could have made fonts a bit more unique but great anyway.
Content: 9.4/10 - I enjoyed reading it the code you have made it so it loops really well and will no doubt wake you.
Effort: 9.5/10 - You seem to really love putting effort into your work and I can see that through your code snippet easily.
Uniqueness: 8.7/10 - I haven't seen any posts regarding an alarm clock for price changes during my time of trawling through steemit.

Love it fellow steemian!

Have an upboat and some ❤ from ezpz

lol does this mean what I think it means ? MORE!!

Congratulations @liqiye! You have completed some achievement on Steemit and have been rewarded with new badge(s) :

Award for the number of upvotes received

Click on any badge to view your own Board of Honor on SteemitBoard.
For more information about SteemitBoard, click here

If you no longer want to receive notifications, reply to this comment with the word STOP

By upvoting this notification, you can help all Steemit users. Learn how here!

Congratulations @liqiye! You have completed some achievement on Steemit and have been rewarded with new badge(s) :

Award for the number of upvotes

Click on any badge to view your own Board of Honor on SteemitBoard.
For more information about SteemitBoard, click here

If you no longer want to receive notifications, reply to this comment with the word STOP

By upvoting this notification, you can help all Steemit users. Learn how here!

Congratulations @liqiye! You have completed some achievement on Steemit and have been rewarded with new badge(s) :

Award for the number of upvotes

Click on any badge to view your own Board of Honor on SteemitBoard.
For more information about SteemitBoard, click here

If you no longer want to receive notifications, reply to this comment with the word STOP

By upvoting this notification, you can help all Steemit users. Learn how here!

Coin Marketplace

STEEM 0.15
TRX 0.16
JST 0.028
BTC 68588.91
ETH 2458.42
USDT 1.00
SBD 2.35