infiniteimprobabilitydrive/infiniteimprobabilitydrive.php

   1 <?php
   2 /**
   3 * Name: Infinite Improbability Drive
   4 * Description: Infinitely Improbably Find A Random User
   5 * Version: 1.0
   6 * Author: Thomas Willingham <https://kakste.com/profile/beardyunixer>
   7 */
   8 use Friendica\Core\Hook;
   9 use Friendica\DI;
  10
  11 function infiniteimprobabilitydrive_install()
  12 {
  13         Hook::register('app_menu', 'addon/infiniteimprobabilitydrive/infiniteimprobabilitydrive.php', 'infiniteimprobabilitydrive_app_menu');
  14 }
  15
  16 function infiniteimprobabilitydrive_app_menu($a, &$b)
  17 {
  18         $b['app_menu'][] = '<div class="app-title"><a href="infiniteimprobabilitydrive">' . DI::l10n()->t('Infinite Improbability Drive') . '</a></div>';
  19 }
  20
  21
  22 function infiniteimprobabilitydrive_module()
  23 {
  24         return;
  25 }
  26
  27
  28 function infiniteimprobabilitydrive_content(&$a)
  29 {
  30         $baseurl = DI::baseUrl()->get() . '/addon/infiniteimprobabilitydrive';
  31         $o = '';
  32
  33         DI::page()['htmlhead'] .= '<link rel="stylesheet" type="text/css" href="'.DI::baseUrl()->get().'/addon/infiniteimprobabilitydrive/infiniteimprobabilitydrive.css"/>';
  34
  35
  36         $baseurl = DI::baseUrl()->get();
  37
  38         $o .= <<< EOT
  39
  40 <br><br>
  41 <p>Try another destination with the <a href="$baseurl/infiniteimprobabilitydrive">Infinite Improbability Drive</a>
  42 <iframe src ="$baseurl/randprof" height="1200" width="1024">
  43
  44 EOT;
  45         return $o;
  46 }