tham
New Member
Posts: 2
|
Post by tham on Mar 26, 2023 16:44:47 GMT
i'm try coding but result output is more out of screen output.
how add side scroller for see result.
on screen normal output.
thank you.
|
|
|
|
Post by bplus on Mar 26, 2023 18:16:16 GMT
You can scroll only in Console screen, but you can not do other normal things like in graphics screens. Otherwise you'd have to make your own scroller or maybe someone has some code?
|
|
tham
New Member
Posts: 2
|
Post by tham on Apr 2, 2023 12:42:17 GMT
thank you. i'm try to begin for loop display all cross for sum.
$Console
_Dest _Console 'show in scroller
Dim s(4) As String
s(1) = "a": s(2) = "b": s(3) = "c": s(4) = "d":
count = 0
For i = 1 To 6
For j = 1 To 6
For k = 1 To 6
For l = 1 To 6
For m = 1 To 6
For n = 1 To 6
Print "sum = "; "i("; i; ")+j("; j; ")+k("; k; ")+l("; l; ")+m("; m; ")+n("; n; ") = "; i + j + k + l + m + n
count = count + 1
Print "count = "; count;
Next n
Next m
Next l
Next k
Next j
Next i
End
'result 3*3*3 = 27 value
'result 3*3*3*3*3*3 = 729 value
'result 6*6*6*6*6*6 = 46,656 value
|
|
|
|
Post by bplus on Apr 2, 2023 12:57:31 GMT
2^6 = 64 This is mainly just a demo of $Console:Only $Console:Only
Dim s(4) As String
s(1) = "a": s(2) = "b": s(3) = "c": s(4) = "d":
count = 0
For i = 0 To 1
For j = 0 To 1
For k = 0 To 1
For l = 0 To 1
For m = 0 To 1
For n = 0 To 1
Print "sum = "; "i("; i; ")+j("; j; ")+k("; k; ")+l("; l; ")+m("; m; ")+n("; n; ") = "; i + j + k + l + m + n
count = count + 1
Print "count = "; count;
Next n
Next m
Next l
Next k
Next j
Next i
EndHaven't a clue where you, tham, where you were going with this: s(1) = "a": s(2) = "b": s(3) = "c": s(4) = "d": |
|
