All pastes #882912 Raw Edit

Miscellany

public text v1 · immutable
#882912 ·published 2008-01-30 04:13 UTC
rendered paste body
menu channel,status,query {
  -
  vFA-XXX-AT Setup:dialog -m vfa-xxx-at vfa-xxx-at
}

dialog vfa-xxx-at {
  title "vFA-XXX-AT"
  size -1 -1 392 335
  option dbu

  button "Ok", 1, 305 315 40 15, default ok
  button "Cancel", 2, 346 315 40 15, cancel

  tab "Sites", 3, 5 5 382 305
  tab "More Sites", 4
  tab "Groups", 5

  text "xcel/iND", 1337, 1 328 20 9

  box "", 10, 10 20 120 140, tab 3
  text "Name:", 11, 15 29 20 10, tab 3
  edit "", 12, 50 28 60 9, tab 3
  text "Channel:", 13, 15 39 25 10, tab 3
  edit "", 14, 50 38 60 9, tab 3
  text "Bot:", 15, 15 49 20 10, tab 3
  edit "", 16, 50 48 60 9, tab 3
  text "Tokens:", 17, 15 60 20 10, tab 3
  text "First:", 18, 15 70 20 10, tab 3
  edit "", 19, 30 69 15 9, tab 3
  text "Section:", 20, 47 70 20 10, tab 3
  edit "", 21, 69 69 15 9, tab 3
  text "Release:", 22, 86 70 20 10, tab 3
  edit "", 23, 109 69 15 9, tab 3
  text "Groups:", 24, 15 95 25 10, tab 3
  check "", 25, 15 105 55 9, 3state tab 3
  check "", 26, 72 105 55 9, 3state tab 3
  check "", 27, 15 113 55 9, 3state tab 3
  check "", 28, 72 113 55 9, 3state tab 3
  check "", 29, 15 121 55 9, 3state tab 3
  check "", 30, 72 121 55 9, 3state tab 3
  check "", 31, 15 129 55 9, 3state tab 3
  check "", 32, 72 129 55 9, 3state tab 3
  check "", 33, 15 137 55 9, 3state tab 3
  check "", 34, 72 137 55 9, 3state tab 3
  check "", 35, 15 145 55 9, 3state tab 3
  check "", 36, 72 145 55 9, 3state tab 3

  box "", 40, 135 20 120 140, tab 3
  text "Name:", 41, 140 29 20 10, tab 3
  edit "", 42, 175 28 60 9, tab 3
  text "Channel:", 43, 140 39 25 10, tab 3
  edit "", 44, 175 38 60 9, tab 3
  text "Bot:", 45, 140 49 20 10, tab 3
  edit "", 46, 175 48 60 9, tab 3
  text "Tokens:", 47, 140 60 20 10, tab 3
  text "First:", 48, 140 70 20 10, tab 3
  edit "", 49, 155 69 15 9, tab 3
  text "Section:", 50, 172 70 20 10, tab 3
  edit "", 51, 194 69 15 9, tab 3
  text "Release:", 52, 211 70 20 10, tab 3
  edit "", 53, 234 69 15 9, tab 3
  text "Groups:", 54, 140 95 25 10, tab 3
  check "", 55, 140 105 55 9, 3state tab 3
  check "", 56, 198 105 55 9, 3state tab 3
  check "", 57, 140 113 55 9, 3state tab 3
  check "", 58, 198 113 55 9, 3state tab 3
  check "", 59, 140 121 55 9, 3state tab 3
  check "", 60, 198 121 55 9, 3state tab 3
  check "", 61, 140 129 55 9, 3state tab 3
  check "", 62, 198 129 55 9, 3state tab 3
  check "", 63, 140 137 55 9, 3state tab 3
  check "", 64, 198 137 55 9, 3state tab 3
  check "", 65, 140 145 55 9, 3state tab 3
  check "", 66, 198 145 55 9, 3state tab 3

  box "", 70, 260 20 120 140, tab 3
  text "Name:", 71, 265 29 20 10, tab 3
  edit "", 72, 300 28 60 9, tab 3
  text "Channel:", 73, 265 39 25 10, tab 3
  edit "", 74, 300 38 60 9, tab 3
  text "Bot:", 75, 265 49 20 10, tab 3
  edit "", 76, 300 48 60 9, tab 3
  text "Tokens:", 77, 265 60 20 10, tab 3
  text "First:", 78, 265 70 20 10, tab 3
  edit "", 79, 280 69 15 9, tab 3
  text "Section:", 80, 297 70 20 10, tab 3
  edit "", 81, 319 69 15 9, tab 3
  text "Release:", 82, 336 70 20 10, tab 3
  edit "", 83, 359 69 15 9, tab 3
  text "Groups:", 84, 265 95 25 10, tab 3
  check "", 85, 265 105 55 9, 3state tab 3
  check "", 86, 323 105 55 9, 3state tab 3
  check "", 87, 265 113 55 9, 3state tab 3
  check "", 88, 323 113 55 9, 3state tab 3
  check "", 89, 265 121 55 9, 3state tab 3
  check "", 90, 323 121 55 9, 3state tab 3
  check "", 91, 265 129 55 9, 3state tab 3
  check "", 92, 323 129 55 9, 3state tab 3
  check "", 93, 265 137 55 9, 3state tab 3
  check "", 94, 323 137 55 9, 3state tab 3
  check "", 95, 265 145 55 9, 3state tab 3
  check "", 96, 323 145 55 9, 3state tab 3

  box "", 100, 10 165 120 140, tab 3
  text "Name:", 101, 15 174 20 10, tab 3
  edit "", 102, 50 173 60 9, tab 3
  text "Channel:", 103, 15 184 25 10, tab 3
  edit "", 104, 50 183 60 9, tab 3
  text "Bot:", 105, 15 194 20 10, tab 3
  edit "", 106, 50 193 60 9, tab 3
  text "Tokens:", 107, 15 205 20 10, tab 3
  text "First:", 108, 15 215 20 10, tab 3
  edit "", 109, 30 214 15 9, tab 3
  text "Section:", 110, 47 215 20 10, tab 3
  edit "", 111, 69 214 15 9, tab 3
  text "Release:", 112, 86 215 20 10, tab 3
  edit "", 113, 109 214 15 9, tab 3
  text "Groups:", 114, 15 240 25 10, tab 3
  check "", 115, 15 250 55 9, 3state tab 3
  check "", 116, 72 250 55 9, 3state tab 3
  check "", 117, 15 258 55 9, 3state tab 3
  check "", 118, 72 258 55 9, 3state tab 3
  check "", 119, 15 266 55 9, 3state tab 3
  check "", 120, 72 266 55 9, 3state tab 3
  check "", 121, 15 274 55 9, 3state tab 3
  check "", 122, 72 274 55 9, 3state tab 3
  check "", 123, 15 282 55 9, 3state tab 3
  check "", 124, 72 282 55 9, 3state tab 3
  check "", 125, 15 290 55 9, 3state tab 3
  check "", 126, 72 290 55 9, 3state tab 3

  box "", 130, 135 165 120 140, tab 3
  text "Name:", 131, 140 174 20 10, tab 3
  edit "", 132, 175 173 60 9, tab 3
  text "Channel:", 133, 140 184 25 10, tab 3
  edit "", 134, 175 183 60 9, tab 3
  text "Bot:", 135, 140 194 20 10, tab 3
  edit "", 136, 175 193 60 9, tab 3
  text "Tokens:", 137, 140 205 20 10, tab 3
  text "First:", 138, 140 215 20 10, tab 3
  edit "", 139, 155 214 15 9, tab 3
  text "Section:", 140, 172 215 20 10, tab 3
  edit "", 141, 194 214 15 9, tab 3
  text "Release:", 142, 211 215 20 10, tab 3
  edit "", 143, 234 214 15 9, tab 3
  text "Groups:", 144, 140 240 25 10, tab 3
  check "", 145, 140 250 55 9, 3state tab 3
  check "", 146, 198 250 55 9, 3state tab 3
  check "", 147, 140 258 55 9, 3state tab 3
  check "", 148, 198 258 55 9, 3state tab 3
  check "", 149, 140 266 55 9, 3state tab 3
  check "", 150, 198 266 55 9, 3state tab 3
  check "", 151, 140 274 55 9, 3state tab 3
  check "", 152, 198 274 55 9, 3state tab 3
  check "", 153, 140 282 55 9, 3state tab 3
  check "", 154, 198 282 55 9, 3state tab 3
  check "", 155, 140 290 55 9, 3state tab 3
  check "", 156, 198 290 55 9, 3state tab 3

  box "", 160, 260 165 120 140, tab 3
  text "Name:", 161, 265 174 20 10, tab 3
  edit "", 162, 300 173 60 9, tab 3
  text "Channel:", 163, 265 184 25 10, tab 3
  edit "", 164, 300 183 60 9, tab 3
  text "Bot:", 165, 265 194 20 10, tab 3
  edit "", 166, 300 193 60 9, tab 3
  text "Tokens:", 167, 265 205 20 10, tab 3
  text "First:", 168, 265 215 20 10, tab 3
  edit "", 169, 280 214 15 9, tab 3
  text "Section:", 170, 297 215 20 10, tab 3
  edit "", 171, 319 214 15 9, tab 3
  text "Release:", 172, 336 215 20 10, tab 3
  edit "", 173, 359 214 15 9, tab 3
  text "Groups:", 174, 265 240 25 10, tab 3
  check "", 175, 265 250 55 9, 3state tab 3
  check "", 176, 323 250 55 9, 3state tab 3
  check "", 177, 265 258 55 9, 3state tab 3
  check "", 178, 323 258 55 9, 3state tab 3
  check "", 179, 265 266 55 9, 3state tab 3
  check "", 180, 323 266 55 9, 3state tab 3
  check "", 181, 265 274 55 9, 3state tab 3
  check "", 182, 323 274 55 9, 3state tab 3
  check "", 183, 265 282 55 9, 3state tab 3
  check "", 184, 323 282 55 9, 3state tab 3
  check "", 185, 265 290 55 9, 3state tab 3
  check "", 186, 323 290 55 9, 3state tab 3

  box "", 190, 10 20 120 140, tab 4
  text "Name:", 191, 15 29 20 10, tab 4
  edit "", 192, 50 28 60 9, tab 4
  text "Channel:", 193, 15 39 25 10, tab 4
  edit "", 194, 50 38 60 9, tab 4
  text "Bot:", 195, 15 49 20 10, tab 4
  edit "", 196, 50 48 60 9, tab 4
  text "Tokens:", 197, 15 60 20 10, tab 4
  text "First:", 198, 15 70 20 10, tab 4
  edit "", 199, 30 69 15 9, tab 4
  text "Section:", 200, 47 70 20 10, tab 4
  edit "", 201, 69 69 15 9, tab 4
  text "Release:", 202, 86 70 20 10, tab 4
  edit "", 203, 109 69 15 9, tab 4
  text "Groups:", 204, 15 95 25 10, tab 4
  check "", 205, 15 105 55 9, 3state tab 4
  check "", 206, 72 105 55 9, 3state tab 4
  check "", 207, 15 113 55 9, 3state tab 4
  check "", 208, 72 113 55 9, 3state tab 4
  check "", 209, 15 121 55 9, 3state tab 4
  check "", 210, 72 121 55 9, 3state tab 4
  check "", 211, 15 129 55 9, 3state tab 4
  check "", 212, 72 129 55 9, 3state tab 4
  check "", 213, 15 137 55 9, 3state tab 4
  check "", 214, 72 137 55 9, 3state tab 4
  check "", 215, 15 145 55 9, 3state tab 4
  check "", 216, 72 145 55 9, 3state tab 4

  box "", 220, 135 20 120 140, tab 4
  text "Name:", 221, 140 29 20 10, tab 4
  edit "", 222, 175 28 60 9, tab 4
  text "Channel:", 223, 140 39 25 10, tab 4
  edit "", 224, 175 38 60 9, tab 4
  text "Bot:", 225, 140 49 20 10, tab 4
  edit "", 226, 175 48 60 9, tab 4
  text "Tokens:", 227, 140 60 20 10, tab 4
  text "First:", 228, 140 70 20 10, tab 4
  edit "", 229, 155 69 15 9, tab 4
  text "Section:", 230, 172 70 20 10, tab 4
  edit "", 231, 194 69 15 9, tab 4
  text "Release:", 232, 211 70 20 10, tab 4
  edit "", 233, 234 69 15 9, tab 4
  text "Groups:", 234, 140 95 25 10, tab 4
  check "", 235, 140 105 55 9, 3state tab 4
  check "", 236, 198 105 55 9, 3state tab 4
  check "", 237, 140 113 55 9, 3state tab 4
  check "", 238, 198 113 55 9, 3state tab 4
  check "", 239, 140 121 55 9, 3state tab 4
  check "", 240, 198 121 55 9, 3state tab 4
  check "", 241, 140 129 55 9, 3state tab 4
  check "", 242, 198 129 55 9, 3state tab 4
  check "", 243, 140 137 55 9, 3state tab 4
  check "", 244, 198 137 55 9, 3state tab 4
  check "", 245, 140 145 55 9, 3state tab 4
  check "", 246, 198 145 55 9, 3state tab 4

  box "", 250, 260 20 120 140, tab 4
  text "Name:", 251, 265 29 20 10, tab 4
  edit "", 252, 300 28 60 9, tab 4
  text "Channel:", 253, 265 39 25 10, tab 4
  edit "", 254, 300 38 60 9, tab 4
  text "Bot:", 255, 265 49 20 10, tab 4
  edit "", 256, 300 48 60 9, tab 4
  text "Tokens:", 257, 265 60 20 10, tab 4
  text "First:", 258, 265 70 20 10, tab 4
  edit "", 259, 280 69 15 9, tab 4
  text "Section:", 260, 297 70 20 10, tab 4
  edit "", 261, 319 69 15 9, tab 4
  text "Release:", 262, 336 70 20 10, tab 4
  edit "", 263, 359 69 15 9, tab 4
  text "Groups:", 264, 265 95 25 10, tab 4
  check "", 265, 265 105 55 9, 3state tab 4
  check "", 266, 323 105 55 9, 3state tab 4
  check "", 267, 265 113 55 9, 3state tab 4
  check "", 268, 323 113 55 9, 3state tab 4
  check "", 269, 265 121 55 9, 3state tab 4
  check "", 270, 323 121 55 9, 3state tab 4
  check "", 271, 265 129 55 9, 3state tab 4
  check "", 272, 323 129 55 9, 3state tab 4
  check "", 273, 265 137 55 9, 3state tab 4
  check "", 274, 323 137 55 9, 3state tab 4
  check "", 275, 265 145 55 9, 3state tab 4
  check "", 276, 323 145 55 9, 3state tab 4

  box "", 280, 10 165 120 140, tab 4
  text "Name:", 281, 15 174 20 10, tab 4
  edit "", 282, 50 173 60 9, tab 4
  text "Channel:", 283, 15 184 25 10, tab 4
  edit "", 284, 50 183 60 9, tab 4
  text "Bot:", 285, 15 194 20 10, tab 4
  edit "", 286, 50 193 60 9, tab 4
  text "Tokens:", 287, 15 205 20 10, tab 4
  text "First:", 288, 15 215 20 10, tab 4
  edit "", 289, 30 214 15 9, tab 4
  text "Section:", 290, 47 215 20 10, tab 4
  edit "", 291, 69 214 15 9, tab 4
  text "Release:", 292, 86 215 20 10, tab 4
  edit "", 293, 109 214 15 9, tab 4
  text "Groups:", 294, 15 240 25 10, tab 4
  check "", 295, 15 250 55 9, 3state tab 4
  check "", 296, 72 250 55 9, 3state tab 4
  check "", 297, 15 258 55 9, 3state tab 4
  check "", 298, 72 258 55 9, 3state tab 4
  check "", 299, 15 266 55 9, 3state tab 4
  check "", 300, 72 266 55 9, 3state tab 4
  check "", 301, 15 274 55 9, 3state tab 4
  check "", 302, 72 274 55 9, 3state tab 4
  check "", 303, 15 282 55 9, 3state tab 4
  check "", 304, 72 282 55 9, 3state tab 4
  check "", 305, 15 290 55 9, 3state tab 4
  check "", 306, 72 290 55 9, 3state tab 4

  box "", 310, 135 165 120 140, tab 4
  text "Name:", 311, 140 174 20 10, tab 4
  edit "", 312, 175 173 60 9, tab 4
  text "Channel:", 313, 140 184 25 10, tab 4
  edit "", 314, 175 183 60 9, tab 4
  text "Bot:", 315, 140 194 20 10, tab 4
  edit "", 316, 175 193 60 9, tab 4
  text "Tokens:", 317, 140 205 20 10, tab 4
  text "First:", 318, 140 215 20 10, tab 4
  edit "", 319, 155 214 15 9, tab 4
  text "Section:", 320, 172 215 20 10, tab 4
  edit "", 321, 194 214 15 9, tab 4
  text "Release:", 322, 211 215 20 10, tab 4
  edit "", 323, 234 214 15 9, tab 4
  text "Groups:", 324, 140 240 25 10, tab 4
  check "", 325, 140 250 55 9, 3state tab 4
  check "", 326, 198 250 55 9, 3state tab 4
  check "", 327, 140 258 55 9, 3state tab 4
  check "", 328, 198 258 55 9, 3state tab 4
  check "", 329, 140 266 55 9, 3state tab 4
  check "", 330, 198 266 55 9, 3state tab 4
  check "", 331, 140 274 55 9, 3state tab 4
  check "", 332, 198 274 55 9, 3state tab 4
  check "", 333, 140 282 55 9, 3state tab 4
  check "", 334, 198 282 55 9, 3state tab 4
  check "", 335, 140 290 55 9, 3state tab 4
  check "", 336, 198 290 55 9, 3state tab 4

  box "", 340, 260 165 120 140, tab 4
  text "Name:", 341, 265 174 20 10, tab 4
  edit "", 342, 300 173 60 9, tab 4
  text "Channel:", 343, 265 184 25 10, tab 4
  edit "", 344, 300 183 60 9, tab 4
  text "Bot:", 345, 265 194 20 10, tab 4
  edit "", 346, 300 193 60 9, tab 4
  text "Tokens:", 347, 265 205 20 10, tab 4
  text "First:", 348, 265 215 20 10, tab 4
  edit "", 349, 280 214 15 9, tab 4
  text "Section:", 350, 297 215 20 10, tab 4
  edit "", 351, 319 214 15 9, tab 4
  text "Release:", 352, 336 215 20 10, tab 4
  edit "", 353, 359 214 15 9, tab 4
  text "Groups:", 354, 265 240 25 10, tab 4
  check "", 355, 265 250 55 9, 3state tab 4
  check "", 356, 323 250 55 9, 3state tab 4
  check "", 357, 265 258 55 9, 3state tab 4
  check "", 358, 323 258 55 9, 3state tab 4
  check "", 359, 265 266 55 9, 3state tab 4
  check "", 360, 323 266 55 9, 3state tab 4
  check "", 361, 265 274 55 9, 3state tab 4
  check "", 362, 323 274 55 9, 3state tab 4
  check "", 363, 265 282 55 9, 3state tab 4
  check "", 364, 323 282 55 9, 3state tab 4
  check "", 365, 265 290 55 9, 3state tab 4
  check "", 366, 323 290 55 9, 3state tab 4

  box "", 370, 18 22 85 93, tab 5
  text "Name:", 371, 22 31 20 9, tab 5
  edit "", 372, 40 30 60 9, tab 5
  text "Allowed:", 373, 22 40 78 20, tab 5
  text "Affils:", 374, 22 61 78 14, tab 5
  text "Chains:", 375, 22 75 20 9, tab 5
  edit "", 376, 22 83 77 9, tab 5
  edit "", 377, 22 93 77 9, tab 5
  edit "", 378, 22 103 77 9, tab 5

  box "", 380, 108 22 85 93, tab 5
  text "Name:", 381, 112 31 20 9, tab 5
  edit "", 382, 130 30 60 9, tab 5
  text "Allowed:", 383, 112 40 78 20, tab 5
  text "Affils:", 384, 112 61 78 14, tab 5
  text "Chains:", 385, 112 75 20 9, tab 5
  edit "", 386, 112 83 77 9, tab 5
  edit "", 387, 112 93 77 9, tab 5
  edit "", 388, 112 103 77 9, tab 5

  box "", 390, 198 22 85 93, tab 5
  text "Name:", 391, 202 31 20 9, tab 5
  edit "", 392, 220 30 60 9, tab 5
  text "Allowed:", 393, 202 40 78 20, tab 5
  text "Affils:", 394, 202 61 78 14, tab 5
  text "Chains:", 395, 202 75 20 9, tab 5
  edit "", 396, 202 83 77 9, tab 5
  edit "", 397, 202 93 77 9, tab 5
  edit "", 398, 202 103 77 9, tab 5

  box "", 400, 288 22 85 93, tab 5
  text "Name:", 401, 292 31 20 9, tab 5
  edit "", 402, 310 30 60 9, tab 5
  text "Allowed:", 403, 292 40 78 20, tab 5
  text "Affils:", 404, 292 61 78 14, tab 5
  text "Chains:", 405, 292 75 20 9, tab 5
  edit "", 406, 292 83 77 9, tab 5
  edit "", 407, 292 93 77 9, tab 5
  edit "", 408, 292 103 77 9, tab 5

  box "", 410, 18 117 85 93, tab 5
  text "Name:", 411, 22 126 20 9, tab 5
  edit "", 412, 40 125 60 9, tab 5
  text "Allowed:", 413, 22 135 78 20, tab 5
  text "Affils:", 414, 22 156 78 14, tab 5
  text "Chains:", 415, 22 170 20 9, tab 5
  edit "", 416, 22 178 77 9, tab 5
  edit "", 417, 22 188 77 9, tab 5
  edit "", 418, 22 198 77 9, tab 5

  box "", 420, 108 117 85 93, tab 5
  text "Name:", 421, 112 126 20 9, tab 5
  edit "", 422, 130 125 60 9, tab 5
  text "Allowed:", 423, 112 135 78 20, tab 5
  text "Affils:", 424, 112 156 78 14, tab 5
  text "Chains:", 425, 112 170 20 9, tab 5
  edit "", 426, 112 178 77 9, tab 5
  edit "", 427, 112 188 77 9, tab 5
  edit "", 428, 112 198 77 9, tab 5

  box "", 430, 198 117 85 93, tab 5
  text "Name:", 431, 202 126 20 9, tab 5
  edit "", 432, 220 125 60 9, tab 5
  text "Allowed:", 433, 202 135 78 20, tab 5
  text "Affils:", 434, 202 156 78 14, tab 5
  text "Chains:", 435, 202 170 20 9, tab 5
  edit "", 436, 202 178 77 9, tab 5
  edit "", 437, 202 188 77 9, tab 5
  edit "", 438, 202 198 77 9, tab 5

  box "", 440, 288 117 85 93, tab 5
  text "Name:", 441, 292 126 20 9, tab 5
  edit "", 442, 310 125 60 9, tab 5
  text "Allowed:", 443, 292 135 78 20, tab 5
  text "Affils:", 444, 292 156 78 14, tab 5
  text "Chains:", 445, 292 170 20 9, tab 5
  edit "", 446, 292 178 77 9, tab 5
  edit "", 447, 292 188 77 9, tab 5
  edit "", 448, 292 198 77 9, tab 5

  box "", 450, 18 212 85 93, tab 5
  text "Name:", 451, 22 221 20 9, tab 5
  edit "", 452, 40 220 60 9, tab 5
  text "Allowed:", 453, 22 230 78 20, tab 5
  text "Affils:", 454, 22 251 78 14, tab 5
  text "Chains:", 455, 22 265 20 9, tab 5
  edit "", 456, 22 273 77 9, tab 5
  edit "", 457, 22 283 77 9, tab 5
  edit "", 458, 22 293 77 9, tab 5

  box "", 460, 108 212 85 93, tab 5
  text "Name:", 461, 112 221 20 9, tab 5
  edit "", 462, 130 220 60 9, tab 5
  text "Allowed:", 463, 112 230 78 20, tab 5
  text "Affils:", 464, 112 251 78 14, tab 5
  text "Chains:", 465, 112 265 20 9, tab 5
  edit "", 466, 112 273 77 9, tab 5
  edit "", 467, 112 283 77 9, tab 5
  edit "", 468, 112 293 77 9, tab 5

  box "", 470, 198 212 85 93, tab 5
  text "Name:", 471, 202 221 20 9, tab 5
  edit "", 472, 220 220 60 9, tab 5
  text "Allowed:", 473, 202 230 78 20, tab 5
  text "Affils:", 474, 202 251 78 14, tab 5
  text "Chains:", 475, 202 265 20 9, tab 5
  edit "", 476, 202 273 77 9, tab 5
  edit "", 477, 202 283 77 9, tab 5
  edit "", 478, 202 293 77 9, tab 5

  box "", 480, 288 212 85 93, tab 5
  text "Name:", 481, 292 221 20 9, tab 5
  edit "", 482, 310 220 60 9, tab 5
  text "Allowed:", 483, 292 230 78 20, tab 5
  text "Affils:", 484, 292 251 78 14, tab 5
  text "Chains:", 485, 292 265 20 9, tab 5
  edit "", 486, 292 273 77 9, tab 5
  edit "", 487, 292 283 77 9, tab 5
  edit "", 488, 292 293 77 9, tab 5
}

