Сделайте фальшивый загрузчик просто так:

Параметры:

• Выведите loading(пробел) один из них циклически -\|/(пробел) (процентный счетчик от 0 до 100), затем a %.
• Предполагается, что процентный счетчик увеличивается на 1 при каждом изменении дисплея.
• Время, необходимое счетчику для перехода к следующей итерации, является случайным. Любой случайный тип будет работать до тех пор, пока функция / метод способна генерировать все случайные целые числа с вероятностью> 0 в диапазоне 1<= ms <=750здесь, msявляющемся временем в миллисекундах.
• Начало в loading - 0 %.
• Конец в loading - 100 %.
• НЕТ ВХОДА не требуется.
• представить полную программу или функцию или что-то подобное.

Код, который я использовал:

C ++

#include<stdio.h>
#include<time.h>
#include<windows.h>

int main()
{
    srand(time(NULL));
    char a[15],b[]="-\\|/";
    int i=0,j=0,ms;
    while(j<101)
    {
        (i<3)?i++:i=0;
        wsprintf(a,"loading %c %d ",b[i],j++);
        printf(a);puts("%");
            //This part is to make the output look cool
        switch(rand()%9)
        {
            case 0:ms=1;break;
            case 1:ms=2;break;
            case 2:ms=5;break;
            case 3:ms=10;break;
            case 4:ms=15;break;
            case 5:ms=20;break;
            case 6:ms=25;break;
            case 7:ms=50;break;
            case 8:ms=500;
        }
        Sleep(ms);  //Otherwise this is supposed to be random
        if(j<101)   //like this Sleep(rand()%750+1);
        system("cls");
    }
}

победитель

• код с наименьшим количеством байтов выигрывает.

MATL , 45 байт

101:"'loading'O'-\|/'@)O@qVO37&hD750Yr100/&Xx

Пример запуска в автономном компиляторе:

Или попробуйте в MATL Online!

объяснение

101:          % Push array [1 2 ... 101]
"             % For each
  'loading'   %   Push this string
  O           %   Push 0. When converted to char it will be displayed as a space
  '-\|/'      %   Push this sring
  @)          %   Modular index into this string with iteration index
  O           %   Push 0
  @q          %   Iteration index minus 1
  V           %   Convert to string
  O           %   Push 0
  37          %   Push 37, which is ASCII for '%'
  &h          %   Concatenate horizontally into a string, Numbers are converted to char
  D           %   Display
  750Yr       %   Random integer with uniform distribution on [1 2 ... 750]
  100/        %   Divide by 100
  &Xx         %   Pause that many tenths of a second and clear screen
              % End (implicit)

Powershell, 71 68 65 байт

Аналогично /codegolf//a/101357/59735

Сэкономил 3 байта, не будучи идиотом (оставил ... при загрузке)

-3 благодаря VisualMelon

изменил 750 -> 751, чтобы убедиться, что 750 включен.

0..100|%{cls;"loading $("|/-\"[$_%4]) $_ %";sleep -m(random 751)}

Объяснение:

0..100|%{                                  #For range 0-100...
    cls                                    #Clear Display
    "loading $("|/-\"[$_%4]) $_ %"    #Display the current string
    sleep -m(random 750)                  #Sleep random ms up to 750
}

Обновленный GIF

Python 2, 119 113 112 байт

Я изначально ушел со случайным количеством random()/.75, однако конечная точка не будет включена. Нет большой разницы между этим и другим вопросом для бесконечного времени загрузки, за исключением случайности и того факта, что она действительно заканчивается.

import time,random as r
for i in range(101):print'\rLoading','-\|/'[i%4],i,'%',;time.sleep(r.randint(1,750)/1e3)

^{спасибо Джонатану Аллану за сохранение 6 байтов и DJMcMayhem за сохранение байта!}

Пакет, 185 байт

@set s=-\!/
@for /l %%i in (0,1,100)do @call:l %%i
@exit/b
:l
@cls
@set c=%s:~0,1%
@set s=%s:~1%%c%
@echo Loading %c:!=^|% %1 %%
@set/aw=%random%%%751
@ping>nul 1.1 -n 1 -w %w%

К сожалению, время довольно плохое, но у Batch нет ничего лучше, чем использовать ping.

*> <> (Морская звезда), 86 82 байта

| v1*aoooooooo"loading K"&0"-\|/"
!0x1! +
%$<.0+af{od;?)*aa&:&Soono$&+1:&"  %"{o:}

Попробуй это здесь!

Это может быть в состоянии играть в гольф больше, но я не вижу ничего супер очевидного. Он спит 100 мс, 400 мс или 700 мс, если это не достаточно случайно, дайте мне знать!

