CP/M ! We are old. I first ran into it layer than you as it was the OS
(so to speak) under an accounting program in the late 80's and already
doomed. as was the variable speed floppy drive

I have one small program that I have been trying to resurect in
trubopascal.

Marc


--- In turbopascalprogramming2@yahoogroups.com, Jeff144 <no_reply@...>
wrote:
>
> No activity in this group for awhile, just wondering if anyone was
> still using Turbo Pascal?  I got my first copy of TP for CP/M way
back
> in 1981 or '82.  Any other old-timers here?
>

No activity in this group for awhile, just wondering if anyone was
still using Turbo Pascal?  I got my first copy of TP for CP/M way back
in 1981 or '82.  Any other old-timers here?

how can ı read an monochrome bmp fıle and change ıt to colors number? for
example 1 related whıte and 0 to black .


  YAHOO! ADVERTISEMENT



---------------------------------
Ring'em or ping'em. Make  PC-to-phone calls as low as 1¢/min with Yahoo!
Messenger with Voice.

[Non-text portions of this message have been removed]

Turkish variant script?
    Presuming that this is not a problem with your programme commanding x/y when
y is zero...
    There is a problem with turbo pascal v7 on computers faster than about
250MHz. Every prog. on starting attempts to calibrate its cpu-wasting DELAY
function, even if your prog. never uses it. The DELAY(milliseconds) procedure
computes a certain number of some action per millisecond, but on computers with
different speeds, that number is unknown, thus the calibration stage when a
prog. starts.
    Alas, on faster computers the calculation fails with a divide by zero, caused
by the overflow of some counter that was never expected to exceed the size of a
16 bit number in the days of 20MHz computers, or something of the sort.
    There is a patch for TP7 available that fixes this problem. I have applied it
to my TP7 and it works, but I don't now recall where I found the patch. If
google doesn't rescue you, I could send you a copy of my installation... about
2.5MB in a .zip file.

    Alternatively, you could escalate to the Free Pascal for windows system,
which has a much closer fit to the windows world (especially long file names),
though it produces monstrously larger code files. I have not had a chance to do
much with it however, especially in the vexing area of graphs and the equivalent
or replacement for the .bgi scheme.

                          Best wishes,
                          Nicky.

--- In turbopascalprogramming2@yahoogroups.com, "SEMİH" "GELİSLİ" <sgelisli@...>
wrote:
>
> hı , ı ınstall new pascal but ıt gıves error agaın and agaın .the error ıs
dıvısıon by zero .what am ı do???
>
>
>  YAHOO! ADVERTISEMENT
>
>
>
> ---------------------------------
> Do you Yahoo!?
>  Everyone is raving about the  all-new Yahoo! Mail Beta.
>
> [Non-text portions of this message have been removed]
>

My previous attempt seems to have been lost.
    If you are using Turbo Pascal 7, there is a patch that changes the
way that the DELAY procedure's time-wasting loop is calibrated. On
systems faster than about 200MHz a divide by zero results even if you
never use the DELAY procedure, nor even a divide in your programme.
    I've forgotten where I found the patch, but if Google doesn't
rescue you I can supply a patched TP7, aboyt 2.5MB.
    Otherwise, you could try the Free Pascal Compiler for windows, that
is a better fit to wunduhs, except that its code files are much larger
than those produced by tp7. But it does handle long file names.

                       Cheers,
                       Nicky.


--- In turbopascalprogramming2@yahoogroups.com, "SEMİH" "GELİSLİ"
<sgelisli@...> wrote:
>
> hı , ı ınstall new pascal but ıt gıves error agaın and agaın .the
error ıs dıvısıon by zero .what am ı do???
>
>
>  YAHOO! ADVERTISEMENT
>
>
>
> ---------------------------------
> Do you Yahoo!?
>  Everyone is raving about the  all-new Yahoo! Mail Beta.
>
> [Non-text portions of this message have been removed]
>

My previouis attempt seems to have been lost.
    If you are using Turbo Pascal 7, there is a patch that changes the way that
the DELAY procedure's time-wasting loop is calibrated. On systems faster than
about 200MHz a divide by zero results even if you never use the DELAY procedure,
nor even a divide in your programme.
    I've forgotten where I found the patch, but if Google doesn't rescue you I
can supply a patched TP7, aboyt 2.5MB.
    Otherwise, you could try the Free Pascal Compiler for windows, that is a
better fit to wunduhs, except that its code files are much larger than those
produced by tp7. But it does handle long file names.

                       Cheers,
                       Nicky.


--- In turbopascalprogramming2@yahoogroups.com, "SEMİH" "GELİSLİ" <sgelisli@...>
wrote:
>
> hı , ı ınstall new pascal but ıt gıves error agaın and agaın .the error ıs
dıvısıon by zero .what am ı do???
>
>
>  YAHOO! ADVERTISEMENT
>
>
>
> ---------------------------------
> Do you Yahoo!?
>  Everyone is raving about the  all-new Yahoo! Mail Beta.
>
> [Non-text portions of this message have been removed]
>

hı , ı ınstall new pascal but ıt gıves error agaın and agaın .the error ıs
dıvısıon by zero .what am ı do???


  YAHOO! ADVERTISEMENT



