Scratch

sparks · 2010-12-15 16:52:08

I need to let a block set the variable t3 to several lines from a webpage.

One line works like this:

|t3 link|

t3_ self readLine: 5 FromUrl: link

but I am using it to read a file where more than one line of the file needs to be set to t3 so that the smalltalk code sets t3 to:

lines 5 to (number of lines in file at URL, link) of link

Any ideas?

johnnydean1 · 2010-12-15 16:53:22

Do you want line breaks, or a long string?

sparks · 2010-12-15 17:00:01

it's reading block code stored online, I don't think that block code NEEDS line breaks, so I think one line will do.

johnnydean1 · 2010-12-15 17:12:48

I can do it tommrow, not now sorry.

bbbeb · 2010-12-15 17:15:46

sparks wrote:
I need to let a block set the variable t3 to several lines from a webpage.

One line works like this:

|t3 link|

t3_ self readLine: 5 FromUrl: link

but I am using it to read a file where more than one line of the file needs to be set to t3 so that the smalltalk code sets t3 to:

lines 5 to (number of lines in file at URL, link) of link

Any ideas?

|t3 t4 time totalTime link|
time = totalTime ifFalse:
[t3_ self readLine: 5 FromUrl: link.
t4_ t3 , t4.]
ifTrue:
[^ t4].

sparks · 2010-12-15 17:28:45

bbbeb wrote:
sparks wrote:
I need to let a block set the variable t3 to several lines from a webpage.

One line works like this:

|t3 link|

t3_ self readLine: 5 FromUrl: link

but I am using it to read a file where more than one line of the file needs to be set to t3 so that the smalltalk code sets t3 to:

lines 5 to (number of lines in file at URL, link) of link

Any ideas?
|t3 t4 time totalTime link|
time = totalTime ifFalse:
[t3_ self readLine: 5 FromUrl: link.
t4_ t3 , t4.]
ifTrue:
[^ t4].

How do I set t3 to that?

johnnydean1 · 2010-12-15 17:30:13

sparks wrote:
bbbeb wrote:
sparks wrote:
I need to let a block set the variable t3 to several lines from a webpage.

One line works like this:

|t3 link|

t3_ self readLine: 5 FromUrl: link

but I am using it to read a file where more than one line of the file needs to be set to t3 so that the smalltalk code sets t3 to:

lines 5 to (number of lines in file at URL, link) of link

Any ideas?
|t3 t4 time totalTime link|
time = totalTime ifFalse:
[t3_ self readLine: 5 FromUrl: link.
t4_ t3 , t4.]
ifTrue:
[^ t4].
How do I set t3 to that?

|t3 t4 t5 time totalTime link|
t5_ ''.
time = totalTime ifFalse:
[t3_ self readLine: 5 FromUrl: link.
t4_ t3 , t4.]
ifTrue:
[t5_t4].

t3_ t5.

sparks · 2010-12-15 17:35:28

isn't that reading line 5 over and over again?

johnnydean1 · 2010-12-15 17:36:59

I dunno, wasn't my code XD

bbbeb · 2010-12-15 23:14:07

bbbeb wrote:
sparks wrote:
I need to let a block set the variable t3 to several lines from a webpage.

One line works like this:

|t3 link|

t3_ self readLine: 5 FromUrl: link

but I am using it to read a file where more than one line of the file needs to be set to t3 so that the smalltalk code sets t3 to:

lines 5 to (number of lines in file at URL, link) of link

Any ideas?
|t3 t4 time totalTime link lineNum|
time = totalTime ifFalse:
[t3_ self readLine: lineNum FromUrl: link.
t4_ t3 , t4.]
ifTrue:
[t3_ t4].
^ t3.

There. I fixed it. I was in a rush.

Last edited by bbbeb (2010-12-15 23:14:53)

LS97 · 2010-12-16 14:49:42

Here's a quicky fixy smile

Code:

| t3 link lns res curr |

t3 _ self readLine: 5 FromUrl: link.

lns _ t3 lines size.
res _ t3 lines at: 5.
curr _ 5.
lns - 5 timesRepeat:
[curr _ crr +1.
res _ '
' , t3 lines at: curr].

^ res

there's definitely a much easier way to do this, but i've been working too much with VB recently and forgot half of my Squeak tongue

sparks · 2010-12-16 14:59:59

Why is this block returning an error?

$String$ as one line

|t3 t4 time totalTime lineNum|
totalTime_ t1 asString lines size.
time_ 1.
time = totalTime ifFalse:
[
lineNum_time.
t3_ t1 asString lines at: lineNum.
t4_ t4 , ' ', t3.
time_ time + 1.]
ifTrue:
[^t4.].

??

(bring a string of more than one line and puts all the strings on one line with a space seperating each former line.)

Last edited by sparks (2010-12-16 15:02:36)

johnnydean1 · 2010-12-16 15:13:21

sparks wrote:
$String$ as one line

|t3 t4 time totalTime lineNum|
totalTime_ t1 lines size.
time_ 1.
time = totalTime
ifFalse:
[
lineNum_time.
t3_ t1 asString lines at: lineNum.
t4_ t4 , ' ', t3.
time_ time + 1.]
ifTrue:
[^t4.].

sparks · 2010-12-16 15:22:32

dw, I edited your "compile $List$ with $String$ as breaker" and change it to "turn $String$ into one line with $String$ as breaker"!

Thanks!

johnnydean1 · 2010-12-16 16:07:29

ok

Scratch

archived forums

#1 2010-12-15 16:52:08

smalltalk coder needed for a question!

#2 2010-12-15 16:53:22

Re: smalltalk coder needed for a question!

#3 2010-12-15 17:00:01

Re: smalltalk coder needed for a question!

#4 2010-12-15 17:12:48

Re: smalltalk coder needed for a question!

#5 2010-12-15 17:15:46

Re: smalltalk coder needed for a question!

sparks wrote:

#6 2010-12-15 17:28:45

Re: smalltalk coder needed for a question!

bbbeb wrote:

sparks wrote:

#7 2010-12-15 17:30:13

Re: smalltalk coder needed for a question!

sparks wrote:

bbbeb wrote:

sparks wrote:

#8 2010-12-15 17:35:28

Re: smalltalk coder needed for a question!

#9 2010-12-15 17:36:59

Re: smalltalk coder needed for a question!

#10 2010-12-15 23:14:07

Re: smalltalk coder needed for a question!

bbbeb wrote:

sparks wrote:

#11 2010-12-16 14:49:42

Re: smalltalk coder needed for a question!

Code:

#12 2010-12-16 14:59:59

Re: smalltalk coder needed for a question!

#13 2010-12-16 15:13:21

Re: smalltalk coder needed for a question!

sparks wrote:

#14 2010-12-16 15:22:32

Re: smalltalk coder needed for a question!

#15 2010-12-16 16:07:29

Re: smalltalk coder needed for a question!

Board footer