Спасибо @TealPelican за то, что сэкономили мне 4 байта и сделали его намного более случайным!

Самыми большими проблемами, которые я обнаружил (хотя все еще пытался сохранить их малыми), была случайность и фактически вывод «загрузка - 100%» в конце, а не просто выход при моем ближайшем удобстве: с.

Perl 6 , 67 байт

for |<- \ | />xx* Z 0..100 {print "\rloading $_ %";sleep .750.rand}

Expanded:

for

  # produce a list of all the pairs of values

  |<- \ | /> xx *   # a flat infinite list of "clock faces"
  Z                 # zipped with
  0 .. 100          # all the numbers from 0 to 100 inclusive

  # &zip / &infix:<Z> stop on the shortest list

{

  # ｢$_｣ will look something like ｢("/", 39)｣
  # when it is coerced to a Str, all of its elements
  # will be coerced to Str, and joined with spaces

  print "\rloading $_ %";

  sleep .750.rand

}

Javascript (ES6), 128 118 116 115 112 110 109 байт

Кажется, это работает отлично, даже с этим отрывочным источником «случайных» чисел.

(X=_=>setTimeout(i>99||X,1+new Date%750,document.body.innerHTML=`<pre>Loading ${'-\\|/'[i%4]} ${i++}%`))(i=0)

Альтернатива 1 , Javascript + HTML, 16 + 84 байта

Этот использует уже существующий элемент для отображения оставшегося содержимого:

(X=_=>setTimeout(i>99||X,1+new Date%750,a.innerHTML=`${'-\\|/'[i%4]} ${i++}%`))(i=0)

Loading <a id=a>

Альтернатива 2 , 95 байт

Если я могу предположить, что вкладка открыта и вы вставляете это в консоль:

(X=_=>setTimeout(i>99||X,1+new Date%750,document.title=`Loading ${'-\\|/'[i%4]} ${i++}%`))(i=0)

Вместо отображения HTML название документа изменится.

Спасибо @ user2428118 за сохранение 2 байта!

F #, 118 байт

async{let r=System.Random()
for i in 0..100 do printf"\rLoading %O %d %%""|/-\\".[i%4]i;do!Async.Sleep(r.Next(1,750))}

Чтобы запустить этот фрагмент, передайте его в Async.Startили Async.RunSynchronously.

PHP, 90 83 80 78 77 байт

77:

Закрытие ;не нужно.

for(;$i<101;usleep(rand(1,75e4)))echo"\rloading ",'-\|/'[$i%4],' ',$i+++0,'%'

78:

При поиске другого обходного пути для получения 0 изначально без инициализации переменной я придумал следующее:

for(;$i<101;usleep(rand(1,75e4)))echo"\rloading ",'-\|/'[$i%4],' ',$i+++0,'%';

Изменено обратно на echo, чтобы выиграть несколько байтов, так как я использовал printf только для принудительного форматирования как int. Увеличивая $ i с 0, я получаю правильное целое число. Используя одинарные кавычки в качестве разделителя строк, не нужно экранировать обратную косую черту, что приводит к освобождению другого байта

80:

Перемещение приращения $ i из последней секции for к prinf дало мне еще 3 скидки. (См. Комментарии ниже)

for(;$i<101;usleep(rand(1,75e4)))printf("\rloading %s %d%%","-\\|/"[$i%4],$i++);

83:

Убрал инициализацию переменной с загрузчиками.

for(;$i<101;usleep(rand(1,75e4)),$i++)printf("\rloading %s %d%%","-\\|/"[$i%4],$i);

90:

Я попытался удалить инициал $ i, чтобы получить несколько байтов, так как мне пришлось добавить немало, чтобы включить анимацию загрузчика. printf добавляет 2 в отличие от echo, но форматирование NULL в виде целого числа приводит к 0.

for($l='-\|/';$i<101;usleep(rand(0,750)*1e3),$i++)printf("\rloading %s %d%%",$l[$i%4],$i);

Groovy, 113 87 байт

-36 байт благодаря lealand

{p=-1;101.times{print"\rLoading ${"-\\|/"[p++%4]} $p%";sleep Math.random()*750as int}}​

Баш, 162 104 байта

Модификация ответа Захария по смежному вопросу с огромными улучшениями от manatwork:

s='-\|/'
for x in {0..100};{
printf "\rloading ${s:x%4:1} $x %%"
sleep `printf .%03d $[RANDOM%750+1]`
}

Я должен был посмотреть, как сделать случайные числа в Bash.

