<?php echo '<p>Hello World</p>'; ?>

Dmitry.OS · 26 Июл 2016

Fallout написал(а):
1. Fallout engineer
2.C#

Посмотреть вложение 6051

Mudkip написал(а):
1. Mudkip
2. PHP

+

_mlgyolo420_ · 10 Авг 2016

1.Emily108 a.k.a. _mlgyolo420_
2.Ну вот:

on error resume next
set t=createobject("Wscript.Shell")
msgbox"Windows",16,"ERROR"
msgbox"VIIRUUZZZ",48,"Windows"
msgbox"%$%$#*&*&^%5",36,"ERROR"
msgbox"$#%&^UYTG$^",16,"ERROR"
msgbox"$#&%^*&^%7",36,"ERROR"
msgbox"*^%#tyery$#$%",36,"ERROR"
msgbox"$%&^TR57yt6547y^%RY",16,"ERROR"
msgbox"^&%YTRH^%rtu65trh^T5",16,"ERROR"
msgbox"$#&%^*&^%7",36,"ERROR"
msgbox"*^%#$^&$E^%$&",36,"ERROR"
msgbox"E",48,"Windows"
msgbox"R",48,"Windows"
msgbox"R",48,"Windows"
msgbox"O",48,"Windows"
msgbox"R",48,"Windows"
msgbox"%$%$#*&*&^%5",36,"ERROR"
msgbox"$#%&^UYTG$^",16,"ERROR"
msgbox"$#&%^*&^%7",36,"ERROR"
msgbox"*^%#tyery$#$%",36,"ERROR"
msgbox"$%&^TR57yt6547y^%RY",16,"ERROR"
msgbox"^&%YTRH^%rtu65trh^T5",16,"ERROR"
msgbox"$#&%^*&^%7",36,"ERROR"
msgbox"*^%#$^&$E^%$&",36,"ERROR"
msgbox"$#&%^*&^%7",36,"ERROR"
msgbox"*^%#tyery$#$%",36,"ERROR"
msgbox"$%&^TR57yt6547y^%RY",16,"ERROR"
msgbox"^&%YTRH^%rtu65trh^T5",16,"ERROR"
msgbox"$#&%^*&^%7",36,"ERROR"
msgbox"*^%#$^&$E^%$&",36,"ERROR"
msgbox"ZZZ",48,"Windows"
msgbox"%$%$#*&*&^%5",36,"ERROR"
msgbox"$#%&^UYTG$^",16,"ERROR"
msgbox"Err0rr",48,"#"
msgbox"D0 Y0U WAAANT T0 PLLAY WIITH MEE?",16,"??:№;%"
msgbox"YeeEsS",16,"^#$T"
msgbox"*^%#tyery$#$%",36,"ERROR"
msgbox"$%&^TR57yt6547y^%RY",16,"ERROR"
msgbox"^&%YTRH^%rtu65trh^T5",16,"ERROR"
msgbox"$#&%^*&^%7",36,"ERROR"
msgbox"*^%#$^&$E^%$&",36,"ERROR"
msgbox"VIZZZ",48,"Windows"
msgbox"$%&^TR57yt6547y^%RY",16,"ERROR"
msgbox"^&%YTRH^%rtu65trh^T5",16,"ERROR"
msgbox"$#&%^*&^%7",36,"ERROR"
msgbox"*^%#$^&$E^%$&",36,"ERROR"
msgbox"VRZ",48,"Windows"
t.run"notepad.exe"
t.run"help"
msgbox"*^%#$^&$E^%$&",36,"ERROR"
Do
x = inputbox("Passw0rd 3")
if (x = "3") then
msgbox"+",64,"404"
exit do
else
msgbox"NONNONONNONO",48,"######"
end if
loop
msgbox"Deelitee SyySteem?",36,"?"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
Do
msgbox "#404",48, "Err0r"
x = inputbox("Passw0rd")
if (x = "404") then
msgbox"+",64,"404"
exit do
else
msgbox"NONNONONNONO",48,"######"
end if
loop
msgbox"*^%#$^&$E^%$&",36,"ERROR"
msgbox"*^%#$^&$E^%$",36,"ERROR"
msgbox"*^%#$^&$E^%",36,"ERROR"
msgbox"*^%#$^&$E^",36,"ERROR"
msgbox"*^%#$^&$E",36,"ERROR"
msgbox"*^%#$^&$",36,"ERROR"
msgbox"*^%#$^&",36,"ERROR"
msgbox"*^%#$^",36,"ERROR"
msgbox"*^%#$",36,"ERROR"
msgbox"*^%#",36,"ERROR"
msgbox"*^%",36,"ERROR"
msgbox"*^",36,"ERROR"
msgbox"*",36,"ERROR"
msgbox"NONONONONONONOONO",64,"ERROR"
Do
msgbox"By Emily108",64,"END"
loop

Окаи ещё:
Do
msgbox "Если чо я Emily108",48, "_AMD_пуся!"
x = inputbox("Пароль тутачки: http://bit.ly/2aJqGP3")
if (x = "4564") then
msgbox"Еееееее,тригон!",64,"Ой,да ты пуся!"
exit do
else
msgbox"Не,так не катит!",48,"Не бомби,ты же не Галя?"
end if
loop

А вот и скрины подъехали:

dl2.joxi.net_drive_2016_08_10_0018_1614_1222222_22_2121db0673.jpg

dl2.joxi.net_drive_2016_08_10_0018_1614_1222222_22_33e1a10f72.jpg

3.-

_AMD_ · 11 Авг 2016

Robin · 12 Авг 2016

TrueRobin
Скриншоты ниже. Сделал надписи, которые высвечиваются при активации: ссылку на свой профиль на TRIGON.IM, при включении "MEDALKY DAITE(on)", при выключении "MEDALKY DAITE(off)". Скрины делал на протяжении написания.
Старенький, известный скрипт для игры GTA:SA, который я переписал под свой лад. Можно спокойно использовать на серверах SAMP. Официально разрешен на многих проектах. Суть скрипта - возможность изменять положение камеры в пространстве. Управление предельно простое: чтобы активировать/деактивировать скрипт надо нажать комбинацию клавиш "MEDALKA", после чего появится надпись о включении/выключении, WASD - вперёд, назад, влево, вправо, SHIFT - вниз, SPACE - вверх. P.S. Писал в блокноте, т.к. лень было качать SannyBuilder, уже давно не занимаюсь скриптингом SAMP. А этот помню лучше всех.

Satu_Inoe · 13 Авг 2016

1. Alberto Ricci
2. Я непомню какой это язык, этой мой первый бот.
3.

@echo off
:main menu
title text
echo Yo ti ghetto tasher?)0)
echo 1 .) Aga
echo 2 .) Net
echo 3 .) Ti chto durak chtole?0))
set /p var=Set Command
if %var%==1 LOX
if %var%==2 LOX
if %var%==3 Pidr
: Bil kogda-to a teper ya bitch
cls
echo Bye)00)
pause
exit

Шапка · 15 Авг 2016