on *:dialog:vfa-xxx-at:init:0 {
  var %version = 0.5.4 | dialog -t vfa-xxx-at $+($dialog(vfa-xxx-at).title, $chr(32), v, %version) | loadSettings
}

on *:dialog:vfa-xxx-at:edit:12,42,72,102,132,162,192,222,252,282,312,342:$siteNameChange($did)

on *:dialog:vfa-xxx-at:edit:372,382,392,402,412,422,432,442,452,462,472,482:did -ra vfa-xxx-at $buildCheckString($did) $did($did)

on *:dialog:vfa-xxx-at:sclick:25,26,27,28,29,30,31,32,33,34,35,36:$setAllowedSite($did)
on *:dialog:vfa-xxx-at:sclick:55,56,57,58,59,60,61,62,63,64,65,66:$setAllowedSite($did)
on *:dialog:vfa-xxx-at:sclick:85,86,87,88,89,90,91,92,93,94,95,96:$setAllowedSite($did)
on *:dialog:vfa-xxx-at:sclick:115,116,117,118,119,120,121,122,123,124,125,126:$setAllowedSite($did)
on *:dialog:vfa-xxx-at:sclick:145,146,147,148,149,150,151,152,153,154,155,156:$setAllowedSite($did)
on *:dialog:vfa-xxx-at:sclick:175,176,177,178,179,180,181,182,183,184,185,186:$setAllowedSite($did)
on *:dialog:vfa-xxx-at:sclick:205,206,207,208,209,210,211,212,213,214,215,216:$setAllowedSite($did)
on *:dialog:vfa-xxx-at:sclick:235,236,237,238,239,240,241,242,243,244,245,246:$setAllowedSite($did)
on *:dialog:vfa-xxx-at:sclick:265,266,267,268,269,270,271,272,273,274,275,276:$setAllowedSite($did)
on *:dialog:vfa-xxx-at:sclick:295,296,297,298,299,300,301,302,303,304,305,306:$setAllowedSite($did)
on *:dialog:vfa-xxx-at:sclick:325,326,327,328,329,330,331,332,333,334,335,336:$setAllowedSite($did)
on *:dialog:vfa-xxx-at:sclick:355,356,357,358,359,360,361,362,363,364,365,366:$setAllowedSite($did)

