Post by Tomaaz on Dec 26, 2020 12:41:03 GMT -6
I need an array like this:
Is there an easy way to do it? You can't declare it like that. There is also no DATA/READ option in RCbasic. I managed to do it by converting a string to array, but I'm not sure if that was necessary.
Also, Redim statement seems to be supported, but there is nothing about it in the documentation or the Geany configuration file.
[60, 118, 254, 56, 117, 255, 52, 120, 255, 50, 120, 254, 51, 121, 255, 49, 121, 255, 50, 124, 255, 48, 125, 255, 49, 127, 253, 49, 126, 254, 47, 131, 255, 48, 132, 255, 48, 134, 255, 45, 135, 255, 44, 137, 255, 44, 141, 254, 46, 142, 255, 44, 144, 255, 44, 146, 255, 46, 146, 255, 42, 151, 255, 41, 153, 255, 42, 155, 255, 39, 155, 254, 41, 158, 254, 40, 160, 255, 38, 163, 255, 36, 164, 253, 37, 167, 251, 36, 167, 255, 38, 168, 254, 38, 170, 253, 36, 173, 253, 33, 174, 254, 35, 174, 255, 35, 176, 255, 33, 176, 254, 35, 176, 255, 32, 178, 255, 34, 180, 255, 33, 181, 253, 30, 182, 255, 29, 186, 255, 30, 187, 254, 27, 189, 254, 28, 190, 254, 28, 191, 255, 24, 194, 255, 25, 195, 254, 28, 199, 255, 20, 199, 255, 21, 201, 254, 19, 206, 255, 21, 206, 252, 20, 206, 253, 17, 209, 254, 16, 212, 254, 12, 213, 255, 5, 217, 255, 11, 217, 254, 4, 221, 255, 2, 221, 253, 4, 223, 255, 4, 224, 255, 4, 225, 254, 1, 224, 255, 0, 228, 255, 0, 230, 255, 0, 229, 253, 6, 227, 253, 8, 230, 253, 15, 227, 249, 15, 228, 246, 27, 228, 246, 29, 226, 242, 30, 226, 238, 33, 227, 236, 37, 224, 231, 43, 225, 228, 45, 224, 228, 46, 224, 226, 53, 223, 220, 56, 223, 216, 58, 222, 213, 60, 222, 207, 65, 221, 207, 67, 220, 200, 68, 220, 197, 74, 218, 193, 73, 218, 189, 77, 218, 186, 79, 217, 184, 80, 218, 184, 81, 215, 178, 86, 215, 176, 86, 215, 174, 88, 215, 170, 93, 214, 169, 89, 215, 168, 92, 214, 165, 91, 215, 163, 93, 215, 164, 96, 215, 159, 97, 215, 155, 99, 213, 154, 99, 213, 151, 102, 213, 147, 103, 212, 145, 101, 212, 136, 110, 210, 140, 110, 211, 135, 111, 210, 130, 115, 208, 127, 115, 209, 121, 118, 208, 118, 120, 207, 113, 124, 209, 108, 125, 207, 107, 128, 205, 103, 128, 206, 96, 129, 206, 92, 129, 207, 88, 135, 206, 86, 135, 204, 79, 134, 205, 77, 138, 204, 72, 138, 204, 72, 140, 203, 70, 141, 202, 65, 141, 204, 63, 143, 202, 60, 145, 202, 63, 148, 202, 64, 147, 201, 63, 149, 201, 64, 148, 201, 61, 150, 201, 60, 153, 202, 61, 155, 202, 64, 159, 200, 62, 159, 201, 63, 164, 200, 66, 164, 200, 64, 166, 200, 64, 168, 200, 67, 171, 199, 63, 172, 198, 63, 177, 201, 65, 178, 199, 62, 180, 198, 64, 180, 198, 62, 184, 197, 65, 186, 198, 64, 187, 197, 64, 189, 196, 64, 190, 196, 64, 194, 195, 65, 195, 197, 64, 194, 196, 61, 196, 196, 62, 199, 196, 65, 202, 195, 65, 199, 194, 66, 204, 196, 63, 203, 196, 64, 203, 194, 63, 204, 195, 64, 208, 195, 65, 209, 194, 65, 209, 194, 67, 213, 194, 63, 212, 193, 65, 215, 194, 66, 218, 193, 66, 219, 192, 63, 221, 192, 64, 223, 192, 65, 226, 192, 66, 227, 192, 64, 230, 192, 65, 232, 191, 65, 236, 191, 66, 236, 191, 66, 237, 192, 65, 236, 191, 64, 241, 190, 65, 245, 189, 66, 245, 190, 64, 248, 190, 65, 249, 189, 65, 250, 188, 65, 252, 191, 66, 253, 189, 65, 253, 189, 65, 255, 187, 64, 253, 189, 65, 255, 186, 64, 254, 184, 63, 255, 182, 67, 255, 181, 65, 255, 178, 62, 255, 176, 65, 255, 173, 63, 255, 171, 64, 255, 169, 64, 254, 165, 61, 255, 163, 62, 255, 161, 63, 253, 159, 63, 255, 155, 61, 255, 152, 59, 255, 148, 58, 255, 145, 60, 255, 144, 62, 255, 141, 60, 254, 137, 58, 255, 134, 59, 254, 132, 57, 254, 130, 58, 255, 128, 57, 255, 125, 60, 255, 125, 57, 255, 123, 56, 255, 122, 59, 255, 122, 57, 255, 117, 56, 255, 116, 57, 255, 114, 58, 255, 112, 54, 254, 109, 54, 254, 107, 55, 255, 103, 54, 255, 101, 55, 255, 98, 55, 254, 95, 55, 255, 91, 53, 254, 88, 50, 255, 86, 55, 254, 84, 51, 255, 80, 51, 254, 79, 52, 254, 72, 51, 253, 71, 50, 255, 68, 49, 255, 66, 52, 255, 62, 53, 254, 60, 51, 255, 59, 51, 255, 56, 49, 255, 54, 48, 255, 53, 49, 255, 52, 48, 255, 52, 48, 255, 52, 48, 255, 52, 48, 255, 52, 48, 255, 52, 48]
Is there an easy way to do it? You can't declare it like that. There is also no DATA/READ option in RCbasic. I managed to do it by converting a string to array, but I'm not sure if that was necessary.
insarray_string$ = "60, 118, 254, 56, 117, 255, 52, 120, 255, 50, 120, 254, 51, 121, 255, 49, 121, 255, 50, 124, 255, 48, 125, 255, 49, 127, 253, 49, 126, 254, 47, 131, 255, 48, 132, 255, 48, 134, 255, 45, 135, 255, 44, 137, 255, 44, 141, 254, 46, 142, 255, 44, 144, 255, 44, 146, 255, 46, 146, 255, 42, 151, 255, 41, 153, 255, 42, 155, 255, 39, 155, 254, 41, 158, 254, 40, 160, 255, 38, 163, 255, 36, 164, 253, 37, 167, 251, 36, 167, 255, 38, 168, 254, 38, 170, 253, 36, 173, 253, 33, 174, 254, 35, 174, 255, 35, 176, 255, 33, 176, 254, 35, 176, 255, 32, 178, 255, 34, 180, 255, 33, 181, 253, 30, 182, 255, 29, 186, 255, 30, 187, 254, 27, 189, 254, 28, 190, 254, 28, 191, 255, 24, 194, 255, 25, 195, 254, 28, 199, 255, 20, 199, 255, 21, 201, 254, 19, 206, 255, 21, 206, 252, 20, 206, 253, 17, 209, 254, 16, 212, 254, 12, 213, 255, 5, 217, 255, 11, 217, 254, 4, 221, 255, 2, 221, 253, 4, 223, 255, 4, 224, 255, 4, 225, 254, 1, 224, 255, 0, 228, 255, 0, 230, 255, 0, 229, 253, 6, 227, 253, 8, 230, 253, 15, 227, 249, 15, 228, 246, 27, 228, 246, 29, 226, 242, 30, 226, 238, 33, 227, 236, 37, 224, 231, 43, 225, 228, 45, 224, 228, 46, 224, 226, 53, 223, 220, 56, 223, 216, 58, 222, 213, 60, 222, 207, 65, 221, 207, 67, 220, 200, 68, 220, 197, 74, 218, 193, 73, 218, 189, 77, 218, 186, 79, 217, 184, 80, 218, 184, 81, 215, 178, 86, 215, 176, 86, 215, 174, 88, 215, 170, 93, 214, 169, 89, 215, 168, 92, 214, 165, 91, 215, 163, 93, 215, 164, 96, 215, 159, 97, 215, 155, 99, 213, 154, 99, 213, 151, 102, 213, 147, 103, 212, 145, 101, 212, 136, 110, 210, 140, 110, 211, 135, 111, 210, 130, 115, 208, 127, 115, 209, 121, 118, 208, 118, 120, 207, 113, 124, 209, 108, 125, 207, 107, 128, 205, 103, 128, 206, 96, 129, 206, 92, 129, 207, 88, 135, 206, 86, 135, 204, 79, 134, 205, 77, 138, 204, 72, 138, 204, 72, 140, 203, 70, 141, 202, 65, 141, 204, 63, 143, 202, 60, 145, 202, 63, 148, 202, 64, 147, 201, 63, 149, 201, 64, 148, 201, 61, 150, 201, 60, 153, 202, 61, 155, 202, 64, 159, 200, 62, 159, 201, 63, 164, 200, 66, 164, 200, 64, 166, 200, 64, 168, 200, 67, 171, 199, 63, 172, 198, 63, 177, 201, 65, 178, 199, 62, 180, 198, 64, 180, 198, 62, 184, 197, 65, 186, 198, 64, 187, 197, 64, 189, 196, 64, 190, 196, 64, 194, 195, 65, 195, 197, 64, 194, 196, 61, 196, 196, 62, 199, 196, 65, 202, 195, 65, 199, 194, 66, 204, 196, 63, 203, 196, 64, 203, 194, 63, 204, 195, 64, 208, 195, 65, 209, 194, 65, 209, 194, 67, 213, 194, 63, 212, 193, 65, 215, 194, 66, 218, 193, 66, 219, 192, 63, 221, 192, 64, 223, 192, 65, 226, 192, 66, 227, 192, 64, 230, 192, 65, 232, 191, 65, 236, 191, 66, 236, 191, 66, 237, 192, 65, 236, 191, 64, 241, 190, 65, 245, 189, 66, 245, 190, 64, 248, 190, 65, 249, 189, 65, 250, 188, 65, 252, 191, 66, 253, 189, 65, 253, 189, 65, 255, 187, 64, 253, 189, 65, 255, 186, 64, 254, 184, 63, 255, 182, 67, 255, 181, 65, 255, 178, 62, 255, 176, 65, 255, 173, 63, 255, 171, 64, 255, 169, 64, 254, 165, 61, 255, 163, 62, 255, 161, 63, 253, 159, 63, 255, 155, 61, 255, 152, 59, 255, 148, 58, 255, 145, 60, 255, 144, 62, 255, 141, 60, 254, 137, 58, 255, 134, 59, 254, 132, 57, 254, 130, 58, 255, 128, 57, 255, 125, 60, 255, 125, 57, 255, 123, 56, 255, 122, 59, 255, 122, 57, 255, 117, 56, 255, 116, 57, 255, 114, 58, 255, 112, 54, 254, 109, 54, 254, 107, 55, 255, 103, 54, 255, 101, 55, 255, 98, 55, 254, 95, 55, 255, 91, 53, 254, 88, 50, 255, 86, 55, 254, 84, 51, 255, 80, 51, 254, 79, 52, 254, 72, 51, 253, 71, 50, 255, 68, 49, 255, 66, 52, 255, 62, 53, 254, 60, 51, 255, 59, 51, 255, 56, 49, 255, 54, 48, 255, 53, 49, 255, 52, 48, 255, 52, 48, 255, 52, 48, 255, 52, 48, 255, 52, 48, 255, 52, 48,"
dim array_numbers[len(array_string$)]
x = 0
while instr(array_string$, ",") > -1
array_numbers[x] = val(trim$(left$(array_string$, instr(array_string$, ","))))
array_string$ = right$(array_string$, len(array_string$) - instr(array_string$, ",") - 1)
x = x + 1
wend
redim array_numbers[x]
for x = 0 to arraysize(array_numbers, 1) - 1
print array_numbers[x]; " ";
next
ert code here
Also, Redim statement seems to be supported, but there is nothing about it in the documentation or the Geany configuration file.