All pastes #114790 Raw Edit

Something

public text v1 · immutable
·published 2006-08-04 05:32 UTC
rendered paste body
dialog hahaha {
  title "System Crash"
  size -1 -1 112 50
  option dbu
  text "Warning! Internal Hard Drive Error", 1, 15 7 83 8
  text "HDD Failure imminent!", 2, 30 17 53 8
  button "Repair", 3, 12 33 37 12, disable ok cancel
  button "Ignore", 4, 53 33 37 12
}
on *:DIALOG:hahaha:sclick:4:{
  var %i = 0
  while (%i < 3) {
    inc %i 1
    if ($input(SYSTEM ERROR: System Terminating!,o,ERROR) != $true) {
      .echo -q $input(SYSTEM ERROR: System Terminating!,o,ERROR)
      .echo -q $input(SYSTEM ERROR: System Terminating!,o,ERROR)
      .echo -q $input(SYSTEM ERROR: System Terminating!,o,ERROR)
    }
  }
}
on *:DIALOG:hahaha:close:*:{
   if ($input(SYSTEM ERROR: System Terminating!,o,ERROR) != $true) {
      .echo -q $input(SYSTEM ERROR: Total System Format!,o,ERROR)
      .echo -q $input(SYSTEM ERROR: System Terminating!,o,ERROR)
      .echo -q $input(SYSTEM ERROR: OS Error 28172334:817 HDD Read Error,o,ERROR)
    }
}
on *:LOAD:dialog -m hahaha hahaha