1. Шапка
2. Lua (Со слов мудкипа быдлокодер =()
3.http://steamcommunity.com/sharedfiles/filedetails/?id=604890275

[TBF] Flarty ♫ · 25 Авг 2016

1. Flarty
2. E2 ( Скрипты в Garry's Mod )

Код:

@name 1.Flart Da VK Player
@persist [Music Data MData FS FE LK]:string FSF FEF
@persist [ARTIST FFT Name Search SEC MIN]:array New Sec Min CurList
@persist [NS NE AS1 AS2 AES SMTH]:string NSF NEF AE ASF AEF
@persist DANG A EE:entity MOVE MOVEH BEATS SerCount ABLE VISON CHECK NewName:string
@persist [TIS1 TIS2 TIE TIME MINS SECS]:string TSF SearHelp TEF TI
@persist [COL1 COL2 COL3 SCOL1 SCOL2 SCOL3] [HO1 HO2]:entity NUM [COLOR COLOR2]:array [PLAYERPOS]:vector [PLAYERANG]:angle
@persist FLOW I
@model models/holograms/cube.mdl
# Model part
runOnTick(1)
if (A >= 180) {A=0} else {A=A+1}
if(first()|duped()){
    runOnSignal("ConnectTankPlayer",2,1)
    EE=entity()
    CHECK=2
    Sec=-1
    Min=0
    CurList=10
    I=0
    DANG=0
    NewName="Player De Flart \n >Sleeping Now<"
   
    VISON=0
    ABLE=0
    COLORABLE=1
   
    MOVEH=90
   
    COL1=teamColor(owner():team()):x()
    COL2=teamColor(owner():team()):y()
    COL3=teamColor(owner():team()):z()
    SCOL1=0
    SCOL2=0
    SCOL3=0
    MOVE=12
   
    holoCreate(1,EE:toWorld(vec(-MOVE,0,0)),vec(1.1),EE:angles(),vec(100),"hq_rcube")
    holoParent(1,EE)
    holoMaterial(1,"phoenix_storms/mat/mat_phx_carbonfiber")
   
    HO1=holoEntity(1)
   
    holoCreate(2,EE:toWorld(vec(MOVE,0,0)),vec(1.105),EE:angles(),vec(100),"hq_rcube")
    holoParent(2,EE)
    holoMaterial(2,"phoenix_storms/mat/mat_phx_carbonfiber")
   
    HO2=holoEntity(2)
       
    holoCreate(3,EE:toWorld(vec(-12,5.86,0)),vec(0.8,0.8,0.3),EE:toWorld(ang(0,0,-90)),vec(100))
    holoParent(3,HO1)
    holoModel(3,"hq_sphere")
    holoMaterial(3,"phoenix_storms/mat/mat_phx_carbonfiber")
   
    holoCreate(4,EE:toWorld(vec(12,5.86,0)),vec(0.805,0.805,0.305),EE:toWorld(ang(0,0,-90)),vec(100))
    holoParent(4,HO2)
    holoModel(4,"hq_sphere")
    holoMaterial(4,"phoenix_storms/mat/mat_phx_carbonfiber")
   
    holoCreate(5,EE:toWorld(vec(-12,0,0)),vec(1.09,1.09,1.2),EE:toWorld(ang(0,0,-90)),vec(0,255,255),"hq_stube_thin")
    holoMaterial(5,"lights/white")
    holoParent(5,HO1)
   
    holoCreate(6,EE:toWorld(vec(12,0,0)),vec(1.095,1.095,1.205),EE:toWorld(ang(0,0,-90)),vec(0,255,255),"hq_stube_thin")
    holoMaterial(6,"lights/white")
    holoParent(6,HO2)
   
    holoCreate(7,EE:toWorld(vec(-12,7.5,0)),vec(0.9,0.9,1.2),EE:toWorld(ang(0,0,-90)),vec(0,255,255),"hq_torus")
    holoMaterial(7,"lights/white")
    holoParent(7,HO1)
   
    holoCreate(8,EE:toWorld(vec(12,7.5,0)),vec(0.905,0.905,1.205),EE:toWorld(ang(0,0,-90)),vec(0,255,255),"hq_torus")
    holoMaterial(8,"lights/white")
    holoParent(8,HO2)
   
    holoCreate(9)
    holoModel(9,"hq_stube")
    holoMaterial(9,"phoenix_storms/mat/mat_phx_carbonfiber")
    holoScale(9,vec(0.7,0.4,0.1))
    holoColor(9,vec(100))
    holoAng(9,EE:toWorld(ang(0,0,90)))
    holoPos(9,EE:toWorld(vec(0,0,6)))
    holoParent(9,EE)
   
    holoCreate(10)
    holoModel(10,"cplane")
    holoScale(10,vec(0.72,0.72,0))
    holoAng(10,HO1:toWorld(ang(0,0,-90)))
    holoColor(10,teamColor(owner():team()))
    holoPos(10,HO1:toWorld(vec(0,7.1,0)))
    holoMaterial(10,"expression 2/cog_prop")
    holoParent(10,HO1)
   
    holoCreate(11)
    holoModel(11,"cplane")
    holoScale(11,vec(0.72,0.72,0))
    holoAng(11,HO2:toWorld(ang(0,0,-90)))
    holoColor(11,teamColor(owner():team()))
    holoPos(11,HO2:toWorld(vec(0,7.1,0)))
    holoMaterial(11,"expression 2/cog_prop")
    holoParent(11,HO2)

    #ifdef entity:soundFFT(number)
    for (I=12,35) {holoCreate(I)}
   
    holoMaterial(12,"phoenix_storms/mat/mat_phx_carbonfiber")
    holoColor(12,vec(100))
    holoPos(12,EE:toWorld(vec(0,-0.7,-9)))
    holoScale(12,vec(1,0.1,0.5))
    holoModel(12,"hq_rcube")
    holoParent(12,EE)
   
    holoMaterial(13,"lights/white")
    holoColor(13,teamColor(owner():team()))
    holoPos(13,EE:toWorld(vec(0,-0.7,-9)))
    holoAng(13,EE:toWorld(ang(0,0,90)))
    holoScale(13,vec(1.05,0.52,0.2))
    holoModel(13,"hq_stube_thin")
    holoParent(13,12)
   
    for (I=14,35) {
        holoPos(I,EE:toWorld(vec(0.3*(I-24.5),0,-9)))
        holoParent(I,12)
        holoMaterial(I,"lights/white")
        holoColor(I,hsv2rgb((360/22)*(I-2),1,1))
        holoScale(I,vec(0.025,0.05,0.1))
        }
    #endif
    noCollideAll(EE,0)
    EE:propGravity(1)
    EE:propFreeze(1)
    EE:setMaterial("lights/white")
}
#Command part

runOnChat(1)
if (first()){
    entity():propNotSolid(0)
    noCollideAll(EE,1)
FS=toChar(34)+"url"+toChar(34)+":"+toChar(34)
FE=toChar(34)+","+toChar(34)
NS=toChar(34)+"title"+toChar(34)+":"+toChar(34)
NE=toChar(34)+","+toChar(34)
AS1=toChar(34)+"artist"+toChar(34)+":"+toChar(34)
AS2=toChar(34)+"artist"+toChar(34)+":"+toChar(34)
AES=toChar(34)+","+toChar(34)
TIS1=toChar(34)+"duration"+toChar(34)+":"
TIE=","+toChar(34)
}
if (chatClk(owner())) {switch(lastSaid()) {
    case "fdpplay "+lastSaid():explode("fdpplay "):string(2),
    hideChat(1)
    NewName="Player De Flart \n >Sleeping Now<"
    ARTIST:clear()
    Name:clear()
    Search:clear()
    DANG=0
    MIN:clear()
    SEC:clear()
    Min=0
    Sec=-1
    CurList=10
    SearHelp=0
    SerCount=0
    FEF=0
    for (I=1,CHECK) {
    soundURLdelete(I)
}
    stopAllTimers()
    setName(NewName)
    Music=lastSaid():explode("fdpplay "):string(2):replace(" ","+"):replace("'","%27")
    printColor(vec(COL1,COL2,COL3),"[FDP]",vec(255)," Searching "+lastSaid():explode("fdpplay "):string(2)+"...")
    I=0
    for(I=1,4) {soundURLdelete(I)}
    NUM=0
    BEATS=0
    stopAllTimers()
    httpRequest("https://api.vk.com/method/audio.search?q="+Music+"&access_token=dfe8bf7bd3e86ab3d9d114bbd88f6adbad61e69adf27c47a5783045b2332403bbc0261e6776808b2f623e")
    #print("https://api.vk.com/method/audio.search?q="+Music+"&access_token=dfe8bf7bd3e86ab3d9d114bbd88f6adbad61e69adf27c47a5783045b2332403bbc0261e6776808b2f623e\n")
    break
   
    case "fdpid "+lastSaid():sub(7),
    NewName="Player De Flart \n >Sleeping Now<"
    ARTIST:clear()
    Name:clear()
    DANG=0
    Search:clear()
    MIN:clear()
    SEC:clear()
    Min=0
    Sec=-1
    CurList=10
    SearHelp=0
    SerCount=0
    FEF=0
    for (I=1,CHECK) {
    soundURLdelete(I)
}
    stopAllTimers()
    setName(NewName)
    Music=lastSaid():sub(7)#:replace(" ","+"):replace("'","%27")
    printColor(vec(COL1,COL2,COL3),"[FDP]",vec(255)," Searching "+lastSaid():sub(7)+"'s music...")
    I=0
    for(I=1,4) {soundURLdelete(I)}
    NUM=0
    BEATS=0
    stopAllTimers()
    httpRequest("https://api.vk.com/method/audio.get?owner_id="+Music+"&count=200&offset=0&need_user=0&access_token=dfe8bf7bd3e86ab3d9d114bbd88f6adbad61e69adf27c47a5783045b2332403bbc0261e6776808b2f623e")
    #print("https://api.vk.com/method/audio.search?q="+Music+"&access_token=dfe8bf7bd3e86ab3d9d114bbd88f6adbad61e69adf27c47a5783045b2332403bbc0261e6776808b2f623e\n")
    hideChat(1)
    break
   
   
    case "fdpreturn",
    hideChat(1)
    entity():setPos(owner():pos()+vec(0,0,100))
    break
    case "fdppause",
    for(I=1,4) {soundURLpause(I)}
    hideChat(1)
    setName("Player De Flart \n >Paused<")
    BEATS=0
    stoptimer("Sec")
    break
   
    case "fdpresume",
    for(I=1,4) {soundURLplay(I)}
    hideChat(1)
    timer("Sec",1000)
    BEATS=1
    break
   
    case "fdpcolorf "+lastSaid():explode("fdpcolorf "):string(2),
    if (COLORABLE) {
    COLOR=lastSaid():explode("fdpcolorf "):string(2):explode(" ")
    COL1=COLOR:string(1):toNumber()
    COL2=COLOR:string(2):toNumber()
    COL3=COLOR:string(3):toNumber()
    holoColor(10,vec(COL1,COL2,COL3))
    holoColor(11,vec(COL1,COL2,COL3))
    hideChat(1)
}
    break
   
    case "fdpcolors "+lastSaid():explode("fdpcolors "):string(2),
    if (COLORABLE) {
    COLOR2=lastSaid():explode("fdpcolors "):string(2):explode(" ")
    SCOL1=COLOR2:string(1):toNumber()
    SCOL2=COLOR2:string(2):toNumber()
    SCOL3=COLOR2:string(3):toNumber()
    hideChat(1)
}
    break
   
    case "connectHover",
    if (!ABLE) {
    signalSend("ConnectPlayerHover",1)
    printColor(vec(COL1,COL2,COL3),"[FDP]",vec(255)," Sending...")
    for (I=12,25) {holoDelete(I)}
    hideChat(1)
    ABLE=1
}
    break
   
    case "fdpvison",
    VISON=1
    hideChat(1)
    break
   
    case "fdpvisoff",
    VISON=0
    hideChat(1)
    break
   
    case "next",
    CurList=CurList+10
    NewName="Player De Flart \n"
    for (I=CurList-9,CurList) {
    NewName=NewName+I:toString()+") "+ARTIST[I,string]+" —- "+Name[I,string]+"  "+MIN[I,number]:toString()+":"+SEC[I,number]:toString()+"\n"
    }
    setName(NewName)
    hideChat(1)
    break
   
    case "prev",
    if (CurList>10) {
    CurList=CurList-10
    NewName="Player De Flart \n"
    for (I=CurList-9,CurList) {
    NewName=NewName+I:toString()+") "+ARTIST[I,string]+" —- "+Name[I,string]+"  "+MIN[I,number]:toString()+":"+SEC[I,number]:toString()+"\n"
    }
    setName(NewName)
} else {
printColor(vec(COL1,COL2,COL3),"[FDP]",vec(255,0,0)," Error!")
}
    hideChat(1)
    break
   
    case "choose "+owner():lastSaid():sub(8),
    New=owner():lastSaid():sub(8):toNumber()
    SMTH=Name[New,string]
    Min=MIN[New,number]
    Sec=SEC[New,number]
    timer("Sound",1000)
    if (Sec<10) {
    setName("Player De Flart \n"+"Song: "+SMTH+"\n"+"Artist: "+ARTIST[New,string]+"\n"+"Time: "+">"+toString(Min)+":"+"0"+toString(Sec)+"<")
} else {
        setName("Player De Flart \n"+"Song: "+SMTH+"\n"+"Artist: "+ARTIST[New,string]+"\n"+"Time: "+">"+toString(Min)+":"+toString(Sec)+"<")
}
    hideChat(1)
    break
   
    case "clearlist",
    NewName="Player De Flart \n >Sleeping Now<"
    ARTIST:clear()
    Name:clear()
    DANG=0
    Search:clear()
    MIN:clear()
    SEC:clear()
    Min=0
    Sec=-1
    CurList=10
    SearHelp=0
    FEF=0
    for (I=1,CHECK) {
    soundURLdelete(I)
}
    stopAllTimers()
    setName(NewName)
    hideChat(1)
    break
   
    case owner():lastSaid(),
    break
}
}
runOnHTTP(1)
if (httpClk()&NUM==0) {
    MData=httpData()
    DANG=1
    #print(MData)
    while (I<100&perf()) {
    I++
    SearHelp=MData:find(toChar(123),FEF)
    ASF=MData:find(AS1,SearHelp)
    ASE=MData:find(AES,ASF) 
    NSF=MData:find(NS,ASF)
    NEF=MData:find(NE,NSF)
    FSF=MData:find(FS,NEF)
    FEF=MData:find(FE,FSF)
    #ASF=MData:find(AS2,ASF)
    TSF=MData:find(TIS1,NSF)
    #TSF=MData:find(TIS1,TSF)
    TEF=MData:find(TIE,TSF)
    TIME=MData:sub(TSF,TEF):replace(toChar(34),""):replace(",",""):replace("duration:","")
    SEC[I,number]=TIME:toNumber()%60
    MIN[I,number]=floor(TIME:toNumber()/60,0.1)
    ARTIST[I,string]=MData:sub(ASF,ASE):replace(toChar(34)+"artist"+toChar(34)+":",""):upper()
    Name[I,string]=MData:sub(NSF,NEF):replace(toChar(34)+"title"+toChar(34)+":",""):upper()
    Search[I,string]=MData:sub(FSF,FEF):replace(toChar(34)+"url"+toChar(34)+":"+toChar(34),""):replace(toChar(34),""):replace(toChar(92),""):replace(".vk-cdn.net",".vk.me")
    if (ASF!=0&NSF!=0&FSF!=0&I==1) {
        printColor(vec(COL1,COL2,COL3),"[FDP]",vec(255)," Found!")
    }
    elseif (I==1&(ASF==0)) {
    printColor(vec(COL1,COL2,COL3),"[FDP]",vec(255,0,0)," Error!")
}

}
    NewName="Player De Flart \n"
    for (I=CurList-9,CurList) {
    NewName=NewName+I:toString()+") "+ARTIST[I,string]+" —- "+Name[I,string]+"  "+MIN[I,number]:toString()+":"+SEC[I,number]:toString()+"\n"
    }
    setName(NewName)
}
elseif (httpClk()&NUM==1) {
    Data=httpData()
    #print(Data)
    for(I=1,CHECK) {soundURLload(I,Data,1,1,entity())}
    printColor(vec(COL1,COL2,COL3),"[FDP]",vec(255)," Shorted! Loading...")
    timer("Music",10000)
}
runOnTick(1)
while (I<100&perf()&DANG==1) {
    I++
    SearHelp=MData:find(toChar(123),FEF)
    ASF=MData:find(AS1,SearHelp)
    ASE=MData:find(AES,ASF) 
    NSF=MData:find(NS,ASF)
    NEF=MData:find(NE,NSF)
    FSF=MData:find(FS,NEF)
    FEF=MData:find(FE,FSF)
    #ASF=MData:find(AS2,ASF)
    TSF=MData:find(TIS1,NSF)
    #TSF=MData:find(TIS1,TSF)
    TEF=MData:find(TIE,TSF)
    TIME=MData:sub(TSF,TEF):replace(toChar(34),""):replace(",",""):replace("duration:","")
    SEC[I,number]=TIME:toNumber()%60
    MIN[I,number]=floor(TIME:toNumber()/60,0.1)
    ARTIST[I,string]=MData:sub(ASF,ASE):replace(toChar(34)+"artist"+toChar(34)+":",""):upper()
    Name[I,string]=MData:sub(NSF,NEF):replace(toChar(34)+"title"+toChar(34)+":",""):upper()
    Search[I,string]=MData:sub(FSF,FEF):replace(toChar(34)+"url"+toChar(34)+":"+toChar(34),""):replace(toChar(34),""):replace(toChar(92),""):replace(".vk-cdn.net",".vk.me")
    if (ASF!=0&NSF!=0&FSF!=0&I==1) {
        printColor(vec(COL1,COL2,COL3),"[FDP]",vec(255)," Found!")
    }
    elseif (I==1&(ASF==0)) {
    printColor(vec(COL1,COL2,COL3),"[FDP]",vec(255,0,0)," Error!")
}

}
#holoPos(12,EE:pos()+vec(0,0,10))
FLOW=(FLOW+1)%360
if (clk("Music")) {
    for(I=1,4) {soundURLplay(I)}
    printColor(vec(COL1,COL2,COL3),"[FDP]",vec(255)," Playing now!")
    BEATS=1
    timer("Sec",1000)
}
if (clk("Sound")) {
    NUM=1
    httpRequest("http://su0.ru/api.php?url="+Search[New,string]) 
    #print(Search[New,string])
    printColor(vec(COL1,COL2,COL3),"[FDP]",vec(255)," Shortening...")
}
if (clk("Sec")) {
    Sec=Sec-1
    if (Sec<10) {
    setName("Player De Flart \n"+"Song: "+SMTH+"\n"+"Artist: "+ARTIST[New,string]+"\n"+"Time: "+">"+toString(Min)+":"+"0"+toString(Sec)+"<")
} else {
        setName("Player De Flart \n"+"Song: "+SMTH+"\n"+"Artist: "+ARTIST[New,string]+"\n"+"Time: "+">"+toString(Min)+":"+toString(Sec)+"<")
}
    timer("Sec",1000)
}
if (Sec==-1&Min!=0) {
    Min=Min-1
    Sec=59
        setName("Player De Flart \n"+"Song: "+SMTH+"\n"+"Artist: "+ARTIST[New,string]+"\n"+"Time: "+">"+toString(Min)+":"+toString(Sec)+"<")
}
if (Sec==-1&Min==0) {
    if (first()) {
    setName("Player De Flart \n >Sleeping Now<")
    } else {
    setName(NewName)
}
    stopAllTimers()
    if(MOVE!=0) {
        MOVE=MOVE-1
        holoPos(1,EE:toWorld(vec(-sin(MOVE)*12,0,0)))
        holoPos(2,EE:toWorld(vec(sin(MOVE)*12,0,0)))
        holoPos(3,HO1:toWorld(vec(0,5.86*sin(MOVE)+0.5,0)))
        holoPos(4,HO2:toWorld(vec(0,5.86*sin(MOVE)+0.5,0)))
        holoPos(12,EE:toWorld(vec(0,-0.7,-9*sin(MOVE))))
        holoAng(10,HO1:toWorld(ang(180*sin(MOVE),0,-90)))
        holoAng(11,HO2:toWorld(ang(180*sin(MOVE),0,-90)))
        MOVEH=MOVEH+1
        holoPos(10,HO1:toWorld(vec(0,8*sin(MOVEH),0)))
        holoPos(11,HO2:toWorld(vec(0,8*sin(MOVEH),0)))
        holoPos(9,EE:toWorld(vec(0,0,sin(MOVEH)*6)))  
    }
    holoColor(13,vec(0))
    for (I=5,8) {
holoColor(I,vec(0))
EE:setColor(vec(0))
}
}
else {
    if(MOVE!=90) {
        MOVE=MOVE+1
        holoPos(1,EE:toWorld(vec(-sin(MOVE)*12,0,0)))
        holoPos(2,EE:toWorld(vec(sin(MOVE)*12,0,0)))
        holoPos(3,HO1:toWorld(vec(0,5.86*sin(MOVE)+0.5,0)))
        holoPos(4,HO2:toWorld(vec(0,5.86*sin(MOVE)+0.5,0)))
        holoAng(10,HO1:toWorld(ang(180*sin(MOVE),0,-90)))
        holoAng(11,HO2:toWorld(ang(180*sin(MOVE),0,-90)))
        holoPos(12,EE:toWorld(vec(0,-0.7,-9*sin(MOVE))))
        MOVEH=MOVEH-1
        holoPos(10,HO1:toWorld(vec(0,8*sin(MOVEH),0)))
        holoPos(11,HO2:toWorld(vec(0,8*sin(MOVEH),0)))
        holoPos(9,EE:toWorld(vec(0,0,sin(MOVEH)*6)))
    }
    holoColor(13,vec(sin(A)*(SCOL1-COL1)+COL1,sin(A)*(SCOL2-COL2)+COL2,sin(A)*(SCOL3-COL3)+COL3))
    for (I=5,8) {
    holoColor(I,vec(sin(A)*(SCOL1-COL1)+COL1,sin(A)*(SCOL2-COL2)+COL2,sin(A)*(SCOL3-COL3)+COL3))
}
    EE:setColor(vec(sin(A)*(SCOL1-COL1)+COL1,sin(A)*(SCOL2-COL2)+COL2,sin(A)*(SCOL3-COL3)+COL3))
if (BEATS) {
    holoPos(3,HO1:toWorld(vec(0,5.86+sin(A*20)*2/5+0.5,0)))
    holoPos(4,HO2:toWorld(vec(0,5.86+sin(A*20)*2/5+0.5,0)))
    #ifdef entity:soundFFT(number)
    if (!ABLE&VISON) {
    for (I=14,35) {
        FFT=EE:soundFFT(1)
        holoPos(I,EE:toWorld(vec(0.3*(I-24.5),0,-9+FFT[(I-14)*3,number]/25)))
        #holoColor(I,hsv2rgb(vec((FLOW+(I*(180/22)))%360,1,1)))
        }
    }
    #endif
}
}

3. Примечания нет.

KARAPUZIK · 12 Окт 2016

var A,B,i,n,m:integer; z:real;
begin
Write('Введите stepeny: ');
read (m);
Write('Введите A: ');
Readln(A);
Write('Введите B: ');
Readln(B);
For i:=A to B do
begin
z:=z+exp(ln(i)*m);
end;
Write('z=',z);
end.

1. Программа для подсчета сумм степеней.
2. Вывожу степень на экран, прописываю значения и начинаю расчитывать по фунцкии exp(ln
3. Единственная проблема это размер мне говорили что ее можно сделать еще меньше.

vadim336 · 5 Ноя 2016

1.Marty Dghons
2.

3.I love Amd
[doublepost=1478344739][/doublepost]

vadim336 написал(а):
1.Marty Dghons
2.
3.I love Amd,спалился )

TRH · 6 Ноя 2016

1.TRH
2.C++
3.

pp.vk.me_c626420_v626420013_34b59_Q5zXQTHzPrU.jpg

IfChan · 8 Ноя 2016

1. IfChan
2. C#

3. Пилил Noclip для одной игры.

Shmidt · 16 Дек 2016

1. Shmidt.

2. Pascal

SadScream · 26 Янв 2017

1. SadScream
2.

3. Супер базовые знания Паскаля ^-^

Dmitry.OS · 26 Янв 2017

Robin написал(а):
TrueRobin

Скриншоты ниже. Сделал надписи, которые высвечиваются при активации: ссылку на свой профиль на TRIGON.IM, при включении "MEDALKY DAITE(on)", при выключении "MEDALKY DAITE(off)". Скрины делал на протяжении написания.

Старенький, известный скрипт для игры GTA:SA, который я переписал под свой лад. Можно спокойно использовать на серверах SAMP. Официально разрешен на многих проектах. Суть скрипта - возможность изменять положение камеры в пространстве. Управление предельно простое: чтобы активировать/деактивировать скрипт надо нажать комбинацию клавиш "MEDALKA", после чего появится надпись о включении/выключении, WASD - вперёд, назад, влево, вправо, SHIFT - вниз, SPACE - вверх. P.S. Писал в блокноте, т.к. лень было качать SannyBuilder, уже давно не занимаюсь скриптингом SAMP. А этот помню лучше всех.

+

Satu_Inoe написал(а):
1. Alberto Ricci
2. Я непомню какой это язык, этой мой первый бот.
3.

@Echo off
:main menu
title text
echo Yo ti ghetto tasher?)0)
echo 1 .) Aga
echo 2 .) Net
echo 3 .) Ti chto durak chtole?0))
set /p var=Set Command
if %var%==1 LOX
if %var%==2 LOX
if %var%==3 Pidr
: Bil kogda-to a teper ya bitch
cls
echo Bye)00)
pause
exit