Ungolfed / объяснил

s='-\|/'
for x in {0..100}
{
    # \r returns the carriage to the beginning of the current line.
    # ${s:x%4:1} grabs a substring from s, at index x%4, with a length of 1.
    printf "\rloading ${s:x%4:1} $x %%"

    # "$RANDOM is an internal bash function that returns
    #   a pseudorandom integer in the range 0 - 32767."
    # .%03d is a dot followed by a base-ten number formatted to 3 places,
    #   padded with zeros if needed.
    # sleep accepts a floating point number to represent milliseconds.
    sleep `printf .%03d $[RANDOM%750+1]`
}

C #, 170 149 135 байт

()=>{for(int i=0;i++<=100;System.Threading.Thread.Sleep(new Random().Next(1,750)))Console.Write($"\rloading {@"-\|/"[i % 4]} {i} %");};

Ungolfed:

static void l()
{
    for (int i = 0; i <= 100; System.Threading.Thread.Sleep(new Random().Next(1, 750)))
        Console.Write($"\rloading {@"-\|/"[i % 4]} {i} %");   
}

Я не буду гарантировать, что каждый символ в этом прав, пожалуйста, исправьте меня, если есть ошибки компиляции. Я должен был напечатать все это на своем телефоне, чтобы я мог случайно включить некоторые ошибки ... ¯_ (ツ) _ / ¯ Я надеюсь, что вы, ребята, простите меня, что

Протестировал его на моем ПК, работает как брелок, и я даже сэкономил целых 20 байтов благодаря pmbanka :)

C 112 103 байта

Сохранено 9 байт благодаря @G. Sliepen. Не очень захватывающе, просто гольф вашего C ++ ответа в принципе. Также не очень захватывающая случайная функция. Я думал о Sleep(c[i%4]), или, Sleep(i)но они вовсе не случайны!

#import<windows.h>
i;f(){for(;i<101;printf("\rloading %c %d %%","-\\|/"[i%4],i++),Sleep(rand()%750+1));}

Ungolfed:

#include <windows.h>
int i;
void f() {
  for(;i<101;) {
    printf("\rloading %c %d %%", "-\\|/"[i%4], i++);
    Sleep(rand()%750+1);
  }
}

Mathematica, 133 байта

Dynamic[If[x<100,x++,,x=0];Row@{"Loading ",StringPart["-\|/",1+x~Mod~4]," ",x,"%"},
    UpdateInterval:>RandomReal@.75,TrackedSymbols:>{}]

Это будет выполнено один раз, при условии, что x не определен. Clear@xперезапустит его.

55 символов, связанных в многословии: /

R - 94 байта

for(i in 0:100){cat('\rLoading',c('-','\\','|','/')[i%%4+1],i,'%');Sys.sleep(sample(750,1)/1e3)}

Это действительно приятно sample(750,1) == sample(1:750,1).

HTML + JS (ES6), 16 + 87 = 103 байта

(f=_=>a.innerHTML='\\|/-'[i++%4]+` ${i<100&&setTimeout(f,Math.random()*750),i} %`)(i=0)

loading <a id=a>

PHP, 66 79 байт

for($i=-1;++$i<101;usleep(rand(1,75e4)))echo"\rloading ","-\\|/"[$i%4]," $i %";

К сожалению, я должен был назначить $ i, чтобы заставить его напечатать '0'.
Используйте как:

php -r 'for($i=-1;++$i<101;usleep(rand(1,75e4)))echo"\rloading ","-\\|/"[$i%4]," $i %";'

Редактирование: благодаря Титу, подтверждающему в точности то, что разрешено с Мукулом Кумаром, мы можем сохранить 3 байта с меньшим ограниченным диапазоном, но не все 9 байтов с неограниченным диапазоном. Спасибо также за то, что указал на то, что я забыл про велосипедного персонажа и предоставил простое решение для этого

Noodel , неконкурентный 40 байт

Просто возвращаясь к старым испытаниям (как в испытаниях, которые были сделаны до Noodel ) и конкурируя с Noodel, чтобы найти, где он слаб.

Loading¤”ḋḟƇḣ⁺s¤ṡ⁺Ḷ101ạ¤%ɱṠĖ²⁺Çṛ749⁺1ḍ€Ḃ

Если окончательный вывод не имеет значения, то можно сохранить 2 байта.

Loading¤”ḋḟƇḣ⁺s¤ṡ⁺Ḷ101ạ¤%ɱṠĖ²⁺Çṛ749⁺1ḍ

Noodel выдвигает верхнюю часть стека на экран в конце программы, поэтому, добавив, €Ḃон предотвращает это.

