language: Ruby (ruby-1.9.2)
date: 217 days 1 hour ago
link:
visibility: public
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
#!/usr/bin/env ruby
# -*- coding: utf-8 -*-
 
# Programming Language KQ
 
input = STDIN.readlines.join.chomp.force_encoding('UTF-8').tr('^ダァシエリイェス', '')
 
if input.length % 6 != 0 then
  puts "プログラムが不正です"
  exit(1)
end
 
buffer = Array.new(32768, 0)
ptr = 0
run_ptr = 0
 
while run_ptr != input.length
  case input[run_ptr, 6]
  when 'ダァイェス' # >
    ptr += 1
  when 'イェスダァ' # <
    ptr -= 1
  when 'ダァダァ' # +
    buffer[ptr] += 1
  when 'シエリシエリ' # -
    buffer[ptr] -= 1
  when 'ダァシエリ' # ,
    buffer[ptr] = STDIN.getc
  when 'シエリダァ' # .
    print buffer[ptr].chr
  when 'シエリイェス' # [
    if buffer[ptr] == 0 then
      nest = 1
      while nest != 0
        run_ptr += 6
        case input[run_ptr, 6]
        when 'シエリイェス'
          nest += 1
        when 'イェスシエリ'
          nest -= 1
        end
      end
    end
  when 'イェスシエリ' # ]
    if buffer[ptr] != 0 then
      nest = 1
      while nest != 0
        run_ptr -= 6
        case input[run_ptr, 6]
        when 'シエリイェス'
          nest -= 1
        when 'イェスシエリ'
          nest += 1
        end
      end
      run_ptr -= 6
    end
  end
  run_ptr += 6
end
# 335 # 334 # 333 # 332 # 331 # 330 # 329 # 328 # 327 # 326 # 325 # 324 # 323 # 322 # 321 # 320 # 319 # 318 # 317 # 316 # 315 # 314 # 313 # 312 # 311 # 310 # 309 # 308 # 307 # 306 # 305 # 304 # 303 # 302 # 301 # 300 # 299 # 298 # 297 # 296 # 295 # 294 # 293 # 292 # 291 # 290 # 289 # 288 # 287 # 286 # 285 # 284 # 283 # 282 # 281 # 280 # 279 # 278 # 277 # 276 # 275 # 274 # 273 # 272 # 271 # 270 # 269 # 268 # 267 # 266 # 265 # 264 # 263 # 262 # 261 # 260 # 259 # 258 # 257 # 256 # 255 # 254 # 253 # 252 # 251 # 250 # 249 # 248 # 247 # 246 # 245 # 244 # 243 # 242 # 241 # 240 # 239 # 238 # 237 # 236 # 235 # 234 # 233 # 232 # 231 # 230 # 229 # 228 # 227 # 226 # 225 # 224 # 223 # 222 # 221 # 220 # 219 # 218 # 217 # 216 # 215 # 214 # 213 # 212 # 211 # 210 # 209 # 208 # 207 # 206 # 205 # 204 # 203 # 202 # 201 # 200 # 199 # 198 # 197 # 196 # 195 # 194 # 193 # 192 # 191 # 190 # 189 # 188 # 187 # 186 # 185 # 184 # 183 # 182 # 181 # 180 # 179 # 178 # 177 # 176 # 175 # 174 # 173 # 172 # 171 # 170 # 169 # 168 # 167 # 166 # 165 # 164 # 163 # 162 # 161 # 160 # 159 # 158 # 157 # 156 # 155 # 154 # 153 # 152 # 151 # 150 # 149 # 148 # 147 # 146 # 145 # 144 # 143 # 142 # 141 # 140 # 139 # 138 # 137 # 136 # 135 # 134 # 133 # 132 # 131 # 130 # 129 # 128 # 127 # 126 # 125 # 124 # 123 # 122 # 121 # 120 # 119 # 118 # 117 # 116 # 115 # 114 # 113 # 112 # 111 # 110 # 109 # 108 # 107 # 106 # 105 # 104 # 103 # 102 # 101 # 100 # 99 # 98 # 97 # 96 # 95 # 94 # 93 # 92 # 91 # 90 # 89 # 88 # 87 # 86 # 85 # 84 # 83 # 82 # 81 # 80 # 79 # 78 # 77 # 76 # 75 # 74 # 73 # 72 # 71 # 70 # 69 # 68 # 67 # 66 # 65 # 64 # 63 # 62 # 61 # 60 # 59 # 58 # 57 # 56 # 55 # 54 # 53 # 52 # 51 # 50 # 49 # 48 # 47 # 46 # 45 # 44 # 43 # 42 # 41 # 40 # 39 # 38 # 37 # 36 # 35 # 34 # 33 # 32 # 31 # 30 # 29 # 28 # 27 # 26 # 25 # 24 # 23 # 22 # 21 # 20 # 19 # 18 # 17 # 16 # 15 # 14 # 13 # 12 # 11 # 10 # 9 # 8 # 7 # 6 # 5 # 4 # 3 # 2 # 1
  • upload with new input
  • result: Success     time: 0s    memory: 5024 kB     returned value: 0

    ダァダァ!!ダァダァ!!ダァダァ!!ダァダァ!!ダァダァ!!ダァダァ!!ダァダァ!!ダァダァ!!ダァダァ!!シエリイェス!ダァイェス!!
    ダァダァ!!ダァダァ!!ダァダァ!!ダァダァ!!ダァダァ!!ダァダァ!!ダァダァ!!ダァダァ!!ダァイェス!!ダァダァ!!ダァダァ!!
    ダァダァ!!ダァダァ!!ダァダァ!!ダァダァ!!ダァダァ!!ダァダァ!!ダァダァ!!ダァダァ!!ダァダァ!!ダァイェス!!ダァダァ!!
    ダァダァ!!ダァダァ!!ダァダァ!!ダァダァ!!イェスダァ!イェスダァ!イェスダァ!シエリシエリ!イェスシエリ!ダァイェス!!シエリダァ!!ダァイェス!!
    ダァダァ!!ダァダァ!!シエリダァ!!ダァダァ!!ダァダァ!!ダァダァ!!ダァダァ!!ダァダァ!!ダァダァ!!ダァダァ!!シエリダァ!!
    シエリダァ!!ダァダァ!!ダァダァ!!ダァダァ!!シエリダァ!!ダァイェス!!シエリシエリ!シエリダァ!!シエリシエリ!シエリシエリ!シエリシエリ!シエリシエリ!
    シエリシエリ!シエリシエリ!シエリシエリ!シエリシエリ!シエリシエリ!シエリシエリ!シエリシエリ!シエリシエリ!シエリダァ!!イェスダァ!ダァダァ!!ダァダァ!!ダァダァ!!
    ダァダァ!!ダァダァ!!ダァダァ!!ダァダァ!!ダァダァ!!シエリダァ!!シエリシエリ!シエリシエリ!シエリシエリ!シエリシエリ!シエリシエリ!シエリシエリ!シエリシエリ!
    シエリシエリ!シエリダァ!!ダァダァ!!ダァダァ!!ダァダァ!!シエリダァ!!シエリシエリ!シエリシエリ!シエリシエリ!シエリシエリ!シエリシエリ!シエリシエリ!シエリダァ!!
    シエリシエリ!シエリシエリ!シエリシエリ!シエリシエリ!シエリシエリ!シエリシエリ!シエリシエリ!シエリシエリ!シエリダァ!!ダァイェス!!ダァダァ!!シエリダァ!!
    Hello, world!
プログラミング言語KQで「Hello, world!」を出力するサンプル