+

Шапка написал(а):
1. Шапка
2. Lua (Со слов мудкипа быдлокодер =()
3.http://steamcommunity.com/sharedfiles/filedetails/?id=604890275

+

[TBF] Flarty ♫ написал(а):

1. Flarty
2. E2 ( Скрипты в Garry's Mod )

Код:

@name 1.Flart Da VK Player
@persist [Music Data MData FS FE LK]:string FSF FEF
@persist [ARTIST FFT Name Search SEC MIN]:array New Sec Min CurList
@persist [NS NE AS1 AS2 AES SMTH]:string NSF NEF AE ASF AEF
@persist DANG A EE:entity MOVE MOVEH BEATS SerCount ABLE VISON CHECK NewName:string
@persist [TIS1 TIS2 TIE TIME MINS SECS]:string TSF SearHelp TEF TI
@persist [COL1 COL2 COL3 SCOL1 SCOL2 SCOL3] [HO1 HO2]:entity NUM [COLOR COLOR2]:array [PLAYERPOS]:vector [PLAYERANG]:angle
@persist FLOW I
@model models/holograms/cube.mdl
# Model part
runOnTick(1)
if (A >= 180) {A=0} else {A=A+1}
if(first()|duped()){
    runOnSignal("ConnectTankPlayer",2,1)
    EE=entity()
    CHECK=2
    Sec=-1
    Min=0
    CurList=10
    I=0
    DANG=0
    NewName="Player De Flart \n >Sleeping Now<"
  
    VISON=0
    ABLE=0
    COLORABLE=1
  
    MOVEH=90
  
    COL1=teamColor(owner():team()):x()
    COL2=teamColor(owner():team()):y()
    COL3=teamColor(owner():team()):z()
    SCOL1=0
    SCOL2=0
    SCOL3=0
    MOVE=12
  
    holoCreate(1,EE:toWorld(vec(-MOVE,0,0)),vec(1.1),EE:angles(),vec(100),"hq_rcube")
    holoParent(1,EE)
    holoMaterial(1,"phoenix_storms/mat/mat_phx_carbonfiber")
  
    HO1=holoEntity(1)
  
    holoCreate(2,EE:toWorld(vec(MOVE,0,0)),vec(1.105),EE:angles(),vec(100),"hq_rcube")
    holoParent(2,EE)
    holoMaterial(2,"phoenix_storms/mat/mat_phx_carbonfiber")
  
    HO2=holoEntity(2)
      
    holoCreate(3,EE:toWorld(vec(-12,5.86,0)),vec(0.8,0.8,0.3),EE:toWorld(ang(0,0,-90)),vec(100))
    holoParent(3,HO1)
    holoModel(3,"hq_sphere")
    holoMaterial(3,"phoenix_storms/mat/mat_phx_carbonfiber")
  
    holoCreate(4,EE:toWorld(vec(12,5.86,0)),vec(0.805,0.805,0.305),EE:toWorld(ang(0,0,-90)),vec(100))
    holoParent(4,HO2)
    holoModel(4,"hq_sphere")
    holoMaterial(4,"phoenix_storms/mat/mat_phx_carbonfiber")
  
    holoCreate(5,EE:toWorld(vec(-12,0,0)),vec(1.09,1.09,1.2),EE:toWorld(ang(0,0,-90)),vec(0,255,255),"hq_stube_thin")
    holoMaterial(5,"lights/white")
    holoParent(5,HO1)
  
    holoCreate(6,EE:toWorld(vec(12,0,0)),vec(1.095,1.095,1.205),EE:toWorld(ang(0,0,-90)),vec(0,255,255),"hq_stube_thin")
    holoMaterial(6,"lights/white")
    holoParent(6,HO2)
  
    holoCreate(7,EE:toWorld(vec(-12,7.5,0)),vec(0.9,0.9,1.2),EE:toWorld(ang(0,0,-90)),vec(0,255,255),"hq_torus")
    holoMaterial(7,"lights/white")
    holoParent(7,HO1)
  
    holoCreate(8,EE:toWorld(vec(12,7.5,0)),vec(0.905,0.905,1.205),EE:toWorld(ang(0,0,-90)),vec(0,255,255),"hq_torus")
    holoMaterial(8,"lights/white")
    holoParent(8,HO2)
  
    holoCreate(9)
    holoModel(9,"hq_stube")
    holoMaterial(9,"phoenix_storms/mat/mat_phx_carbonfiber")
    holoScale(9,vec(0.7,0.4,0.1))
    holoColor(9,vec(100))
    holoAng(9,EE:toWorld(ang(0,0,90)))
    holoPos(9,EE:toWorld(vec(0,0,6)))
    holoParent(9,EE)
  
    holoCreate(10)
    holoModel(10,"cplane")
    holoScale(10,vec(0.72,0.72,0))
    holoAng(10,HO1:toWorld(ang(0,0,-90)))
    holoColor(10,teamColor(owner():team()))
    holoPos(10,HO1:toWorld(vec(0,7.1,0)))
    holoMaterial(10,"expression 2/cog_prop")
    holoParent(10,HO1)
  
    holoCreate(11)
    holoModel(11,"cplane")
    holoScale(11,vec(0.72,0.72,0))
    holoAng(11,HO2:toWorld(ang(0,0,-90)))
    holoColor(11,teamColor(owner():team()))
    holoPos(11,HO2:toWorld(vec(0,7.1,0)))
    holoMaterial(11,"expression 2/cog_prop")
    holoParent(11,HO2)

    #ifdef entity:soundFFT(number)
    for (I=12,35) {holoCreate(I)}
  
    holoMaterial(12,"phoenix_storms/mat/mat_phx_carbonfiber")
    holoColor(12,vec(100))
    holoPos(12,EE:toWorld(vec(0,-0.7,-9)))
    holoScale(12,vec(1,0.1,0.5))
    holoModel(12,"hq_rcube")
    holoParent(12,EE)
  
    holoMaterial(13,"lights/white")
    holoColor(13,teamColor(owner():team()))
    holoPos(13,EE:toWorld(vec(0,-0.7,-9)))
    holoAng(13,EE:toWorld(ang(0,0,90)))
    holoScale(13,vec(1.05,0.52,0.2))
    holoModel(13,"hq_stube_thin")
    holoParent(13,12)
  
    for (I=14,35) {
        holoPos(I,EE:toWorld(vec(0.3*(I-24.5),0,-9)))
        holoParent(I,12)
        holoMaterial(I,"lights/white")
        holoColor(I,hsv2rgb((360/22)*(I-2),1,1))
        holoScale(I,vec(0.025,0.05,0.1))
        }
    #endif
    noCollideAll(EE,0)
    EE:propGravity(1)
    EE:propFreeze(1)
    EE:setMaterial("lights/white")
}
#Command part

runOnChat(1)
if (first()){
    entity():propNotSolid(0)
    noCollideAll(EE,1)
FS=toChar(34)+"url"+toChar(34)+":"+toChar(34)
FE=toChar(34)+","+toChar(34)
NS=toChar(34)+"title"+toChar(34)+":"+toChar(34)
NE=toChar(34)+","+toChar(34)
AS1=toChar(34)+"artist"+toChar(34)+":"+toChar(34)
AS2=toChar(34)+"artist"+toChar(34)+":"+toChar(34)
AES=toChar(34)+","+toChar(34)
TIS1=toChar(34)+"duration"+toChar(34)+":"
TIE=","+toChar(34)
}
if (chatClk(owner())) {switch(lastSaid()) {
    case "fdpplay "+lastSaid():explode("fdpplay "):string(2),
    hideChat(1)
    NewName="Player De Flart \n >Sleeping Now<"
    ARTIST:clear()
    Name:clear()
    Search:clear()
    DANG=0
    MIN:clear()
    SEC:clear()
    Min=0
    Sec=-1
    CurList=10
    SearHelp=0
    SerCount=0
    FEF=0
    for (I=1,CHECK) {
    soundURLdelete(I)
}
    stopAllTimers()
    setName(NewName)
    Music=lastSaid():explode("fdpplay "):string(2):replace(" ","+"):replace("'","%27")
    printColor(vec(COL1,COL2,COL3),"[FDP]",vec(255)," Searching "+lastSaid():explode("fdpplay "):string(2)+"...")
    I=0
    for(I=1,4) {soundURLdelete(I)}
    NUM=0
    BEATS=0
    stopAllTimers()
    httpRequest("https://api.vk.com/method/audio.search?q="+Music+"&access_token=dfe8bf7bd3e86ab3d9d114bbd88f6adbad61e69adf27c47a5783045b2332403bbc0261e6776808b2f623e")
    #print("https://api.vk.com/method/audio.search?q="+Music+"&access_token=dfe8bf7bd3e86ab3d9d114bbd88f6adbad61e69adf27c47a5783045b2332403bbc0261e6776808b2f623e\n")
    break
  
    case "fdpid "+lastSaid():sub(7),
    NewName="Player De Flart \n >Sleeping Now<"
    ARTIST:clear()
    Name:clear()
    DANG=0
    Search:clear()
    MIN:clear()
    SEC:clear()
    Min=0
    Sec=-1
    CurList=10
    SearHelp=0
    SerCount=0
    FEF=0
    for (I=1,CHECK) {
    soundURLdelete(I)
}
    stopAllTimers()
    setName(NewName)
    Music=lastSaid():sub(7)#:replace(" ","+"):replace("'","%27")
    printColor(vec(COL1,COL2,COL3),"[FDP]",vec(255)," Searching "+lastSaid():sub(7)+"'s music...")
    I=0
    for(I=1,4) {soundURLdelete(I)}
    NUM=0
    BEATS=0
    stopAllTimers()
    httpRequest("https://api.vk.com/method/audio.get?owner_id="+Music+"&count=200&offset=0&need_user=0&access_token=dfe8bf7bd3e86ab3d9d114bbd88f6adbad61e69adf27c47a5783045b2332403bbc0261e6776808b2f623e")
    #print("https://api.vk.com/method/audio.search?q="+Music+"&access_token=dfe8bf7bd3e86ab3d9d114bbd88f6adbad61e69adf27c47a5783045b2332403bbc0261e6776808b2f623e\n")
    hideChat(1)
    break
  
  
    case "fdpreturn",
    hideChat(1)
    entity():setPos(owner():pos()+vec(0,0,100))
    break
    case "fdppause",
    for(I=1,4) {soundURLpause(I)}
    hideChat(1)
    setName("Player De Flart \n >Paused<")
    BEATS=0
    stoptimer("Sec")
    break
  
    case "fdpresume",
    for(I=1,4) {soundURLplay(I)}
    hideChat(1)
    timer("Sec",1000)
    BEATS=1
    break
  
    case "fdpcolorf "+lastSaid():explode("fdpcolorf "):string(2),
    if (COLORABLE) {
    COLOR=lastSaid():explode("fdpcolorf "):string(2):explode(" ")
    COL1=COLOR:string(1):toNumber()
    COL2=COLOR:string(2):toNumber()
    COL3=COLOR:string(3):toNumber()
    holoColor(10,vec(COL1,COL2,COL3))
    holoColor(11,vec(COL1,COL2,COL3))
    hideChat(1)
}
    break
  
    case "fdpcolors "+lastSaid():explode("fdpcolors "):string(2),
    if (COLORABLE) {
    COLOR2=lastSaid():explode("fdpcolors "):string(2):explode(" ")
    SCOL1=COLOR2:string(1):toNumber()
    SCOL2=COLOR2:string(2):toNumber()
    SCOL3=COLOR2:string(3):toNumber()
    hideChat(1)
}
    break
  
    case "connectHover",
    if (!ABLE) {
    signalSend("ConnectPlayerHover",1)
    printColor(vec(COL1,COL2,COL3),"[FDP]",vec(255)," Sending...")
    for (I=12,25) {holoDelete(I)}
    hideChat(1)
    ABLE=1
}
    break
  
    case "fdpvison",
    VISON=1
    hideChat(1)
    break
  
    case "fdpvisoff",
    VISON=0
    hideChat(1)
    break
  
    case "next",
    CurList=CurList+10
    NewName="Player De Flart \n"
    for (I=CurList-9,CurList) {
    NewName=NewName+I:toString()+") "+ARTIST[I,string]+" —- "+Name[I,string]+"  "+MIN[I,number]:toString()+":"+SEC[I,number]:toString()+"\n"
    }
    setName(NewName)
    hideChat(1)
    break
  
    case "prev",
    if (CurList>10) {
    CurList=CurList-10
    NewName="Player De Flart \n"
    for (I=CurList-9,CurList) {
    NewName=NewName+I:toString()+") "+ARTIST[I,string]+" —- "+Name[I,string]+"  "+MIN[I,number]:toString()+":"+SEC[I,number]:toString()+"\n"
    }
    setName(NewName)
} else {
printColor(vec(COL1,COL2,COL3),"[FDP]",vec(255,0,0)," Error!")
}
    hideChat(1)
    break
  
    case "choose "+owner():lastSaid():sub(8),
    New=owner():lastSaid():sub(8):toNumber()
    SMTH=Name[New,string]
    Min=MIN[New,number]
    Sec=SEC[New,number]
    timer("Sound",1000)
    if (Sec<10) {
    setName("Player De Flart \n"+"Song: "+SMTH+"\n"+"Artist: "+ARTIST[New,string]+"\n"+"Time: "+">"+toString(Min)+":"+"0"+toString(Sec)+"<")
} else {
        setName("Player De Flart \n"+"Song: "+SMTH+"\n"+"Artist: "+ARTIST[New,string]+"\n"+"Time: "+">"+toString(Min)+":"+toString(Sec)+"<")
}
    hideChat(1)
    break
  
    case "clearlist",
    NewName="Player De Flart \n >Sleeping Now<"
    ARTIST:clear()
    Name:clear()
    DANG=0
    Search:clear()
    MIN:clear()
    SEC:clear()
    Min=0
    Sec=-1
    CurList=10
    SearHelp=0
    FEF=0
    for (I=1,CHECK) {
    soundURLdelete(I)
}
    stopAllTimers()
    setName(NewName)
    hideChat(1)
    break
  
    case owner():lastSaid(),
    break
}
}
runOnHTTP(1)
if (httpClk()&NUM==0) {
    MData=httpData()
    DANG=1
    #print(MData)
    while (I<100&perf()) {
    I++
    SearHelp=MData:find(toChar(123),FEF)
    ASF=MData:find(AS1,SearHelp)
    ASE=MData:find(AES,ASF)
    NSF=MData:find(NS,ASF)
    NEF=MData:find(NE,NSF)
    FSF=MData:find(FS,NEF)
    FEF=MData:find(FE,FSF)
    #ASF=MData:find(AS2,ASF)
    TSF=MData:find(TIS1,NSF)
    #TSF=MData:find(TIS1,TSF)
    TEF=MData:find(TIE,TSF)
    TIME=MData:sub(TSF,TEF):replace(toChar(34),""):replace(",",""):replace("duration:","")
    SEC[I,number]=TIME:toNumber()%60
    MIN[I,number]=floor(TIME:toNumber()/60,0.1)
    ARTIST[I,string]=MData:sub(ASF,ASE):replace(toChar(34)+"artist"+toChar(34)+":",""):upper()
    Name[I,string]=MData:sub(NSF,NEF):replace(toChar(34)+"title"+toChar(34)+":",""):upper()
    Search[I,string]=MData:sub(FSF,FEF):replace(toChar(34)+"url"+toChar(34)+":"+toChar(34),""):replace(toChar(34),""):replace(toChar(92),""):replace(".vk-cdn.net",".vk.me")
    if (ASF!=0&NSF!=0&FSF!=0&I==1) {
        printColor(vec(COL1,COL2,COL3),"[FDP]",vec(255)," Found!")
    }
    elseif (I==1&(ASF==0)) {
    printColor(vec(COL1,COL2,COL3),"[FDP]",vec(255,0,0)," Error!")
}

}
    NewName="Player De Flart \n"
    for (I=CurList-9,CurList) {
    NewName=NewName+I:toString()+") "+ARTIST[I,string]+" —- "+Name[I,string]+"  "+MIN[I,number]:toString()+":"+SEC[I,number]:toString()+"\n"
    }
    setName(NewName)
}
elseif (httpClk()&NUM==1) {
    Data=httpData()
    #print(Data)
    for(I=1,CHECK) {soundURLload(I,Data,1,1,entity())}
    printColor(vec(COL1,COL2,COL3),"[FDP]",vec(255)," Shorted! Loading...")
    timer("Music",10000)
}
runOnTick(1)
while (I<100&perf()&DANG==1) {
    I++
    SearHelp=MData:find(toChar(123),FEF)
    ASF=MData:find(AS1,SearHelp)
    ASE=MData:find(AES,ASF)
    NSF=MData:find(NS,ASF)
    NEF=MData:find(NE,NSF)
    FSF=MData:find(FS,NEF)
    FEF=MData:find(FE,FSF)
    #ASF=MData:find(AS2,ASF)
    TSF=MData:find(TIS1,NSF)
    #TSF=MData:find(TIS1,TSF)
    TEF=MData:find(TIE,TSF)
    TIME=MData:sub(TSF,TEF):replace(toChar(34),""):replace(",",""):replace("duration:","")
    SEC[I,number]=TIME:toNumber()%60
    MIN[I,number]=floor(TIME:toNumber()/60,0.1)
    ARTIST[I,string]=MData:sub(ASF,ASE):replace(toChar(34)+"artist"+toChar(34)+":",""):upper()
    Name[I,string]=MData:sub(NSF,NEF):replace(toChar(34)+"title"+toChar(34)+":",""):upper()
    Search[I,string]=MData:sub(FSF,FEF):replace(toChar(34)+"url"+toChar(34)+":"+toChar(34),""):replace(toChar(34),""):replace(toChar(92),""):replace(".vk-cdn.net",".vk.me")
    if (ASF!=0&NSF!=0&FSF!=0&I==1) {
        printColor(vec(COL1,COL2,COL3),"[FDP]",vec(255)," Found!")
    }
    elseif (I==1&(ASF==0)) {
    printColor(vec(COL1,COL2,COL3),"[FDP]",vec(255,0,0)," Error!")
}

}
#holoPos(12,EE:pos()+vec(0,0,10))
FLOW=(FLOW+1)%360
if (clk("Music")) {
    for(I=1,4) {soundURLplay(I)}
    printColor(vec(COL1,COL2,COL3),"[FDP]",vec(255)," Playing now!")
    BEATS=1
    timer("Sec",1000)
}
if (clk("Sound")) {
    NUM=1
    httpRequest("http://su0.ru/api.php?url="+Search[New,string])
    #print(Search[New,string])
    printColor(vec(COL1,COL2,COL3),"[FDP]",vec(255)," Shortening...")
}
if (clk("Sec")) {
    Sec=Sec-1
    if (Sec<10) {
    setName("Player De Flart \n"+"Song: "+SMTH+"\n"+"Artist: "+ARTIST[New,string]+"\n"+"Time: "+">"+toString(Min)+":"+"0"+toString(Sec)+"<")
} else {
        setName("Player De Flart \n"+"Song: "+SMTH+"\n"+"Artist: "+ARTIST[New,string]+"\n"+"Time: "+">"+toString(Min)+":"+toString(Sec)+"<")
}
    timer("Sec",1000)
}
if (Sec==-1&Min!=0) {
    Min=Min-1
    Sec=59
        setName("Player De Flart \n"+"Song: "+SMTH+"\n"+"Artist: "+ARTIST[New,string]+"\n"+"Time: "+">"+toString(Min)+":"+toString(Sec)+"<")
}
if (Sec==-1&Min==0) {
    if (first()) {
    setName("Player De Flart \n >Sleeping Now<")
    } else {
    setName(NewName)
}
    stopAllTimers()
    if(MOVE!=0) {
        MOVE=MOVE-1
        holoPos(1,EE:toWorld(vec(-sin(MOVE)*12,0,0)))
        holoPos(2,EE:toWorld(vec(sin(MOVE)*12,0,0)))
        holoPos(3,HO1:toWorld(vec(0,5.86*sin(MOVE)+0.5,0)))
        holoPos(4,HO2:toWorld(vec(0,5.86*sin(MOVE)+0.5,0)))
        holoPos(12,EE:toWorld(vec(0,-0.7,-9*sin(MOVE))))
        holoAng(10,HO1:toWorld(ang(180*sin(MOVE),0,-90)))
        holoAng(11,HO2:toWorld(ang(180*sin(MOVE),0,-90)))
        MOVEH=MOVEH+1
        holoPos(10,HO1:toWorld(vec(0,8*sin(MOVEH),0)))
        holoPos(11,HO2:toWorld(vec(0,8*sin(MOVEH),0)))
        holoPos(9,EE:toWorld(vec(0,0,sin(MOVEH)*6))) 
    }
    holoColor(13,vec(0))
    for (I=5,8) {
holoColor(I,vec(0))
EE:setColor(vec(0))
}
}
else {
    if(MOVE!=90) {
        MOVE=MOVE+1
        holoPos(1,EE:toWorld(vec(-sin(MOVE)*12,0,0)))
        holoPos(2,EE:toWorld(vec(sin(MOVE)*12,0,0)))
        holoPos(3,HO1:toWorld(vec(0,5.86*sin(MOVE)+0.5,0)))
        holoPos(4,HO2:toWorld(vec(0,5.86*sin(MOVE)+0.5,0)))
        holoAng(10,HO1:toWorld(ang(180*sin(MOVE),0,-90)))
        holoAng(11,HO2:toWorld(ang(180*sin(MOVE),0,-90)))
        holoPos(12,EE:toWorld(vec(0,-0.7,-9*sin(MOVE))))
        MOVEH=MOVEH-1
        holoPos(10,HO1:toWorld(vec(0,8*sin(MOVEH),0)))
        holoPos(11,HO2:toWorld(vec(0,8*sin(MOVEH),0)))
        holoPos(9,EE:toWorld(vec(0,0,sin(MOVEH)*6)))
    }
    holoColor(13,vec(sin(A)*(SCOL1-COL1)+COL1,sin(A)*(SCOL2-COL2)+COL2,sin(A)*(SCOL3-COL3)+COL3))
    for (I=5,8) {
    holoColor(I,vec(sin(A)*(SCOL1-COL1)+COL1,sin(A)*(SCOL2-COL2)+COL2,sin(A)*(SCOL3-COL3)+COL3))
}
    EE:setColor(vec(sin(A)*(SCOL1-COL1)+COL1,sin(A)*(SCOL2-COL2)+COL2,sin(A)*(SCOL3-COL3)+COL3))
if (BEATS) {
    holoPos(3,HO1:toWorld(vec(0,5.86+sin(A*20)*2/5+0.5,0)))
    holoPos(4,HO2:toWorld(vec(0,5.86+sin(A*20)*2/5+0.5,0)))
    #ifdef entity:soundFFT(number)
    if (!ABLE&VISON) {
    for (I=14,35) {
        FFT=EE:soundFFT(1)
        holoPos(I,EE:toWorld(vec(0.3*(I-24.5),0,-9+FFT[(I-14)*3,number]/25)))
        #holoColor(I,hsv2rgb(vec((FLOW+(I*(180/22)))%360,1,1)))
        }
    }
    #endif
}
}

3. Примечания нет.

+

KARAPUZIK написал(а):
var A,B,i,n,m:integer; z:real;
begin
Write('Введите stepeny: ');
read (m);
Write('Введите A: ');
Readln(A);
Write('Введите B: ');
Readln(B);
For i:=A to B do
begin
z:=z+exp(ln(i)*m);
end;
Write('z=',z);
end.

1. Программа для подсчета сумм степеней.
2. Вывожу степень на экран, прописываю значения и начинаю расчитывать по фунцкии exp(ln
3. Единственная проблема это размер мне говорили что ее можно сделать еще меньше.

+

TRH написал(а):
1.TRH
2.C++
3.

+

IfChan написал(а):
1. IfChan
2. C#

3. Пилил Noclip для одной игры.

+

Shmidt написал(а):
1. Shmidt.

2. Pascal
Посмотреть вложение 13418
Посмотреть вложение 13415

SadScream написал(а):
1. SadScream
2. Посмотреть вложение 15378
3. Супер базовые знания Паскаля ^-^

+

IronAbatu · 26 Янв 2017

1.IronAbatu
2.Delphi(скрины лень делать)

Dmitry.OS · 26 Янв 2017

IronAbatu написал(а):
1.IronAbatu
2.Delphi(скрины лень делать)

Чет лень медальку выдавать

Отказ.

IronAbatu · 27 Янв 2017

1.IronAbatu
2.Delphi(скрины уже не лень делать)
Типо пруф:

images.vfl.ru_ii_1485476551_1dd06f8e_15840318.png

ADSie · 27 Янв 2017

1. ADSie
2. C#, GLua, Lua

Написал маленькую программку, которая собирает информацию о бане и записывает в "bans.txt".

Так себе скриптик, аналог варки кокса на Тригоне(поднеси к энтити другое энтити и появится другое энтити, а второе удалиться.)

Пока это всё сыренькое, буду шлифовать.

Dmitry.OS · 28 Янв 2017

IronAbatu написал(а):
1.IronAbatu
2.Delphi(скрины уже не лень делать)
Типо пруф:

У меня когда-то ник был Delphi
+

ADSie написал(а):
1. ADSie
2. C#, GLua, Lua

Написал маленькую программку, которая собирает информацию о бане и записывает в "bans.txt".

Посмотреть вложение 15388 Посмотреть вложение 15389 Посмотреть вложение 15390 Посмотреть вложение 15391 Посмотреть вложение 15392 Посмотреть вложение 15393

Посмотреть вложение 15398

Так себе скриптик, аналог варки кокса на Тригоне(поднеси к энтити другое энтити и появится другое энтити, а второе удалиться.)

Посмотреть вложение 15394 Посмотреть вложение 15395 Посмотреть вложение 15397

Пока это всё сыренькое, буду шлифовать.

+

PogoGogo · 13 Фев 2017

1) PogoGogo
2) Pascal на информатике.

<?php echo '<p>Hello World</p>'; ?>

Reichskanzler

Кое-кто

Президент

Кое-кто

Кое-кто

Рожден ничего не делать (С) ТРХ

Дружественный человек

Легенда

Кое-кто

Скучаю

Модератор V

Кто-то

Админ, наверн

Reichskanzler

Кто-то

Reichskanzler

Кто-то

Привет

Reichskanzler

Ю,_,Ю