on *:dialog:vfa-xxx-at:sclick:1:$saveSettings

alias loadSettings {
  var %x = 1 | var %lines = $lines(vfa-xxx-at.ini) | var %line
  while (%x <= %lines) {
    %line = $read(vfa-xxx-at.ini, %x)
    if ($chr(61) isin %line) {
      if ($regml($regex(%line, ^.+=(\$?[^012]).*$))) {
        did -ra vfa-xxx-at $gettok(%line, 1, 61) $remove($gettok(%line, 2, 61), emptystring)
        if ($regml($regex(%line, ^(3[0-9]2|4[0-9]2)=.+$))) did -ra vfa-xxx-at $buildCheckString($gettok(%line, 1, 61)) $gettok(%line, 2, 61)
      }
      else {
        $iif($gettok(%line, 2, 61) == 0,, did -ra vfa-xxx-at $gettok(%line, 1, 61) $gettok(%line, 2, 61))
        if ($gettok($gettok(%line, 2, 61), 1, 44) == 1) did -c vfa-xxx-at $gettok(%line, 1, 61)
        elseif ($gettok($gettok(%line, 2, 61), 1, 44) == 2) did -cu vfa-xxx-at $gettok(%line, 1, 61)
      }
    }
    inc %x
  }
}

alias saveSettings {
  var %x = 10
  .remove vfa-xxx-at.ini
  unset %vfaxxxat_chans | set %vfaxxxat_chans
  while (%x <= 340) {
    if ($did(%x)) {
      writeini vfa-xxx-at.ini Sites %x $did(%x)
      writeini vfa-xxx-at.ini Sites $calc(%x + 2) $did($calc(%x + 2))
      writeini vfa-xxx-at.ini Sites $calc(%x + 4) $+($chr(35), $remove($did($calc(%x + 4)), $chr(35)))
      writeini vfa-xxx-at.ini Sites $calc(%x + 6) $did($calc(%x + 6))
      writeini vfa-xxx-at.ini Sites $calc(%x + 9) $remove($did($calc(%x + 9)), $chr(36))
      writeini vfa-xxx-at.ini Sites $calc(%x + 11) $remove($did($calc(%x + 11)), $chr(36))
      writeini vfa-xxx-at.ini Sites $calc(%x + 13) $remove($did($calc(%x + 13)), $chr(36))
      writeini vfa-xxx-at.ini Sites $calc(%x + 15) $did($calc(%x + 15)).state
      writeini vfa-xxx-at.ini Sites $calc(%x + 16) $did($calc(%x + 16)).state
      writeini vfa-xxx-at.ini Sites $calc(%x + 17) $did($calc(%x + 17)).state
      writeini vfa-xxx-at.ini Sites $calc(%x + 18) $did($calc(%x + 18)).state
      writeini vfa-xxx-at.ini Sites $calc(%x + 19) $did($calc(%x + 19)).state
      writeini vfa-xxx-at.ini Sites $calc(%x + 20) $did($calc(%x + 20)).state
      writeini vfa-xxx-at.ini Sites $calc(%x + 21) $did($calc(%x + 21)).state
      writeini vfa-xxx-at.ini Sites $calc(%x + 22) $did($calc(%x + 22)).state
      writeini vfa-xxx-at.ini Sites $calc(%x + 23) $did($calc(%x + 23)).state
      writeini vfa-xxx-at.ini Sites $calc(%x + 24) $did($calc(%x + 24)).state
      writeini vfa-xxx-at.ini Sites $calc(%x + 25) $did($calc(%x + 25)).state
      writeini vfa-xxx-at.ini Sites $calc(%x + 26) $did($calc(%x + 26)).state
      if ($did($calc(%x + 4))) %vfaxxxat_chans = $+(%vfaxxxat_chans, $chr(35), $remove($did($calc(%x + 4)), $chr(35)), $chr(44))
    }
    inc %x 30
  }
  %vfaxxxat_chans = $left(%vfaxxxat_chans, -1)
  %x = 370
  while (%x <= 480) {
    if ($did(%x)) {
      writeini vfa-xxx-at.ini Groups %x $did(%x)
      writeini vfa-xxx-at.ini Groups $calc(%x + 2) $did($calc(%x + 2))
      writeini vfa-xxx-at.ini Groups $calc(%x + 3) $did($calc(%x + 3))
      writeini vfa-xxx-at.ini Groups $calc(%x + 4) $did($calc(%x + 4))
      writeini vfa-xxx-at.ini Groups $calc(%x + 6) $iif($did($calc(%x + 6)), $did($calc(%x + 6)), emptystring)
      writeini vfa-xxx-at.ini Groups $calc(%x + 7) $iif($did($calc(%x + 7)), $did($calc(%x + 7)), emptystring)
      writeini vfa-xxx-at.ini Groups $calc(%x + 8) $iif($did($calc(%x + 8)), $did($calc(%x + 8)), emptystring)
    }
    inc %x 10
  }
}

