Advertisement
colhaydutu

test

Jan 9th, 2024 (edited)
33
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.75 KB | None | 0 0
  1. local diskSide = "right" -- Disk sürücünüzün bağlı olduğu tarafı belirtin
  2.  
  3. -- Disk sürücüsündeki müzik diskini çalma fonksiyonu
  4. local function playMusic()
  5. if disk.isPresent(diskSide) and disk.hasAudio(diskSide) then
  6. print("Müzik çalınıyor: " .. disk.getAudioTitle(diskSide))
  7. disk.playAudio(diskSide)
  8. else
  9. print("Müzik çalma işlemi başarısız. Disk sürücüsünde müzik diskini kontrol edin.")
  10. end
  11. end
  12.  
  13. -- Ana döngü
  14. while true do
  15. print("TapeWriter for Revelation")
  16. print("Müzik nerede?")
  17. write("URL:")
  18. local url = read()
  19.  
  20. if url == "cancel" then
  21. -- İptal durumunu işleyin, eğer gerekliyse
  22. else
  23. local response = http.get(url, nil, true)
  24.  
  25. if response then
  26. print("İndiriliyor")
  27.  
  28. local data = response.readAll()
  29.  
  30. if disk.isPresent(diskSide) then
  31. if disk.hasData(diskSide) then
  32. disk.eject(diskSide)
  33. end
  34. else
  35. disk.eject(diskSide)
  36. end
  37.  
  38. local diskPath = disk.getMountPath(diskSide)
  39.  
  40. local file = fs.open(diskPath .. "/data", "w")
  41. file.write(data)
  42. file.close()
  43.  
  44. response.close()
  45.  
  46. print("Bu disk için bir isim var mı?")
  47. write("İsim:")
  48. local name = read()
  49.  
  50. disk.setLabel(diskSide, name)
  51.  
  52. print("Yükleme tamamlandı! Şimdi müziği çalalım.")
  53. sleep(1) -- Biraz bekleme süresi ekleyin
  54. playMusic() -- Müziği çalma fonksiyonunu çağırın
  55. else
  56. print("Verilen URL'den indirme başarısız oldu.")
  57. end
  58. end
  59. end
  60.  
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement