• program echo;

    From Joaquim Homrighausen@2:20/4609 to Pascal on Wed Sep 27 22:21:40 2017
    begin
    IsThereAnybodyOutThere(true)?
    end.



    -joho

    ---
    * Origin: code.code.code (2:20/4609)
  • From Wilfred van Velzen@2:280/464 to Joaquim Homrighausen on Wed Sep 27 22:52:24 2017
    Hi Joaquim,

    On 2017-09-27 22:21:40, you wrote to Pascal:

    begin
    IsThereAnybodyOutThere(true)?
    end.

    SEEN-BY: 20/4609 103/705 120/544 123/141 135/300 138/146 140/1
    153/7715
    SEEN-BY: 154/10 201/0 203/0 2 124 221/0 1 6 360 230/0 240/5832 249/303 SEEN-BY: 261/38 266/404 512 275/100 280/464 5003 288/34 292/624 854 SEEN-BY: 320/219 342/11 77 423/120 640/384 712/848 770/1 2320/100 3634/12 SEEN-BY: 3634/15 22 24 27 50 119
    @PATH: 20/4609 3634/12 140/1 221/0 1 203/0 280/464

    Plenty systems get it... ;)

    And even more in the ones reaching me through different paths:

    SEEN+BY: 20/4609 123/141 135/300 140/1 154/10 20 30 40 700 203/0 221/6 227/201 SEEN+BY: 227/400 261/38 280/464 340/800 3634/12 15 22 24 27 50 119
    @PATH: 20/4609 3634/12 154/10

    SEEN+BY: 20/4609 120/544 123/141 135/300 138/146 140/1 153/7715 154/10 203/0 SEEN+BY: 221/0 1 6 360 240/1120 261/38 266/512 275/100 280/464 2020 5003 SEEN+BY: 280/5006 5268 288/34 292/624 854 342/11 77 3634/12 15 22 24 27 50 SEEN+BY: 3634/119
    @PATH: 20/4609 3634/12 140/1 221/0 1 280/5003


    Bye, Wilfred.

    --- FMail-lnx64 2.1.0.18-B20170815
    * Origin: FMail development HQ (2:280/464)
  • From mark lewis@1:3634/12.73 to Joaquim Homrighausen on Wed Sep 27 17:08:08 2017
    On 2017 Sep 27 22:21:40, you wrote to Pascal:

    @MSGID: 2:20/4609@fidonet 871633c4
    @PID: FM 2.33.mL JH000001
    @CHRS: IBMPC 2
    @CODEPAGE: 437
    @TZUTC: 0200
    @TID: FastEcho 1.46.1 106

    [PinkFloyd]

    begin
    IsThereAnybodyOutThere(true)?
    end.

    [/PinkFloyd]

    -joho

    ---
    * Origin: code.code.code (2:20/4609)
    SEEN-BY: 20/4609 123/141 135/300 140/1 154/10 261/38 3634/12 15 22 24 27
    50
    SEEN-BY: 3634/119
    @PATH: 20/4609 3634/12



    )\/(ark

    Always Mount a Scratch Monkey
    Do you manage your own servers? If you are not running an IDS/IPS yer doin' it wrong...
    ... Never sleep with anyone crazier than yourself.
    ---
    * Origin: (1:3634/12.73)
  • From Tony Langdon@3:633/410 to Joaquim Homrighausen on Thu Sep 28 09:28:00 2017
    Joaquim Homrighausen wrote to Pascal <=-

    @TZ: 0078
    begin
    IsThereAnybodyOutThere(true)?
    end.


    begin
    Writeln('Yes, I'm here');
    end.

    :D

    ... Error - Operator out of memory!
    --- MultiMail/Win32 v0.49
    * Origin: Freeway BBS - freeway.apana.org.au (3:633/410)
  • From Joaquim Homrighausen@2:20/4609 to Wilfred van Velzen on Thu Sep 28 07:23:10 2017
    Plenty systems get it... ;)

    OK ... just checking. Guess there's no interest in Pascal these days then :)



    -joho

    ---
    * Origin: code.code.code (2:20/4609)
  • From Joaquim Homrighausen@2:20/4609 to Tony Langdon on Thu Sep 28 07:23:28 2017
    @TZ: 0078
    begin
    IsThereAnybodyOutThere(true)?
    end.

    begin
    Writeln('Yes, I'm here');
    end.

    Wow, Pascal ;)



    -joho

    ---
    * Origin: code.code.code (2:20/4609)
  • From Wilfred van Velzen@2:280/464 to Joaquim Homrighausen on Thu Sep 28 09:05:55 2017
    Hi Joaquim,

    On 2017-09-28 07:23:10, you wrote to me:

    Plenty systems get it... ;)

    OK ... just checking. Guess there's no interest in Pascal these days then :)

    It's an ancient language. ;)

    The only time I seriously used it was during my study, more than 30 years ago. I forgot most of it's details, I probably couldn't write a simple hello world program if they put a gun to my head. ;)

    But I did some simple changes to the errflags program recently, which is written in pascal. Making changes to existing code is much easier...

    Bye, Wilfred.

    --- FMail-lnx64 2.1.0.18-B20170815
    * Origin: FMail development HQ (2:280/464)
  • From Tony Langdon@3:633/410 to Joaquim Homrighausen on Thu Sep 28 21:25:00 2017
    Joaquim Homrighausen wrote to Tony Langdon <=-

    begin
    Writeln('Yes, I'm here');
    end.

    Wow, Pascal ;)

    One way to keep it on topic. Pascal is the language I've known best over the years. ;)


    ... Do it! It's easier to get forgiveness than permission.
    --- MultiMail/Win32 v0.49
    * Origin: Freeway BBS - freeway.apana.org.au (3:633/410)
  • From Tony Langdon@3:633/410 to Wilfred van Velzen on Thu Sep 28 21:33:00 2017
    Wilfred van Velzen wrote to Joaquim Homrighausen <=-

    The only time I seriously used it was during my study, more than 30
    years ago. I forgot most of it's details, I probably couldn't write a simple hello world program if they put a gun to my head. ;)

    I can still write Hello World, actually it's coming back to me quite well, still quicker than learning C. :)


    ... Reputation: What others are not thinking about you.
    --- MultiMail/Win32 v0.49
    * Origin: Freeway BBS - freeway.apana.org.au (3:633/410)
  • From Tony Langdon@3:633/410 to Joaquim Homrighausen on Thu Sep 28 21:25:00 2017
    Joaquim Homrighausen wrote to Tony Langdon <=-

    begin
    Writeln('Yes, I'm here');
    end.

    Wow, Pascal ;)

    One way to keep it on topic. Pascal is the language I've known best over the years. ;)


    ... Do it! It's easier to get forgiveness than permission.
    --- MultiMail/Win32 v0.49
    * Origin: Freeway BBS - freeway.apana.org.au (3:633/410)
  • From Tony Langdon@3:633/410 to Wilfred van Velzen on Thu Sep 28 21:33:00 2017
    Wilfred van Velzen wrote to Joaquim Homrighausen <=-

    The only time I seriously used it was during my study, more than 30
    years ago. I forgot most of it's details, I probably couldn't write a simple hello world program if they put a gun to my head. ;)

    I can still write Hello World, actually it's coming back to me quite well, still quicker than learning C. :)


    ... Reputation: What others are not thinking about you.
    --- MultiMail/Win32 v0.49
    * Origin: Freeway BBS - freeway.apana.org.au (3:633/410)
  • From Joaquim Homrighausen@2:20/4609 to Wilfred van Velzen on Fri Sep 29 23:58:14 2017

    It's an ancient language. ;)

    Yes, but all you need to do is to add # or + after it, and it's a completely brand new and fantastic language, really! Or you can add a period/dot somewhere
    in the middle, like Pas.Cal and you'll have tons of gurus swearing by its greatfulness ... :-\

    The only time I seriously used it was during my study, more than
    30 years ago. I forgot most of it's details, I probably couldn't
    write a simple hello world program if they put a gun to my head.
    ;)

    Traditional Pascal *is* quite stale, but was used a lot to teach people programming ...

    But I did some simple changes to the errflags program recently,
    which is written in pascal. Making changes to existing code is
    much easier...

    :)

    Whatever gets the job done.



    -joho

    ---
    * Origin: code.code.code (2:20/4609)
  • From Tom De Puysseleyr@2:292/8125 to Joaquim Homrighausen on Sat Sep 30 10:20:42 2017

    Hello Joaquim!

    29 Sep 17 23:58, you wrote to Wilfred van Velzen:


    Traditional Pascal *is* quite stale, but was used a lot to teach
    people programming ...

    I learned myself how to program in Basic on an Apple //e, and later in learned pascal. I used that a lot in the good old Fidonet days, it was great fun! But then I learned VB6 at school and forgot everything about Pascal... I still use VB.Net that now on a daily basis at work..


    Tom


    --- GoldED+/W32-MSVC 1.1.5-b20170303
    * Origin: (2:292/8125)
  • From Joaquim Homrighausen@2:20/4609 to Tom De Puysseleyr on Sun Oct 1 16:59:50 2017
    I still use VB.Net that now on a daily basis at work..

    Congratulations! Glad to hear something you learned "back then" can still be applied in a workplace. For many people, I think, languages and environments change.


    -joho

    ---
    * Origin: code.code.code (2:20/4609)
  • From Niels Joncheere@2:292/789 to Tom De Puysseleyr on Mon Oct 2 23:03:52 2017
    Hallo Tom,

    Op 30 Sep 17 om 10:20 schreef jij aan Joaquim Homrighausen:

    29 Sep 17 23:58, you wrote to Wilfred van Velzen:

    Traditional Pascal *is* quite stale, but was used a lot to teach
    people programming ...

    I learned myself how to program in Basic on an Apple //e, and later in learned pascal. I used that a lot in the good old Fidonet days, it was great fun! But then I learned VB6 at school and forgot everything
    about Pascal... I still use VB.Net that now on a daily basis at work..

    Back when I was in secondary school in the 90s, Pascal was taught to some students of our school, though not to my own class. I taught myself BASIC, and later VB.NET. I recently looked at the ErrFlags Pascal code for reasons similar
    to Wilfred's, and was actually quite positively surprised by the language itself: it seems to promote a 'better' style of programming than VB. In most current applications of VB.NET, I think I would prefer to use C# for the same purpose.

    Best regards,
    Niels

    --- GoldED+/LNX 1.1.5-b20130111
    * Origin: Niels's FidoNet Node - fido.joncheere.be (2:292/789)
  • From Tom De Puysseleyr@2:292/8125 to Niels Joncheere on Tue Oct 3 20:58:33 2017

    Hello Niels!

    02 Oct 17 23:03, you wrote to me:

    I recently looked at the ErrFlags
    Pascal code for reasons similar to Wilfred's, and was actually quite positively surprised by the language itself: it seems to promote a 'better' style of programming than VB. In most current applications of VB.NET, I think I would prefer to use C# for the same purpose.

    Looking at some Pascal code... that's something I should do when there's some spare time left someday :) VB.Net is becoming more and more complex... I don't
    understand all the new stuff, and don't have enough time to learn and practice it. And I've never used C sharp... VB does a lot for you, stuff that you have to do yourself in C. But sometimes that works against you as well :-/


    Tom


    --- GoldED+/W32-MSVC 1.1.5-b20170303
    * Origin: (2:292/8125)
  • From Dale Barnes@1:220/60 to Joaquim Homrighausen on Tue Oct 3 20:47:09 2017

    begin
    IsThereAnybodyOutThere(true)?
    end. ^
    Invalid Char found, expected ; but found ?






    -joho

    ---
    * Origin: code.code.code (2:20/4609)


    --- InterEcho 1.20
    * Origin: Home Of InterMail/InterEcho (1:220/60)
  • From Dale Barnes@1:220/60 to Joaquim Homrighausen on Tue Oct 3 20:48:30 2017
    Who are you calling Stale! LOL


    It's an ancient language. ;)

    Yes, but all you need to do is to add # or + after it,
    and it's a completely brand new and fantastic language,
    really! Or you can add a period/dot somewhere in the
    middle, like Pas.Cal and you'll have tons of gurus swearing
    by its greatfulness ... :-\

    The only time I seriously used it was during my
    study, more than
    30 years ago. I forgot most of it's details, I
    probably couldn't
    write a simple hello world program if they put a gun
    to my head.
    ;)

    Traditional Pascal *is* quite stale, but was used a lot to
    teach people programming ...

    But I did some simple changes to the errflags program
    recently,
    which is written in pascal. Making changes to
    existing code is
    much easier...

    :)

    Whatever gets the job done.



    -joho

    ---
    * Origin: code.code.code (2:20/4609)


    --- InterEcho 1.20
    * Origin: Home Of InterMail/InterEcho (1:220/60)
  • From Dale Barnes@1:220/60 to Joaquim Homrighausen on Tue Oct 3 20:47:09 2017

    begin
    IsThereAnybodyOutThere(true)?
    end. ^
    Invalid Char found, expected ; but found ?






    -joho

    ---
    * Origin: code.code.code (2:20/4609)


    --- InterEcho 1.20
    * Origin: Home Of InterMail/InterEcho (1:220/60)
  • From Dale Barnes@1:220/60 to Joaquim Homrighausen on Tue Oct 3 20:48:30 2017
    Who are you calling Stale! LOL


    It's an ancient language. ;)

    Yes, but all you need to do is to add # or + after it,
    and it's a completely brand new and fantastic language,
    really! Or you can add a period/dot somewhere in the
    middle, like Pas.Cal and you'll have tons of gurus swearing
    by its greatfulness ... :-\

    The only time I seriously used it was during my
    study, more than
    30 years ago. I forgot most of it's details, I
    probably couldn't
    write a simple hello world program if they put a gun
    to my head.
    ;)

    Traditional Pascal *is* quite stale, but was used a lot to
    teach people programming ...

    But I did some simple changes to the errflags program
    recently,
    which is written in pascal. Making changes to
    existing code is
    much easier...

    :)

    Whatever gets the job done.



    -joho

    ---
    * Origin: code.code.code (2:20/4609)


    --- InterEcho 1.20
    * Origin: Home Of InterMail/InterEcho (1:220/60)
  • From Joaquim Homrighausen@2:20/4609 to Dale Barnes on Wed Oct 4 20:16:36 2017
    Invalid Char found, expected ; but found ?

    :)


    -joho

    ---
    * Origin: Stockholm | Sweden (2:20/4609)
  • From Joaquim Homrighausen@2:20/4609 to Dale Barnes on Wed Oct 4 20:16:26 2017
    Traditional Pascal *is* quite stale, but was used a lot to
    teach people programming ...

    Who are you calling Stale! LOL

    You got me there :)


    -joho

    ---
    * Origin: Stockholm | Sweden (2:20/4609)
  • From Tony Langdon@3:633/410 to Dale Barnes on Thu Oct 5 09:48:00 2017
    Dale Barnes wrote to Joaquim Homrighausen <=-


    begin
    IsThereAnybodyOutThere(true)?
    end. ^
    Invalid Char found, expected ; but found ?

    LOL good one. :-)


    ... There are no answers, only cross-references!
    --- MultiMail/Win32 v0.49
    * Origin: Freeway BBS - freeway.apana.org.au (3:633/410)
  • From Ozz Nixon@1:275/301 to Joaquim Homrighausen on Mon Nov 20 18:56:56 2017
    Hello Joaquim.

    Modern Pascal, formal mode:

    Program Example.Reply.v1;

    Uses
    Socket;

    var
    Client:TDXSock;

    Begin
    Client.Init;
    If Client.ConnectTo('modernpascal.com', binkp_protocol) then begin
    Client.Writeln('Sup?!');
    Client.Writeln('Gave up on recomiling QuickBBS 16bit - porting to 32bit now');
    While not Client.CountWaiting do Yield(1);
    End
    Else Writeln('Could not connect to my uplink...');
    Client.Free;
    End;

    Ozz

    --- GoldED+/W32 1.1.4.7
    * Origin: Home of Exchange BBS (QBBS Clone) and Rhenium Mailer (1:275/301)
  • From Ozz Nixon@1:275/301 to Tony Langdon on Mon Nov 20 19:02:10 2017
    Hello Tony.

    Replying to a msg dated 28 Sep 17 09:28, from Tony to Joaquim Homrighausen.

    Actually that will not compile --- should have had double apostrophy.
    I''m when in a string. This is why Modern Pascal supports " " strings too, allowing for Writeln("I'm here too");

    Ozz

    --- GoldED+/W32 1.1.4.7
    * Origin: Home of Exchange BBS (QBBS Clone) and Rhenium Mailer (1:275/301)
  • From Ozz Nixon@1:275/301 to Dale Barnes on Mon Nov 20 19:08:46 2017
    Hello Dale.

    03 Oct 17 20:47, you wrote to Joaquim Homrighausen:


    begin
    IsThereAnybodyOutThere(true)?
    end. ^
    Invalid Char found, expected ; but found ?

    Good find! Modern Pascal would have returned:

    Error, iif expected true and false, or end of statement ; expected.

    (* That has been my issue on documenting errors in hybrid mode)

    Ozz

    --- GoldED+/W32 1.1.4.7
    * Origin: Home of Exchange BBS (QBBS Clone) and Rhenium Mailer (1:275/301)
  • From Tony Langdon@3:633/410 to Ozz Nixon on Fri Jan 5 12:17:00 2018
    Ozz Nixon wrote to Tony Langdon <=-

    Hello Tony.

    Replying to a msg dated 28 Sep 17 09:28, from Tony to Joaquim Homrighausen.

    Actually that will not compile --- should have had double apostrophy.
    I''m when in a string. This is why Modern Pascal supports " " strings
    too, allowing for Writeln("I'm here too");

    An old message, my system has been down a while. Only just getting it back online now. Luckily my uplink kept my mail. :)

    But, yes, good point there. That used to be a pain in the old days.


    ... Life is a first draft with no rewrite.
    === MultiMail/Win32 v0.49
    --- SBBSecho 3.03-Linux
    * Origin: Freeway BBS Bendigo,Australia freeway.apana.org.au (3:633/410)