pig latin..please help..

[[e-mail]]

Hey!!..i'm working on a pig latin program for qbasic and i'm running into some problems. I already made a function that turns words into qbasic, but you have to enter the words one at a time..i was wondering if any of you knew how to change a whole sentence into pig latin..i know that you have to count the spaces and mabye do a for next loop, but it isnt working for me..if any of you get a chance, could you please help me out..i would owe you so much..thanks so much!!  

[brisray]

All you need do is look for the spaces in a sentence and split out the various words. Here's one way of doing it. It comes from a program I wrote for something else a while ago.

The array, StrArray, holds the words.

'Parse          Ray Thomas      February 2002

OPTION BASE 1

DIM LongStr AS STRING           'Your string
DIM StrArray(10) AS STRING      'Array to hold split text
DIM Num AS INTEGER              'Holds the space position
DIM OldNum AS INTEGER           'Holds the old space position
DIM StrLen AS INTEGER           'The number of characters between spaces
DIM Count AS INTEGER            'General counter

Num = 0
OldNum = 1
Count = 1
LongStr$ = "My name is Ray and I wrote this"

CLS

DO
       Num = INSTR(Num + 1, LongStr$, " ")
       StrLen = Num - OldNum
       IF Num > 0 THEN
               StrArray$(Count) = MID$(LongStr$, OldNum, StrLen)
       ELSE
               StrArray$(Count) = MID$(LongStr, OldNum)
       END IF
       Count = Count + 1
       OldNum = Num + 1
LOOP UNTIL Num = 0

After you run this code you can get to the various words by using

FOR Count = 1 TO UBOUND(StrArray$)
    IF StrArray$(Count) = "" THEN EXIT FOR
    WordStr$ = StrArray$(Count)
  .... Do what you want to the words here ....
NEXT Count

Ray

[3aplus63rew]

<b><a href=https://3aplus63.ru/product-category/trubogiby-gidravlicheskie-vertikalnye/>трубогибы гидравлические вертикальные</a></b>

Созданная нами предприятие Новочеркасск - сегодня это ведущий поставщик
промышленного оборудования.
Можно купить в Каменск-Уральскийнемало решений для такелажного и подъемного, промышленного и складского, а также весового и гидравлического промышленного оборудования, в том числе тали ручные рычажные,тали ручные червячные передвижные взрывобезопасные,домкраты гидравлические телескопические,канаты для лебедок mtm,балки концевые подвесные,тележки гидравлические с электропередвижением,тележки для балок подвесных концевых холостые,весы крановые электронные.
Мы являемся производителем непростых решений для индустриального парка оборудования.
Мы высококлассная организация по выпуску промышленного оснащения с более чем 6-летним навыком работы.
Интернет магазин грузоподъемного парка оборудования выходит за пределы интернет-реализации и товаров по дисконтной цене, наша фирма может оказать консультации и дополнительно предоставить специализированные услуги на заказ.
На вебсайте мы стремимся предоставить нашим клиентам "универсальный он-лайн магазин" в пользу всех ваших надобностей в промышленном и складском оборудование. Мы стремимся предоставить особо высококонкурентные стоимость товаров в индустрии, оптимизируя при этом превосходнейшее обслуживание покупателей.

[labedroomBam]

<b><a href=https://labedroom.com/>Bedroom ideas</a></b>
Come in outstanding store in Jefferson Park production for office and home use and cafe! presents over 12000 appointment furniture and goods for a country house and apartments or restaurant. Natural rattan , are used for the purposes of production our branded products , possesses strength and wear resistance, wonderful external data. All furniture processed special compounds, due to which their surface does not absorb water, stable to extremes ambient temperature air and exposure of the sun. Vya our furniture excellent retains its functions even in restaurant in open spaces . In the presented online catalog you offered photos furniture for dining room, hall, bedroom, children's room , as well as intended for organization of storage area - dressers and cabinets, cabinets and others . In our store in Fairfax you can buy everything for any your home not expensive . We invite client come to store , holding in Westwood what cares about its shopper.