---------------------------------
Do you Yahoo!?
  Everyone is raving about the  all-new Yahoo! Mail Beta.

[Non-text portions of this message have been removed]

Hi all,
        At last i have done it.
         Thank God.



---------------------------------
Love cheap thrills? Enjoy PC-to-Phone  calls to 30+ countries for just 2¢/min
with Yahoo! Messenger with Voice.

[Non-text portions of this message have been removed]

What is the nature of your difficulty? These are very basic usages of arrays
and array indexing, so if you at all understand the coursework on array usage,
and introductory programming, you should have no difficulty. If you do have
difficulty, then you should review the coursework again, with careful regard to
the examples offered. Surely you have seen some examples? Surely you have
written some programmes?
    Surely there has been some discussion of sorting methods, such as BubbleSort,
or CombSort, or InsertionSort? Such discussion will involve the source code of
the programmes, and if not in Pascal itself, it should still be comprehensible.
    For instance, here is a very crude bubblesort:

      for i:=1 to N do
       for j:=2 to N do
        if a(j - 1) > a(j) then swap(a(j - 1),a(j));
       next j;
      next i;

    Which is not exactly in Pascal. To know why it works, and why it is
(painfully) crude, you would have to think about it, and study the better
versions, and other sort methods as well. The CombSort is based on the
BubbleSort, but is *much* better and just about as simple. But why it is so much
better requires a good understanding of the issues of sorting.

    You have to gain some understanding of your own, which means your own effort.
Simply solving this problem for you will be no preparation for you when the next
problem arrives and your situation will be the same.

                           Regards,
                           Nicky.

--- In turbopascalprogramming2@yahoogroups.com, "David Smart" <smartware@...>
wrote:
>
> Well, it sounds as though you're trying to demonstrate proficiency in Pascal
programming.  It's up to you to do these tasks, not us.
>
> If you want to post code that is nearly correct but not quite working, by all
means do so.  But you need to do 95% of the work at least.
>
> Regards, Dave S
>   ----- Original Message -----
>   From: rowaid_farooq
>   To: turbopascalprogramming2@yahoogroups.com
>   Sent: Wednesday, May 24, 2006 6:15 PM
>   Subject: [TurboPascalProgramming] Again some problems
>
>
>   Hi all,
>   I am going mad as i am approaching towards a good programming in
>   Pascal. I have faced a lot of difficulties in last week. some of
>   those programs are mentioned below. Plz help me if anyone can.
>
>
>        write a program that would take a one-dimensional array as
>   input from user and sort the array in ascending order.
>
>        write a program taht takes the 4*4 dimensional array as input
>   and copies each row of an array into 4
>   one-dimensional arrays.
>
>        write a program that would take a 4*4 array as input and forms
>   the transpose of the matrix. The transpose of a
>   matrix has the property that A[i,j]=B[j,i].
>
>        write a program that takes 2 polynomials of degree 4 as input.
>   The polynomials are stored in one-dimensional
>   arrays.The program should then calculate the product of the two
>   polynomials and store their sum in a third
>   array.
>
>        Suppose that we are given a table of integers A having 2 rows
>   and 2 columns and another table of numbers X that
>   has 2 rows, We wish to generate a new list of integers Y that is
>   formed by carrying out the following operations:
>   Y[1]=A[1,1]*X[1]+A[1,2]*X[2]
>   Y[2]=A[2,1]*X[1]+A[2,2]*X[2]
>   write a program that would carry out the above mentioned operations.
>
>
>
>
>
>
>
>
>   SPONSORED LINKS C programming language  Computer programming languages  The
c programming language
>         C++ programming language  Software programming language  Java
programming language
>
>
> ------------------------------------------------------------------------------
>   YAHOO! GROUPS LINKS
>
>     a..  Visit your group "turbopascalprogramming2" on the web.
>
>     b..  To unsubscribe from this group, send an email to:
>      turbopascalprogramming2-unsubscribe@yahoogroups.com
>
>     c..  Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.
>
>
> ------------------------------------------------------------------------------
>
>
>
> [Non-text portions of this message have been removed]
>

Well, it sounds as though you're trying to demonstrate proficiency in Pascal
programming.  It's up to you to do these tasks, not us.

If you want to post code that is nearly correct but not quite working, by all
means do so.  But you need to do 95% of the work at least.

Regards, Dave S
   ----- Original Message -----
   From: rowaid_farooq
   To: turbopascalprogramming2@yahoogroups.com
   Sent: Wednesday, May 24, 2006 6:15 PM
   Subject: [TurboPascalProgramming] Again some problems


   Hi all,
   I am going mad as i am approaching towards a good programming in
   Pascal. I have faced a lot of difficulties in last week. some of
   those programs are mentioned below. Plz help me if anyone can.


        write a program that would take a one-dimensional array as
   input from user and sort the array in ascending order.

        write a program taht takes the 4*4 dimensional array as input
   and copies each row of an array into 4
   one-dimensional arrays.

        write a program that would take a 4*4 array as input and forms
   the transpose of the matrix. The transpose of a
   matrix has the property that A[i,j]=B[j,i].

        write a program that takes 2 polynomials of degree 4 as input.
   The polynomials are stored in one-dimensional
   arrays.The program should then calculate the product of the two
   polynomials and store their sum in a third
   array.

        Suppose that we are given a table of integers A having 2 rows
   and 2 columns and another table of numbers X that
   has 2 rows, We wish to generate a new list of integers Y that is
   formed by carrying out the following operations:
   Y[1]=A[1,1]*X[1]+A[1,2]*X[2]
   Y[2]=A[2,1]*X[1]+A[2,2]*X[2]
   write a program that would carry out the above mentioned operations.








   SPONSORED LINKS C programming language  Computer programming languages  The c