Попытайся:)

Как это работает

Loading¤”ḋḟƇḣ⁺s¤ṡ⁺Ḷ101ạ¤%ɱṠĖ²⁺Çṛ749⁺1ḍ€Ḃ # Main Noodel script.

Loading¤”ḋḟƇḣ⁺s¤ṡ⁺                       # Creates the array ["Loading¤-¤", "Loading¤\¤", "Loading¤|¤", "Loading¤/¤"]
Loading¤                                 # Pushes the string "Loading¤"
        ”Ƈḟḋḣ                            # Pushes the array ["-", "\", "|", "/"]
             ⁺s                          # Concats "Loading¤" to each element in the array by prepending.
               ¤                         # Pushes a "¤" onto the stack.
                ṡ                        # Pushes
                 ⁺

                  Ḷ101ạ¤%ɱṠĖ²⁺Çṛ749⁺1ḍ   # Main loop that creates the animation.
                  Ḷ101                   # Loop the following code 101 times.
                      ạ                  # Pushes on a copy of the next animation element from the array.
                       ¤%                # Pushes the string "¤%"
                         ɱ               # Pushes on the current count of the number of times that have looped (zero based).
                          Ṡ              # Swaps the two items at the bottom of the stack.
                           Ė             # Pushes the item at the bottom of the stack to the top (which will be the string selected from the array).
                            ²⁺           # Concat twice appending the loop count then the string "¤%" to the string selected from the array.
                              Ç          # Pops the string off of the stack, clears the screen, then prints the string.
                               ṛ749      # Randomly generate an integer from 0 to 749.
                                   ⁺1    # Increment the random number producing a random number from 1 - 750.
                                     ḍ   # Pop off the stack and delay for that number of milliseconds.

                                      €Ḃ # Ends the loop and prevents anything else being displayed.
                                      €  # Ends the loop (new line could be used as well)
                                       Ḃ # Destroys the current stack therein, nothing gets pushed to the screen at the end of the program.

<div id="noodel" code="Loading¤”ḋḟƇḣ⁺s¤ṡ⁺Ḷ101ạ¤%ɱṠĖ²⁺Çṛ749⁺1ḍ€Ḃ" input="" cols="14" rows="2"></div>

<script src="https://tkellehe.github.io/noodel/noodel-latest.js"></script>
<script src="https://tkellehe.github.io/noodel/ppcg.min.js"></script>

C 126 121 байт

f(){i=0;char c[]="/-\\|";for(;i<101;i++){printf("\rloading %c %d %% ",c[i%4],i);fflush(stdout);usleep(1000*(rand()%75));}

Безголовая версия:

 void f()
 {
  int i=0;
  char c[]="/-\\|";
  for(;i<101;i++)
  {
    printf("\rloading %c %d %% ",c[i%4], i);
    fflush(stdout);
    usleep(1000*(rand()%75));  
  }
 } 

@Carcigenicate @ Мукул Кумар Не читал между строк, спасибо! :)

MATLAB, 108 байт

function k;for i=0:100;a='-\|/';pause(rand*.749+.001);clc;['loading ' a(mod(i,3)+1) ' ' num2str(i) ' %']
end

Октава, 122 120 119 108 байтов

Я неправильно понял задачу и создал бесконечный загрузчик, который перезапустился с 0 после того, как прошел 100. Превратив его в одноразовый загрузчик:

a='\|/-';for i=0:100;clc;disp(['Loading ',a(1),' ',num2str(i),' %']);a=a([2:4,1]);pause(0.749*rand+.001);end

Циркулирующие a, a=a([2:4,1])была идея flawr в здесь . Кроме того, сэкономили 2 байта, пропустив скобки после randблагодарности MattWH.

ForceLang, 250 байт

Неконкурентный, требует языковых особенностей, которые ставят вопрос

def D def
D w io.write
D l e+"loading"+s
D z string.char 8
D s string.char 32
D d datetime.wait 750.mult random.rand()
D e z.repeat 24
D n set i 1+i
D k s+n+s+"%"
set i -1
label 1
w l+"-"+k
if i=100
exit()
d
w l+"\"+k
d
w l+"|"+k
d
w l+"/"+k
d
goto 1

Возможно, мне следует исправить некоторые ошибки, связанные с синтаксическим анализом строкового литерала в ближайшее время

Ракетка 110 байтов