alias siteNameChange {
  var %x = 373
  while (%x <= 483) {
    if ($getGroupsForSite($1) == true) {
      did -ra vfa-xxx-at %x $replace($did(%x), $siteNameDid($1), $did($1))
      did -ra vfa-xxx-at $calc(%x + 1) $replace($did($calc(%x + 1)), $siteNameDid($1), $did($1))
    }
    inc %x 10
  }
  did -ra vfa-xxx-at $calc($did - 2) $did($did)
}

alias getGroupsForSite {
  var %hasgroups = false | var %base = $calc($1 + 13) | var %x = 0
  while (%x < 12) {
    if ($did($calc(%base + %x)).state != 0) { %hasgroups = true | break }
    inc %x
  }  
  return %hasgroups
}

alias wasRaced {
  if (%race1 == $null) { %race1 = $1 | return false }
  if (%race1 == $1) return true
  elseif (%race2 == $1) return true
  elseif (%race3 == $1) return true
  else { %race3 = %race2 | %race2 = %race1 | %race1 = $1 | return false }
}

alias setAllowedSite {
  var %x = 0 | var %base = 370 | var %group
  while (%x < 12) {
    %group = $calc(%base + $calc(%x * 10))
    if (($did($1) == $null) || ($siteNameDid($did) == $null)) { did -u vfa-xxx-at $did | break }
    if ($did($1) == $did(%group)) {
      if (($did($did).state == 1) && ($siteNameDid($did))) {
        if ($numtok($did($calc(%group + 3)), 32) == 1) did -ra vfa-xxx-at $calc(%group + 3) $+(Allowed:, $chr(32), $siteNameDid($did))
        else did -ra vfa-xxx-at $calc(%group + 3) $+($did($calc(%group + 3)), $chr(44), $chr(32), $siteNameDid($did))
      }
      if (($did($did).state == 2) && ($siteNameDid($did))) {
        did -ra vfa-xxx-at $calc(%group + 3) $remtok($did($calc(%group + 3)), $siteNameDid($did), 1, 32)
        did -ra vfa-xxx-at $calc(%group + 3) $remtok($did($calc(%group + 3)), $+($siteNameDid($did), $chr(44)), 1, 32)
        if ($numtok($did($calc(%group + 4)), 32) == 1) did -ra vfa-xxx-at $calc(%group + 4) $+(Affils:, $chr(32), $siteNameDid($did))
        else did -ra vfa-xxx-at $calc(%group + 4) $+($did($calc(%group + 4)), $chr(44), $chr(32), $siteNameDid($did))
      }
      if (($did($did).state == 0) && ($siteNameDid($did))) {
        did -ra vfa-xxx-at $calc(%group + 4) $remtok($did($calc(%group + 4)), $siteNameDid($did), 1, 32)
        did -ra vfa-xxx-at $calc(%group + 4) $remtok($did($calc(%group + 4)), $+($siteNameDid($did), $chr(44)), 1, 32)
      }
    }
    inc %x
  }
}