programming language
         C++ programming language  Software programming language  Java
programming language


------------------------------------------------------------------------------
   YAHOO! GROUPS LINKS

     a..  Visit your group "turbopascalprogramming2" on the web.

     b..  To unsubscribe from this group, send an email to:
      turbopascalprogramming2-unsubscribe@yahoogroups.com

     c..  Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.


------------------------------------------------------------------------------



[Non-text portions of this message have been removed]

Hi all,
I am going mad as i am approaching towards a good programming in
Pascal. I have faced a lot of difficulties in last week. some of
those programs are mentioned below. Plz help me if anyone can.


      write a program that would take a one-dimensional array as
input from user and sort the array in ascending order.

      write a program taht takes the 4*4 dimensional array as input
and copies each row of an array into 4
one-dimensional arrays.

      write a program that would take a 4*4 array as input and forms
the transpose of the matrix. The transpose of a
matrix has the property that A[i,j]=B[j,i].

      write a program that takes 2 polynomials of degree 4 as input.
The polynomials are stored in one-dimensional
arrays.The program should then calculate the product of the two
polynomials and store their sum in a third
array.

      Suppose that we are given a table of integers A having 2 rows
and 2 columns and another table of numbers X that
has 2 rows, We wish to generate a new list of integers Y that is
formed by carrying out the following operations:
Y[1]=A[1,1]*X[1]+A[1,2]*X[2]
Y[2]=A[2,1]*X[1]+A[2,2]*X[2]
write a program that would carry out the above mentioned operations.

sorry i was kind of busy with one web page, but i'll send it as soon as i can, i
promise

robert ryan <jaacckkee@...> escribió:  did u say that you were sending
code
thanks
bob

--- abelt2k <abelt2k@...> wrote:

