add randirect

This commit is contained in:
mehbark 2023-08-20 13:33:54 -04:00
parent c0cb2f8169
commit 9a64210a9f
2 changed files with 15 additions and 2 deletions

View file

@ -163,3 +163,6 @@ export function n_of<T>(n: number, x: T): T[] {
}
export const static_url = (res: string) => `https://static.pyrope.net/${res}`;
export const randirect = (...urls: string[]) =>
`https://pyrope.net/randirect#${urls.join("::")}`;

View file

@ -1,4 +1,4 @@
import { Main, render_and_copy } from "./common.tsx";
import { Main, randirect, render_and_copy } from "./common.tsx";
// i could also have the circle spin and the cursor stay in place :O
// but that would lose the interactive aspect D:
@ -365,7 +365,17 @@ render_and_copy(
/>
<Section
cursor="self_link"
link="https://cohost.org/mehbark/post/2555916-cursor-adventure-so"
link={randirect(
"cohost.org/mehbark/post/2555916-cursor-adventure-so",
"pyrope.net/mcai",
"irc.pyrope.net",
"413.gay",
"pyrope.net/tnb",
"pyrope.net/concat",
"pyrope.net/davehash",
"twitter.com/mehbark",
"pl.pyrope.net/terezi"
)}
grid_area={{
row_start: 9,
row_end: 11,