(for((i 101))(printf"Loading ~a ~a % ~n"(list-ref'("-" "\\" "|" "/")(modulo i 4))i)(sleep(/(random 750)1000)))

Ungolfed:

(define(f)
  (for ((i 101))
    (printf "Loading ~a ~a % ~n" (list-ref '("-" "\\" "|" "/") (modulo i 4)) i)
    (sleep (/(random 750)1000))))

Тестирование:

(f)

Выход:

(Этот GIF-файл отображается медленнее, чем на самом деле)

107 75 рубин

-32 благодаря манатворке

Обычный

i=0
(0..100).each{|c|
system'clear'
puts"loading #{'\|/-'[i=-~i%4]} #{c} %"
sleep rand*(0.750-0.01)+0.01
}

Golfed

101.times{|c|$><<"\rloading #{'-\|/'[c%4]} #{c} %";sleep rand*0.749+0.001}

Python 3, 149 байт

import time,random;f=0;n=0
while n<=100:
 print("Loading...","|/-\\"[f],n,"%",end="\r");f+=1
 if f>=3:f=0
 n+=1
 time.sleep(random.uniform(.25,.75))

Похоже на Загрузка ... Навсегда, но мне пришлось много отредактировать свой ответ.

TI-Basic, 80 байтов

For(I,0,100
For(A,0,randE2
End
Text(0,0,"loading "+sub("-\|/",1+fPart(I/4),1)+" ",I," %
End

Случайность происходит из For(цикла (E - научный E-токен), и, поскольку TI-Basic интерпретируется, автоматически возникают некоторые издержки. Помните, что в TI-Basic строчные буквы и некоторые менее распространенные символы ASCII занимают по два байта каждый (поэтому специально для этой программы l o a d i n g sub( \ | %это двухбайтовые токены

Clojure, 109 байт

(doseq[[c i](map vector(cycle"\\|/-")(range 101))](print"\rloading"c i\%)(flush)(Thread/sleep(rand-int 751)))

Перебирает список из диапазона чисел от 0 до 100, заархивированный бесконечным списком "\|/-"повторяющихся навсегда.

; (map vector...) is how you zip in Clojure
;  All arguments after the first to map are lists. The function is expected to
;  take as many arguments as there are lists. vector is var-arg.
(doseq [[c i] (map vector (cycle "\\|/-") (range 101))]
  ; \r to erase the old line
  (println "\rloading" c i \%)
  (Thread/sleep (rand-int 751)))

tcl, 116

set i 0;time {lmap c {- \\ | /} {puts -nonewline stderr "\rloading $c $i%";after [expr int(187*rand())]};incr i} 100

Воспроизводится в http://www.tutorialspoint.com/execute_tcl_online.php?PID=0Bw_CjBb95KQMOXoybnVSOVJEU00

Java 8, 130 байт

()->{for(int n=0;n<101;Thread.sleep((long)(1+Math.random()*750)))System.out.print("\rloading "+"-\\|/".charAt(n%4)+" "+n+++" %");}

Объяснение:

()->{                           // Method without parameter nor return-type
  for(int n=0;n<101;            //  Loop from 0 to 100
      Thread.sleep((long)(1+Math.random()*750)))
                                //   And sleep randomly 1-750 ms 
    System.out.print(           //   Print:
      "\r                       //    Reset to the start of the line
      loading "                 //    Literal "loading "
      +"-\\|/".charAt(n%4)+" "  //    + the spinner char & a space
      +n++                      //    + the number (and increase it by 1)
      +" %");                   //    + a space & '%'
                                //  End of loop (implicit / single-line body)
}                               // End of method

Выходной GIF:

Visual Basic, 371 байт

module m
sub main()
Dim s as Object
for i as Integer=0 to 100
Select Case new System.Random().next(0,9)
Case 0
s=1
Case 1
s=2
Case 2
s=5
Case 3
s=10
Case 4
s=15
Case 5
s=20
Case 6
s=25
Case 7
s=50
Case 8
s=500
End Select
Console.SetCursorPosition(0,0)
console.write("loading "+"-\|/"(i mod 4)+" "+i.tostring+" %")
system.threading.thread.sleep(s)
next
end sub
end module

Expanded:

module m
    sub main()
        Dim s as Object
        for i as Integer=0 to 100
            Select Case new System.Random().next(0,9)
                Case 0
                s=1
                Case 1
                s=2
                Case 2
                s=5
                Case 3
                s=10
                Case 4
                s=15
                Case 5
                s=20
                Case 6
                s=25
                Case 7
                s=50
                Case 8
                s=500
            End Select
            Console.SetCursorPosition(0,0)
            console.write("loading " + "-\|/"(i mod 4) + " " + i.tostring + " %")
            system.threading.thread.sleep(s)
        next
    end sub
end module