> in my days of college i had been developing a few
> codes tha emulates
> the "windows" (dialog Boxes)etc. from  microsoft
> even using the
> library mouse in graph mode... and this is when all
> my troubles
> began... (i think i'm gonna cry) i would like that
> you can see the
> window's aspect created in pascal. i will send you
> guys a few codes
> with librays included, wich i hope it could be
> useful for all of us...
>
> i will send it as soon as i eat something before,
> today is the day
>
>
>
>
>


__________________________________________________
Do You Yahoo!?
Tired of spam?  Yahoo! Mail has the best spam protection around
http://mail.yahoo.com


   SPONSORED LINKS
         C programming language   Computer programming languages   The c
programming language     C++ programming language   Software programming
language   Java programming language

---------------------------------
   YAHOO! GROUPS LINKS


     Visit your group "turbopascalprogramming2" on the web.

     To unsubscribe from this group, send an email to:
  turbopascalprogramming2-unsubscribe@yahoogroups.com

     Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.


---------------------------------





---------------------------------
   Do You Yahoo!? La mejor conexión a Internet y 2GB extra a tu correo por $100
al mes. http://net.yahoo.com.mx

[Non-text portions of this message have been removed]

did u say that you were sending code
thanks
bob

--- abelt2k <abelt2k@...> wrote:

> in my days of college i had been developing a few
> codes tha emulates
> the "windows" (dialog Boxes)etc. from  microsoft
> even using the
> library mouse in graph mode... and this is when all
> my troubles
> began... (i think i'm gonna cry) i would like that
> you can see the
> window's aspect created in pascal. i will send you
> guys a few codes
> with librays included, wich i hope it could be
> useful for all of us...
>
> i will send it as soon as i eat something before,
> today is the day
>
>
>
>
>


__________________________________________________
Do You Yahoo!?
Tired of spam?  Yahoo! Mail has the best spam protection around
http://mail.yahoo.com

in my days of college i had been developing a few codes tha emulates
the "windows" (dialog Boxes)etc. from  microsoft even using the
library mouse in graph mode... and this is when all my troubles
began... (i think i'm gonna cry) i would like that you can see the
window's aspect created in pascal. i will send you guys a few codes
with librays included, wich i hope it could be useful for all of us...

i will send it as soon as i eat something before, today is the day

hi... i send you the code for the program that you asked for, as i
told ya, there is many ways to write programs, the heart of the
programming is the understanding of the main problem, and the well
administration of your variables that you wish to use... So you can
solve this program in any way that you are able for, first you need to
get you goal and the debug your program, always debug, because this
measures your real skill.


Abel

Saludos desde:
Concepcioón del Oro,
Zacatecas. Mexico.

one var. that you can include and don't mention it, was te movement
of the earth... and of course can afect all that



--- In turbopascalprogramming2@yahoogroups.com, "Nicky"
<rnmclean@...> wrote:
>
>    I also started this with a TP7 prog. Someone had been
whimpering in some discussion group about their being taught only
about objects following parabolic paths, failing to consider air
resistance. Being unemployed at the time I wrote an essay
mentioning "divide and conquer", starting simply, blah blah, and
how, when you do consider air resistance it is via numerical methods
whose equations of motion are exactly those of the constant
acceleration only analysis originally complained of.
>    Anyway, the prog was simple (as below) and I didn't introduce a
wind feature, in part because I didn't know what sort of "lapse
rate" was needed to follow the change of wind speed with altitude
caused by drag along the Earth's surface. A constant wind is of
course easy to involve. As for the "bodies", ahem, I needed a
coefficient for the air resistance factor, and without a reference
to hand, I used a fact I remembered reading somewhere about
parachutists. This also added a certain drama to an otherwise dry
issue...
>    Later, I wanted to try out graphing with Delphi, and this
seemed a simple example. The "window" features for entering
parameters and selecting options (Euler, 2'nd order Euler, Runge-
Kutta, Predictor-Corrector; feet vs. metres, Cartesian or Polar
coordinates for the initial velocity) were less trouble than messing
about with some sort of run parameter string, or clunky
question&answer sequence as with text input, but the graphics were
not entirely plasing.
>    It was a great relief that there seemed no need for my prog. to
redraw its display (as when a window is closed then reopened) as
this seemed to be handled for me: it would be disasterous to be
forced to restart the whole computation so as to retrace all the
lines as such a computatiion could be massive. (I have another prog.
that plots the motion of N bodies under mutual gravitation) I don't
have much patience with this supposed requirement (at least when the
window size is unchanged) as I feel that the operating system should
look after the canvas the prog. is scribbling on. This does seem to
be done for me in Delphi.
>    On the other side, I found that the Delphi offering LineTo(x,y)
drew dots up to but *not* including the last at (x,y). This is
bearable during a sequence of lines following a trajectory, but I
rather do want to see the end point itself as well.
>    This would be particularly troublesome in converting
my "SortShow" prog. that shows various sorting methods in action,
the stuff being sorted being depicted as lines of length
proportional to their key: much thought had gone in to redrawing
only the minimum number of dots as the lines are moved about.
>    Thus, most of my fun progs. involve graphics, a vexing business
with .bgi, and as yet unexplored with Delphi and FreePascal.
>
>    I also have not had much to do with the Object-Oriented
bandwagon (other than suffer the consequences of attempts at that
via wunduhs, and so forth) as I have yet to confront a problem for
which it offers a boost to dealing with the main issue. It might
seem that the N-body gravitational prog. would surely be a case
for "objects", each having a mass, a size, a colour, a position, a
velocity, an acceleration, and for higher-order methods a collection
of past positions and accelerations and scratchpads. But the
dominating issue to be solved is the speedy treatment of the N-body
calculation and storing position, etc. data in suitable arrays does
nicely. Indeed, Pascal's rigid typing and difficulties over passing
array parameters means that Fortran or PL/I offer better features.
>
>
>
> Program Fling; Uses DOS, crt;
> {Concocted by R.N.McLean (whom God preserve), Victoria university,
NZ.}
> {Considers the path of a body flung with some initial velocity,
given that
>  the acceleration of gravity is 32 feet/second**2 and that air
resistance
>  is proportional to the square of the velocity and for the body is
such that
>  the terminal velocity is 120 miles/hour or 176 feet/second,
straight down.}
>  var Ax,Ay,Vx,Vy,x,y,T: real;    {State variables.}
>  var A2,A,v2,v,dt,c,g: real;     {Computational assistants.}
>  BEGIN
>   Writeln('The path of a flung person, in feet...');
>   Writeln('So, 30 m.p.h. = 44 feet/second.');
>   g:=-32; c:=0.001033;          {Gravitational, air resistance
factors.}
>   Write('Specify the initial velocity in x and y (eg, 250
200): ');
>   Readln(Vx,Vy);
>   x:=0;   y:=0;                 {Initial position.}
>   T:=0;                         {Start time.}
>   Write('Euler''s first-order method is used: what time step (eg,
0.1): ');
>   ReadLn(dt);
>   Writeln(' Secs,      x,      y,     Vx,     Vy,      V,
Ax,     Ay,      A');
>   while y >= 0 do               {Still in the air?}
>    begin                        {Yep.}
>     V2:=Vx*Vx + Vy*Vy;          {Ascertain velocity.}
>     V:=Sqrt(V2);
>     Ax:=0 - c*V2*Vx/V;          {Thence, acceleration.}
>     Ay:=g - c*V2*Vy/V;
>     A2:=Ax*Ax + Ay*Ay;
>     A:=Sqrt(A2);
>     Writeln
(t:5:1,x:8:0,y:8:0,vx:8:0,vy:8:0,v:8:0,Ax:8:0,Ay:8:0,A:8:0); {State
state.}
>     x:=x + (Vx + 0.5*Ax*dt)*dt; {Step to the new position after dt
has passed.}
>     y:=y + (Vy + 0.5*Ay*dt)*dt;
>     Vx:=Vx + Ax*dt;             {Watch order. V changes too.}
>     Vy:=Vy + Ay*dt;             {Wasteful recomputation of A*dt}
>     T:=T + dt;                  {Unwise series of additions. Use
T0 + N*dt.}
>    end;
>   Write(t:5:1,x:8:0,y:8:0,vx:8:0,vy:8:0);
>   WriteLn(' ... Splot ...');
>  END.
>

ok...
   it's been a while since i don't program in turbo... but i think that i can
help you
  
--------------------------------------------------------------------------------\
-----
   program arreglo;
   uses crt;
   var
   inp_char,comp_char:char;
   carac:array[1..10] of char;
   a:integer;
   char_found:boolean;
   begin
   clrscr;
   char_found:= FALSE;   {we need to initialice in false mode}
   inp_char:= ' ';               {even the var chars with one blank charcter}
   comp_char:= ' ';           {'cause your're gonna run this code many times}
   for a:= 1 to 10 do         {and we don't want trash in the memory}
    begin
       writeln('gimme the character: ');
       readln(inp_char);
       carac[a]:= inp_char;
    end;
   writeln('all characters processed.... press <ENTER> to continue:');
   readln;
     writeln('gimme the character that you wish to find ');
     readln(comp_char);
   for a:= 1 to 10 do
    begin
       if comp_char = carac[a] then
           char_found:= TRUE;
     end;
   if char_found = TRUE then
    Writeln(' character found...')
   else
    writeln('character not found..');
   readln;
   end.


   ------------------------------------------------------------------
   this code run in any version of turbo pascal
   there is a infinite ways to make that code this one it's for beginners
   Saludos desde mexico... this is my home page.
   it's my little town please visit and tell everybody
   www.concepciondeloro.com.mx


   rowaid_farooq <rowaid_farooq@...> escribió:
   Hi all,
       I am a new user of turbo pascal and trying to get good command
over it but i m facing some problems in an array. I have a program in
my mind. Could you help me in coding?  i want to enter ten characters
in an array of ten elements of type 'char'. Now after taking input the
user should give any character to search in an array. If the character
is present then output will be "found" otherwise "not found".
                                       Thnx all.
                                    Rowaid Bin Farooq






   SPONSORED LINKS
         C programming language   Computer programming languages   The c
programming language     C++ programming language   List of programming
languages   Software programming language

---------------------------------
   YAHOO! GROUPS LINKS


     Visit your group "turbopascalprogramming2" on the web.

     To unsubscribe from this group, send an email to:
  turbopascalprogramming2-unsubscribe@yahoogroups.com

     Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.


---------------------------------





---------------------------------
   Do You Yahoo!? La mejor conexión a Internet y 2GB extra a tu correo por $100
al mes. http://net.yahoo.com.mx

[Non-text portions of this message have been removed]

Hi all,
       I am a new user of turbo pascal and trying to get good command
over it but i m facing some problems in an array. I have a program in
my mind. Could you help me in coding?  i want to enter ten characters
in an array of ten elements of type 'char'. Now after taking input the
user should give any character to search in an array. If the character
is present then output will be "found" otherwise "not found".
                                       Thnx all.
                                    Rowaid Bin Farooq

It's a text for my Linguistics class, and they go into detail about
frequency(sound) analasis....haven't read through it all so i don't
know exactly what it is, but it's very interesting that they'd use
pascal :D  i feel privilaged in that i may understand it better than
the rest of my class :D

Hi friends,
I'm alive!

--- Nicky <rnmclean@...> wrote:

>    Alive and well, and deep into work alas,
> involving ... Fortran. If Pascal (in whatever
> variant) were to offer complex numbers and array and
> structure manipulation (as in A:=0; just for
> starters) as well as a decent set of functions
> including raising to a power (grr!) plus the ability
> to write "generic" functions, I'd have more chance
> of persuading the boss... Humm... this sounds more
> like a PL/1 offering: it has these features. Ugh.
> People use pl/1, but no-one has spoken of its grace.
> It was only after seeing C and its derivatives that
> I perceived some merit in PL/1.
>    I've had a few goes with the BSD Free Pascal,
> using old TP7 progs, but haven't got much further
> than a trial, especially as the first substantial
> prog. I tried was rejected with some syntax error
> that I didn't feel up to tracking down due to
> pressure of (sigh) work: it compiles with TP7 (this
> is the patched TP7 that does not generate a zero
> divide on cpus faster than about 200Mc) My main hope
> was that the equivalent of the .bgi stuff (a painful
> mess) might function on today's larger screens
> without a lot of tedious rewriting...
>    Aside from some utility progs (tab to comma, etc)
> the largest prog. I've compiled with the FreePascal
> is an arithmetic expression evaluator (with an
> intention of extending to function definition, a
> simple programming language such as might be used in
> chasing zeros of a function, n-digit precision with
> n rather large, sketch plotting,...), and on
> inspecting the code file an astounding amount of
> bumf is seen. The code files are about ten times the
> size of the TP7 code, and it can't all be just to
> handle long file names, can it?
>    I've messed a little with Delphi (an example to
> calculate and graph the path of a body flung from a
> catapault with initial velocity specified, knowing
> that a falling human has a terminal velocity of
> about 120mph), but in the absence of a helpful text,
> its arrangements seem strange.  My objectives seem
> out of step. Multitasking is unclear: handling the
> window state - mouse pokes, etc- in one task,
> processing in another; a simple scheme equivalent to
> Delay(milliseconds) but NOT with a cpu-wasting loop;
> having a user-dialogue selecting a file, remembering
> that at *any* moment in a multi-tasking environment
> a file can vanish: it is *not* good enough to
> identify the file name, then later, possibly much
> later thanks to an interrupt, request an "open" on
> that name. I have indeed years ago (on an IBM1130)
> had an interrupt occur between a test and an action
> consequent on that test despite it being the very
> next op code in my task's sequence. This happened
> when a friend was using the system I had devised, so
> apologies were in order thanks to a microsecond's
> jiggle. Fortunately, no damage was done, merely a
> puzzling pause in his job's hours of execution.
>
>    But most recent posts have seeemed to be
> non-computer stuff, or, someone wanting their
> computer assignment done for them.
>
>
>
>
>


__________________________________________________
Do You Yahoo!?
Tired of spam?  Yahoo! Mail has the best spam protection around
http://mail.yahoo.com

Cheers

abelt2k <abelt2k@...> wrote:  Well any printer has it's programing
language a few years ago i used
to print on a  epson lx300 using the escape codes that are in the
users manual, then i realize  that the same codes work for HP
deskjet even laserjet... there you go...



--- In turbopascalprogramming2@yahoogroups.com, George Melas
<wizyogo@...> wrote:
>
> I have several programs (Borland Turbo Pascal v.7) on Roulette
analysis; lots of graphics, statistics and projections. Found
someone to fix the programs to run under Windows 2000/XP but need to
print using Windows. Any suggestions will be appreciated. There is
also a wish list - to port the programs to say Delphi. Anyone out
there interested? I am based in North London.
>
>
>
> ---------------------------------
> Yahoo! Messenger  NEW - crystal clear PC to PC calling worldwide
with voicemail
>
> [Non-text portions of this message have been removed]
>







---------------------------------
   YAHOO! GROUPS LINKS


     Visit your group "turbopascalprogramming2" on the web.

     To unsubscribe from this group, send an email to:
  turbopascalprogramming2-unsubscribe@yahoogroups.com

     Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.


---------------------------------




Send instant messages to your online friends http://uk.messenger.yahoo.com

[Non-text portions of this message have been removed]

Well any printer has it's programing language a few years ago i used
to print on a  epson lx300 using the escape codes that are in the
users manual, then i realize  that the same codes work for HP
deskjet even laserjet... there you go...



--- In turbopascalprogramming2@yahoogroups.com, George Melas
<wizyogo@...> wrote:
>
> I have several programs (Borland Turbo Pascal v.7) on Roulette
analysis; lots of graphics, statistics and projections. Found
someone to fix the programs to run under Windows 2000/XP but need to
print using Windows. Any suggestions will be appreciated. There is
also a wish list - to port the programs to say Delphi. Anyone out
there interested? I am based in North London.
>
>
>
> ---------------------------------
> Yahoo! Messenger  NEW - crystal clear PC to PC calling worldwide
with voicemail
>
> [Non-text portions of this message have been removed]
>

I have several programs (Borland Turbo Pascal v.7) on Roulette analysis; lots of
graphics, statistics and projections. Found someone to fix the programs to run
under Windows 2000/XP but need to print using Windows. Any suggestions will be
appreciated. There is also a wish list - to port the programs to say Delphi.
Anyone out there interested? I am based in North London.



---------------------------------
Yahoo! Messenger  NEW - crystal clear PC to PC calling worldwide with voicemail

[Non-text portions of this message have been removed]

I still believe that this group has future, i have a lot of source
codes from my creation that i will be glad to share with all of you,
these codes are fully functional and some others have a few troubles,
like runtime error, bad memory administration, etc.

my skills in pascal are between beginnner and expert

Still here! - keep up the good work.

lithium381 <no_reply@yahoogroups.com> wrote:  Please post SOMETHING, just so i
can get a realistic count on how many
of you still frequent the board.   I've been moderating for some time
now, and while membership goes up, i havne't seen as many posts.    If
you have questions, ask them!  If you have code you're troubled by,
post it and we can have a look at it.   Got a cool procedure, lets
have it!   Thanks a lot guys.

Lithium
Moderator






---------------------------------
   YAHOO! GROUPS LINKS


     Visit your group "turbopascalprogramming2" on the web.

     To unsubscribe from this group, send an email to:
  turbopascalprogramming2-unsubscribe@yahoogroups.com

     Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.


---------------------------------





---------------------------------
Yahoo! 360&deg; NEW – Your one place to blog, create, publish & share!

[Non-text portions of this message have been removed]

Neophyte programmer, architect (buildings) during the day.

As the old man said in python's Holy Grail, "Actually, I'm feeling
much better"

I'm here and happy to help.

Marc

SOMETHING. :)
   ----- Original Message -----
   From: lithium381
   To: turbopascalprogramming2@yahoogroups.com
   Sent: Saturday, April 08, 2006 4:21 PM
   Subject: [TurboPascalProgramming] All active members please check in


   Please post SOMETHING, just so i can get a realistic count on how many
   of you still frequent the board.   I've been moderating for some time
   now, and while membership goes up, i havne't seen as many posts.    If
   you have questions, ask them!  If you have code you're troubled by,
   post it and we can have a look at it.   Got a cool procedure, lets
   have it!   Thanks a lot guys.

   Lithium
   Moderator






------------------------------------------------------------------------------
   YAHOO! GROUPS LINKS

     a..  Visit your group "turbopascalprogramming2" on the web.

     b..  To unsubscribe from this group, send an email to:
      turbopascalprogramming2-unsubscribe@yahoogroups.com

     c..  Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.


------------------------------------------------------------------------------



[Non-text portions of this message have been removed]

I also started this with a TP7 prog. Someone had been whimpering in some
discussion group about their being taught only about objects following parabolic
paths, failing to consider air resistance. Being unemployed at the time I wrote
an essay mentioning "divide and conquer", starting simply, blah blah, and how,
when you do consider air resistance it is via numerical methods whose equations
of motion are exactly those of the constant acceleration only analysis
originally complained of.
    Anyway, the prog was simple (as below) and I didn't introduce a wind feature,
in part because I didn't know what sort of "lapse rate" was needed to follow the
change of wind speed with altitude caused by drag along the Earth's surface. A
constant wind is of course easy to involve. As for the "bodies", ahem, I needed
a coefficient for the air resistance factor, and without a reference to hand, I
used a fact I remembered reading somewhere about parachutists. This also added a
certain drama to an otherwise dry issue...
    Later, I wanted to try out graphing with Delphi, and this seemed a simple
example. The "window" features for entering parameters and selecting options
(Euler, 2'nd order Euler, Runge-Kutta, Predictor-Corrector; feet vs. metres,
Cartesian or Polar coordinates for the initial velocity) were less trouble than
messing about with some sort of run parameter string, or clunky question&answer
sequence as with text input, but the graphics were not entirely plasing.
    It was a great relief that there seemed no need for my prog. to redraw its
display (as when a window is closed then reopened) as this seemed to be handled
for me: it would be disasterous to be forced to restart the whole computation so
as to retrace all the lines as such a computatiion could be massive. (I have
another prog. that plots the motion of N bodies under mutual gravitation) I
don't have much patience with this supposed requirement (at least when the
window size is unchanged) as I feel that the operating system should look after
the canvas the prog. is scribbling on. This does seem to be done for me in
Delphi.
    On the other side, I found that the Delphi offering LineTo(x,y) drew dots up
to but *not* including the last at (x,y). This is bearable during a sequence of
lines following a trajectory, but I rather do want to see the end point itself
as well.
    This would be particularly troublesome in converting my "SortShow" prog. that
shows various sorting methods in action, the stuff being sorted being depicted
as lines of length proportional to their key: much thought had gone in to
redrawing only the minimum number of dots as the lines are moved about.
    Thus, most of my fun progs. involve graphics, a vexing business with .bgi,
and as yet unexplored with Delphi and FreePascal.

    I also have not had much to do with the Object-Oriented bandwagon (other than
suffer the consequences of attempts at that via wunduhs, and so forth) as I have
yet to confront a problem for which it offers a boost to dealing with the main
issue. It might seem that the N-body gravitational prog. would surely be a case
for "objects", each having a mass, a size, a colour, a position, a velocity, an
acceleration, and for higher-order methods a collection of past positions and
accelerations and scratchpads. But the dominating issue to be solved is the
speedy treatment of the N-body calculation and storing position, etc. data in
suitable arrays does nicely. Indeed, Pascal's rigid typing and difficulties over
passing array parameters means that Fortran or PL/I offer better features.



Program Fling; Uses DOS, crt;
{Concocted by R.N.McLean (whom God preserve), Victoria university, NZ.}
{Considers the path of a body flung with some initial velocity, given that
  the acceleration of gravity is 32 feet/second**2 and that air resistance
  is proportional to the square of the velocity and for the body is such that
  the terminal velocity is 120 miles/hour or 176 feet/second, straight down.}
  var Ax,Ay,Vx,Vy,x,y,T: real;    {State variables.}
  var A2,A,v2,v,dt,c,g: real;     {Computational assistants.}
  BEGIN
   Writeln('The path of a flung person, in feet...');
   Writeln('So, 30 m.p.h. = 44 feet/second.');
   g:=-32; c:=0.001033;          {Gravitational, air resistance factors.}
   Write('Specify the initial velocity in x and y (eg, 250  200): ');
   Readln(Vx,Vy);
   x:=0;   y:=0;                 {Initial position.}
   T:=0;                         {Start time.}
   Write('Euler''s first-order method is used: what time step (eg, 0.1): ');
   ReadLn(dt);
   Writeln(' Secs,      x,      y,     Vx,     Vy,      V,     Ax,     Ay,     
A');
   while y >= 0 do               {Still in the air?}
    begin                        {Yep.}
     V2:=Vx*Vx + Vy*Vy;          {Ascertain velocity.}
     V:=Sqrt(V2);
     Ax:=0 - c*V2*Vx/V;          {Thence, acceleration.}
     Ay:=g - c*V2*Vy/V;
     A2:=Ax*Ax + Ay*Ay;
     A:=Sqrt(A2);
     Writeln(t:5:1,x:8:0,y:8:0,vx:8:0,vy:8:0,v:8:0,Ax:8:0,Ay:8:0,A:8:0); {State
state.}
     x:=x + (Vx + 0.5*Ax*dt)*dt; {Step to the new position after dt has passed.}
     y:=y + (Vy + 0.5*Ay*dt)*dt;
     Vx:=Vx + Ax*dt;             {Watch order. V changes too.}
     Vy:=Vy + Ay*dt;             {Wasteful recomputation of A*dt}
     T:=T + dt;                  {Unwise series of additions. Use T0 + N*dt.}
    end;
   Write(t:5:1,x:8:0,y:8:0,vx:8:0,vy:8:0);
   WriteLn(' ... Splot ...');
  END.

I wrote a program like that a few years ago, in TP7 though.   I had it
calculate trajectories based on user input, such as angle, initial
velocity and wind(and of course it automatically assumed gravity).   I
never got around to having it graph it though.  and it wasn't a
specific object, such as BODIES....*cough* but it was fun anyways.
I've personally not made the leap to oop programming, but maybe i'll
try lazarus.

>>> I've had a few goes with the BSD Free Pascal, using old TP7 progs,
but haven't got much further than a trial, especially as the first
substantial prog. I tried was rejected with some syntax error that I
didn't feel up to tracking down due to pressure of (sigh) work: it
compiles with TP7 (this is the patched TP7 that does not generate a
zero divide on cpus faster than about 200Mc) My main hope was that the
equivalent of the .bgi stuff (a painful mess) might function on
today's larger screens without a lot of tedious rewriting...

>    I've messed a little with Delphi (an example to calculate and
graph the path of a body flung from a catapault with initial velocity
specified, knowing that a falling human has a terminal velocity of
about 120mph), but in the absence of a helpful text, its arrangements
seem strange.  My objectives seem out of step. Multitasking is
unclear: handling the window state - mouse pokes, etc- in one task,
processing in another; a simple scheme equivalent to
Delay(milliseconds) but NOT with a cpu-wasting loop; having a
user-dialogue selecting a file, remembering that at *any* moment in a
multi-tasking environment a file can vanish: it is *not* good enough
to identify the file name, then later, possibly much later thanks to
an interrupt, request an "open" on that name. I have indeed years ago
(on an IBM1130) had an interrupt occur between a test and an action
consequent on that test despite it being the very next op code in my
task's sequence. This happened when a friend was using the system I
had devised, so apologies were in order thanks to a microsecond's
jiggle. Fortunately, no damage was done, merely a puzzling pause in
his job's hours of execution.
>
>    But most recent posts have seeemed to be non-computer stuff, or,
someone wanting their computer assignment done for them.

everyone has to start somewhere!   i've tried to weed out a lot of the
non-related posts, but i admit i've been slacking latly, lots of work!

Alive and well, and deep into work alas, involving ... Fortran. If Pascal (in
whatever variant) were to offer complex numbers and array and structure
manipulation (as in A:=0; just for starters) as well as a decent set of
functions including raising to a power (grr!) plus the ability to write
"generic" functions, I'd have more chance of persuading the boss... Humm... this
sounds more like a PL/1 offering: it has these features. Ugh. People use pl/1,
but no-one has spoken of its grace. It was only after seeing C and its
derivatives that I perceived some merit in PL/1.
    I've had a few goes with the BSD Free Pascal, using old TP7 progs, but
haven't got much further than a trial, especially as the first substantial prog.
I tried was rejected with some syntax error that I didn't feel up to tracking
down due to pressure of (sigh) work: it compiles with TP7 (this is the patched
TP7 that does not generate a zero divide on cpus faster than about 200Mc) My
main hope was that the equivalent of the .bgi stuff (a painful mess) might
function on today's larger screens without a lot of tedious rewriting...
    Aside from some utility progs (tab to comma, etc) the largest prog. I've
compiled with the FreePascal is an arithmetic expression evaluator (with an
intention of extending to function definition, a simple programming language
such as might be used in chasing zeros of a function, n-digit precision with n
rather large, sketch plotting,...), and on inspecting the code file an
astounding amount of bumf is seen. The code files are about ten times the size
of the TP7 code, and it can't all be just to handle long file names, can it?
    I've messed a little with Delphi (an example to calculate and graph the path
of a body flung from a catapault with initial velocity specified, knowing that a
falling human has a terminal velocity of about 120mph), but in the absence of a
helpful text, its arrangements seem strange.  My objectives seem out of step.
Multitasking is unclear: handling the window state - mouse pokes, etc- in one
task, processing in another; a simple scheme equivalent to Delay(milliseconds)
but NOT with a cpu-wasting loop; having a user-dialogue selecting a file,
remembering that at *any* moment in a multi-tasking environment a file can
vanish: it is *not* good enough to identify the file name, then later, possibly
much later thanks to an interrupt, request an "open" on that name. I have indeed
years ago (on an IBM1130) had an interrupt occur between a test and an action
consequent on that test despite it being the very next op code in my task's
sequence. This happened when a friend was using the system I had devised, so
apologies were in order thanks to a microsecond's jiggle. Fortunately, no damage
was done, merely a puzzling pause in his job's hours of execution.

    But most recent posts have seeemed to be non-computer stuff, or, someone
wanting their computer assignment done for them.