alias buildCheckString {
  var %base = $calc($1 - 2) | var %inc = $calc($calc(%base - 370) / 10) | var %x = 25 | var %checks = %base
  while (%x <= 355) {
    %checks = $+(%checks, $chr(44), $calc(%x + %inc))
    inc %x 30
  }
  return %checks
}

alias siteNameDid {
  if ($1 < 40) return $did(10)
  if ($1 < 70) return $did(40)
  if ($1 < 100) return $did(70)
  if ($1 < 130) return $did(100)
  if ($1 < 160) return $did(130)
  if ($1 < 190) return $did(160)
  if ($1 < 220) return $did(190)
  if ($1 < 250) return $did(220)
  if ($1 < 280) return $did(250)
  if ($1 < 310) return $did(280)
  if ($1 < 340) return $did(310)
  else return $did(340)
}

on *:text:*FIRST*:%vfaxxxat_chans {
  var %temp = $read(vfa-xxx-at.ini, w, $+(*, $chan, *)) | var %line_num = $readn
  var %token_section = $gettok($read(vfa-xxx-at.ini, $calc(%line_num + 3)), 2, 61)
  var %token_release = $gettok($read(vfa-xxx-at.ini, $calc(%line_num + 4)), 2, 61)
  var %token_first = $gettok($read(vfa-xxx-at.ini, $calc(%line_num + 2)), 2, 61)
  var %section = $regml($regex($gettok($1-, %token_section, 32), ^\W*(X{3}|XXX\-ENG|XXX\-XVID)\W*$))
echo -s $gettok($1-, %token_first, 32) - $1-
  if ($gettok($1-, %token_first, 32) != FIRST) goto end
echo -s %section - $1-
  if (%section != $null) {
    var %release = $regml($regex($gettok($1-, %token_release, 32), ^\W*([\w\.\-/]+[^\W])\W*$))
    var %group = $regml($regex(%release, ^.+\-(\w+)\W?.*$))
    if ($wasRaced(%release) == true) goto end
    if ($left($right(%release, 4), 1) == /) var %cd = $right(%release, 1)
    else var %cd = 0
    %temp = $read(vfa-xxx-at.ini, w, $+(*=, %group)) | %line_num = $readn
    if (%line_num != 0) {
      var %chain1 = $gettok($read(vfa-xxx-at.ini, $calc(%line_num + 4)), 2, 61)
      var %chain2 = $gettok($read(vfa-xxx-at.ini, $calc(%line_num + 5)), 2, 61)
      var %chain3 = $gettok($read(vfa-xxx-at.ini, $calc(%line_num + 6)), 2, 61)
      if (!$window(@vFA-XXX-AT)) window -k0z @vFA-XXX-AT
      if (%chain1 != emptystring) {
        dll rushmirc.dll RushScript RushApp.FTP.Transfer(' $+ %cd $+ ', '', '', '', ' $+ %chain1 $+ ', 'XXX', ' $+ %release $+ ', RS_LOGIN OR RS_CHECKLOGIN, 'CD1;CD2;CD3;CD4;CD5;CD6;CD7;CD8;CD9', '', '', '', '(\w*100%\w*)|(\w*-\sCOMPLETE(\s(\)|-)|D\))\w*)', 500, 1, 2, 'RS_SORTSIZE', 'RS_SORTSIZE', 2, 0)
        aline -np @vFA-XXX-AT $chr(91) XXX-RACE ][ Chain: %chain1 ][ Release: %release $chr(93)
      }
      if (%chain2 != emptystring) {
        dll rushmirc.dll RushScript RushApp.FTP.Transfer(' $+ %cd $+ ', '', '', '', ' $+ %chain2 $+ ', 'XXX', ' $+ %release $+ ', RS_LOGIN OR RS_CHECKLOGIN, 'CD1;CD2;CD3;CD4;CD5;CD6;CD7;CD8;CD9', '', '', '', '(\w*100%\w*)|(\w*-\sCOMPLETE(\s(\)|-)|D\))\w*)', 500, 1, 2, 'RS_SORTSIZE', 'RS_SORTSIZE', 2, 0)
        aline -np @vFA-XXX-AT $chr(91) XXX-RACE ][ Chain: %chain2 ][ Release: %release $chr(93)
      }
      if (%chain3 != emptystring) {
        dll rushmirc.dll RushScript RushApp.FTP.Transfer(' $+ %cd $+ ', '', '', '', ' $+ %chain3 $+ ', 'XXX', ' $+ %release $+ ', RS_LOGIN OR RS_CHECKLOGIN, 'CD1;CD2;CD3;CD4;CD5;CD6;CD7;CD8;CD9', '', '', '', '(\w*100%\w*)|(\w*-\sCOMPLETE(\s(\)|-)|D\))\w*)', 500, 1, 2, 'RS_SORTSIZE', 'RS_SORTSIZE', 2, 0)
        aline -np @vFA-XXX-AT $chr(91) XXX-RACE ][ Chain: %chain3 ][ Release: %release $chr(93)
      }
    }
  }
  :end
}